• Romik
  • Восстановленный участник
  • На форуме с 15 октября 2001г.
  • Сообщений: 142
  • Спасибо: 0

Тема: Макрос на кнопке

Повесил макрос на кнопку , теперь хочу сделать так , чтобы
при "повторе команды" он опять запускался, а не запрашивал имя макроса.Т.е. как объединить _-vbarun и "имя макроса" в одну команду.

  • Romik
  • Восстановленный участник
  • На форуме с 15 октября 2001г.
  • Сообщений: 142
  • Спасибо: 0

Re: Макрос на кнопке

Забыл , "повтор команды" - это у меня правая кнопка мыши.

  • На форуме с 4 апреля 2002г.
  • Сообщений: 1,348
  • Спасибо: 0

Re: Макрос на кнопке

текст:
"^C^C-vbarun filename.dvb!macros "
(пробел в конце обязателен!).

  • Romik
  • Восстановленный участник
  • На форуме с 15 октября 2001г.
  • Сообщений: 142
  • Спасибо: 0

Re: Макрос на кнопке

При такой записи тоже самое. После повтора (нажатия правой кнопки мыши) Acad заускает _-vbarun  , а затем спрашивает имя макроса, что не достаточно удобно. Хотелось бы его не вводить.

  • 123
  • Восстановленный участник
  • На форуме с 19 июня 2002г.
  • Сообщений: 40
  • Спасибо: 0

Re: Макрос на кнопке

Я прописываю в лисповском файле (на автозагрузке, в mnl), например, такую запись:
(defun c:razmvib ()
  (vl-vbarun "razmvib"))
Потом вешаю на кнопку обыкновенное:
^C^Crazmvib

  • Romik
  • Восстановленный участник
  • На форуме с 15 октября 2001г.
  • Сообщений: 142
  • Спасибо: 0

Re: Макрос на кнопке

> 123
,  спасибо вроде все неплохо заработало smile

  • На форуме с 13 января 2003г.
  • Сообщений: 78
  • Спасибо: 0

Re: Макрос на кнопке

А я сразу вешаю на кнопку:
^C^C(defun c:razmvib() (vl-vbarun "razmvib")) razmvib

  • Shu
  • Восстановленный участник
  • На форуме с 27 сентября 2003г.
  • Сообщений: 1
  • Спасибо: 0

Re: Макрос на кнопке

У меня работает эта конструкция:
-vbarun "e:/programm/summa.dvb!ThisDrawing.dlinna"
вместо "ThisDrawing" может быть "Module1".

  • На форуме с 6 сентября 2003г.
  • Сообщений: 12
  • Спасибо: 0

Re: Макрос на кнопке

Аркадий Эйдельман, что стоит за словами вешаю на кнопку?
по поподробней если не затруднит...

  • На форуме с 4 февраля 2004г.
  • Сообщений: 4
  • Спасибо: 0

Re: Макрос на кнопке

клик правой кнопкой мыши на панели инструментов-Адаптация-Свойства кнопки, в поле макрос для данной кнопки-пишешь свою строку. Или тоже самое в файле mnu (см. справку)

  • VK
  • Восстановленный участник
  • На форуме с 17 марта 2003г.
  • Сообщений: 1,980
  • Спасибо: 0

Re: Макрос на кнопке

> Аркадий Эйдельман
Вроде по логике вещей и так должно работать: ^C^C(vl-vbarun "razmvib")

  • На форуме с 4 февраля 2004г.
  • Сообщений: 4
  • Спасибо: 0

Re: Макрос на кнопке

Вах! работает, спасибо VK +)

  • Leonid
  • Восстановленный участник
  • На форуме с 16 июня 2003г.
  • Сообщений: 389
  • Спасибо: 0

Re: Макрос на кнопке

Могу посоветовать книжку -
В.Свет "AutoCAD Язык макрокоманд и создание кнопок"

  • Dimas
  • Восстановленный участник
  • На форуме с 25 июля 2006г.
  • Сообщений: 48
  • Спасибо: 0

Re: Макрос на кнопке

пример: -vbarun Module1 (впереди знак минус !!!)

  • Dimas
  • Восстановленный участник
  • На форуме с 25 июля 2006г.
  • Сообщений: 48
  • Спасибо: 0

Re: Макрос на кнопке

пример: -vbarun Module1 (впереди знак минус !!!)
а Module1 имя процедуры (макроса)

  • Alexander
  • Восстановленный участник
  • На форуме с 29 апреля 2003г.
  • Сообщений: 86
  • Спасибо: 0

Re: Макрос на кнопке

Можно предложить такую функцию

;;;  ******************************
;;;  Загрузка и запуск програм VBA
;;;  Если un = t макрос после выполнения
;;;  выгружается
(defun ld-dvb (file Macro un / pn)
  (if (setq pn (findfile file))
    (progn
      (vl-vbaload pn)
      (vl-vbarun Macro)
    ) ;_ end of progn
    (princ (strcat "Файл " file " не найден."))
  ) ;_ end of if
  (if (and un pn)
    (vl-cmdf "_.vbaunload" pn)
  ) ;_ end of if
  (princ)
) ;_ end of defun
;;;  ****************************

Поместить её в файл acaddoc.lsp
а на кнопке писАть
(ld-dvb "horosho.dvb" "ochen" nil)

  • Alexander
  • Восстановленный участник
  • На форуме с 29 апреля 2003г.
  • Сообщений: 86
  • Спасибо: 0

Re: Макрос на кнопке

"повтор команды" — это у меня правая кнопка мыши.

Чтобы был повтор команды тогда так

(defun c:ld-dvb (file Macro un / pn)