Помогите с MS Excel

Ну почему же - все получается.....

Sub Макрос1()

ActiveCell.FormulaR1C1 = ActiveCell.FormulaR1C1 + " " + "БМВ"

End Sub

Sub Макрос()

ActiveCell.FormulaR1C1 = ActiveCell.FormulaR1C1 + " " + "АУДИ"

End Sub

вот так работает

Yuri K., Zwalker, спасибо, действительно, то что нужно!

Vitalik,

Закрываем редактор VB

Правый клик на любой панели инструментов. Выбираем пункт "настройка".

Переходим на закладку "команды"

Выбираем категорию "макросы"

В окне команды перетаскиваем кнопку "настраиваемая кнопка" на любую панель по вкусу.

Правый клик по созданной кнопке и выбираем пункт "Назначить макрос"

Назначаем кнопке макрос "Макрос1".

Повторить для других кнопок.....

Во время выполнения выделенного фрагмента по умолчанию внизу в листбоксе указан текущий файл (его имя). Нужно заменить на "Эта книга" или "Все открытые книги". Предпочтительно все же выбрать 1-й вариант...

Мучаю и никак не домучаю...

Ребята, кто может, посмотрите, пожалуйста, файл. Что я не правильно делаю.

[url=http://zuyonok.at.[censored]/posech1.xls]Вот файл (25 кбайт)

Lostminsk, да вроде простую задачу, нажимаю на определенную кнопку - вставляется определенное слово.

Идет привязка к нахождению и имени файла.

Стоит мне поменять имя файла, она пишет, что не правильный путь и макрос не работает.

Я пишу отчеты за неделю и мне надоело набирать одни и теже слова. Решил, что можно же это сделать через макросы.

Мне необходимо, нажал кнопку - вставилось одно слово(например, БМВ), нажал другую кнопку - вставилось другое слово(Мерседес).

Вроде как ребята выше подсказали решение задачи, так и есть, сделал все по их инструкции работает. Но, когда я перемещаю файл в другое место(например, на флэш) или переименовываю его, кнопки работать перестают. Где идет привязка к имени файла и пути не знаю...

Vitalik, Сделай так:

1. Помести свой xls файл в C:\Documents and Settings\-----USER-----\Application Data\Microsoft\EXCEL\XLSTART\

2. Открой его и сделай вот это

Во время выполнения выделенного фрагмента по умолчанию внизу в листбоксе указан текущий файл (его имя). Нужно заменить на "Эта книга" или "Все открытые книги". Предпочтительно все же выбрать 1-й вариант...

3. Окно - скрыть

4. Теперь макросы которые у тебя записаны в твоем xls файле будут доступны при открытии любой книги excel.

Я только что проверил. работает

=====================================

вот еще тут глянь http://personal-computer-tutor.com/personalxls.htm

Vitalik, так ты определись, "тебе шашечки или ехать..."

В чем твоя проблема... Объясняю.

Для того чтобы макрос был доступен для все файлов его нужно поместить в личную книгу макросов (ЛКМ) - файл, personal.xls.

Для того чтобы макрос был доступен в этом файле на всех компах, нужно вложить его в этот файл, что ты и сделал.

Далее, я понял, ты пользуешься созданной тобой панелью инструментов. Что бы панель была доступна на всех компах, ее нужно вложить в файл, так как я написал на предыдущей странице.

Потому, если ты откроешь свой файл первый раз на новом компе, то твои кнопки будут работать, даже если ты при переносе перименовал файл.

При первом открытии происходит автоматическое копирование панели из книги в Excel на этом новом компе. Далее, при повторном открытии, если такая панель в Excele присутствует, копирования не происходит. Поэтому раз в личной книге макроса нет, то при изменении имени или разположения файл excel не может найти макрос, о чем тебе и сообщает.

Проблема ясна? Решай.

Как варианты, могу преложить такскать не только файл, но и ЛКМ.

Можно не пользовать панелью.

Но эти варианты тебя не устраивают, я правильно понял?

Поэтому предлагаю каждый раз при закрытии твоего файла, удалять из excel твою панель.

Тогда при открытии даже переименного файл юудет происходит копирование панели.

Единственный недостаток, что при закрытии книги, панелька в других книгах будет недоступна.

Можно удалять с помощью макроса. На листе макросов для книги ("Эта книга" добавь макрос:

Private Sub Workbook_BeforeClose(Cancel As Boolean)

Application.CommandBars("Панель".Delete

End Sub

где в кавычках - название твоей панели.

Может можно и проще, но уже лень думать...

KSIva, ну и как ты умудрился международные параметры сменить?

Сервис - Параметры - Международные - Сними галку "Просматривать текущий листи справа налево"