Работа с объектами в Excel

← →
VID (2003-03-17 15:27) [0]

ДАНО: документ Excel.
Рабочая область ну к примеру 10строк Х 10 столбцов
Каждая ячейка рабочей области содержит в себе объект TButton (ну или как это в VBA называется ?)
Каждый TButton имеет в своём св-ве Caption какое то строковое значение.
ТРЕБУЕТСЯ:
макрос удаляющий вообще ВСЕ объекты (типа TButton, рисунки и всё такое...) из документа Excel, но перед этим, перед удалением каждого объекта типа TButton (именно такого) он сначала скопирует Caption этой кнопки в ячейку, которой принадлежит кнопка... а потом уже удалит эту кнопку.

вот такая задачка...

← →
Ihor Osov'yak (2003-03-17 15:37) [1]

ну задачка, как задачка..

← →
sad (2003-03-17 16:37) [2]

ActiveSheet.Range("A4").Value = ThisWorkbook.Worksheets(1).CommandButton1.Caption
ActiveSheet.Shapes("CommandButton1").Select
Selection.Delete

← →
VID (2003-03-17 16:39) [3]

угу, и здесь думаю одним uses Excel97 уже неотмазаться :)
но как то же это наверное можно сделать....

← →
VID (2003-03-17 18:39) [4]

to sad: я не успел :)

← →
VID (2003-03-17 20:48) [5]

to sad: твой вариант немного не подходит... если хочешь , я пришлю тебе на мыло (e-mail - ?) xls файл и ты сразу поймёшь что я имею ввиду...

там каждая кнопка как бы прикреплена к ячейке, когда я изменяю высоту строки , то Button.Top тоже меняется.
А вообще такую таблицу я получил из html таблицы, в которой в одной из колонок в каждой ячейке были кнопки типа Submit(TButton)

← →
sad (2003-03-18 12:11) [6]

высылай посмотрю мыло в анкете

← →
VID (2003-03-18 13:33) [7]

выслал.

Работа с объектами в Excel Найти похожие ветки