[kolobrod]

Примеры Полещука и другие похожие видел... Но всетаки хочу спросить...

Подскажите пожалуйста как следующие строчки на VBA перевести на LISP?.. Не могу разобраться с vlax-invoke-method и vlax-get-property.

Код:

[Выделить все]

    Worksheets("Sheet1").Activate
    Range("A21").Select
    Range(Selection, Selection.End(xlDown)).Select

[pad]

Сообщение от Кулик Алексей aka kpblc И что вернет (vlax-get-property xlaapp 'enablevents) ?

Показывает "nil". Я подумал, что ошибка в записи, а получается, что не ко всем свойствам можно обращаться?
Смотреть дамп я не знаю как

С ходу также не получается переименовать Workbooks в Excel, может есть пример?

[Кулик Алексей aka kpblc]

Сообщение от pad Смотреть дамп я не знаю как

(vlax-dump-object obj t)
Сейчас нет машины, где есть и ACAD, и Excel, так что помочь мало чем могу.
ЕМНИП, Workbooks - это коллекция открытых книг. Ее переименовывать - это как? Какую-то книгу переименовать, наверное, и можно - при сохранении. Но не "на лету".
Могу ошибаться

[pad]

для отключения сообщений использовал (vlax-put-property xlApp 'DisplayAlerts :vlax-False)

Перерыл весь форум с темами про Excel, но так и не нашел как просто скопировать лист?

[Кулик Алексей aka kpblc]

А у объекта листа вообще есть метод Copy (ну или что-то подобное)? И что говорит справка самого Excel по этому поводу?

[pad]

Copy есть но вкладка не появдяется. VBA смотрел, там: Worksheets("Лист1").Copy Before:=Worksheets("Лист2")
Как здесь не пойму.

[Кулик Алексей aka kpblc]

Лист копируется. Просто в другой документ.
А как выполнить копирование внутри книги - не знаю Точнее, я не понял, как передавать необязательные аргументы в метод.

[pad]

Тогда по другому: А можно ли копировать диапозон ячеек с одного листа на другой?

[VVA]

Здесь GetExcel.lsp есть библиотечные функции по работе с excell. Может что подберешь

[pad]

Сообщение от pad Copy есть но вкладка не появдяется. VBA смотрел, там: Worksheets("Лист1").Copy Before:=Worksheets("Лист2") Как здесь не пойму.

Не стал тогда копировать лист, тупо создавал новый.
Но вот теперь надо определенный лист сделать первым в книге и вернулся опять к записи типа *.Copy только теперь *.Move.
Функция работает создавая при этом другой документ
Много перерыл примеров, но вот именно про работу с листами нет толком ни чего. Какие мысли есть?

[Сергей812]

т.е. из 4 поста ветки не работает?

[pad]

Сообщение от Сергей812 т.е. из 4 поста ветки не работает?

нет.. создает новую книгу (открывает второе окно).
А может быть это из-за того, что файл не сохранен? я его создаю и работаю с ним в памяти.

[Сергей812]

Сообщение от pad А может быть это из-за того, что файл не сохранен? я его создаю и работаю с ним в памяти.

сомневаюсь. Работаете же через COM с запущенным экземпляром экселя, а там ограничений на создание и копирование листов в только что созданной несохраненной книге нет.

[pad]

Попробовал и с сохраненным файлом, нет не работает, не перемещает

При COPY, копирует опять же в отлельное окно...

----- добавлено через ~4 ч. -----

Сообщение от pad Попробовал и с сохраненным файлом, нет не работает, не перемещает При COPY, копирует опять же в отлельное окно...

Сергей812 спасибо за помощь, разобрался.
Новое окно появляется когда метод move или copy срабатывает с не указанным (или не правильно указанным) листом, просто создает другое окно и все.
Пример указтеля: (setq sht (vlax-get-property sheets 'Item 3)), при этом 'Item 3 - 3 лист книги
Команда (vlax-invoke-method new_sheet 'Move sht) ставит лист new_sheet перед 3 листом