Форум программистов, компьютерный форум CyberForum.ru
CyberForum.ru - форум программистов и сисадминов > > >
Восстановить пароль Регистрация
 
Well78
Гость
Сообщений: n/a
04.04.2012, 15:27     Как вставить кнопку в лист Excel?   #1
В лист Excel вставляю стандартную кнопку
CommandButton программно с помощью метода
AddOleObject.
Перед вставкой кнопки я запоминаю в переменную
некое значение.
После вставки кнопки, значение переменной теряется.
И вообще такое ощущение, что в макрос отрабатывает до
конца метод, вставляющий кнопку и все переменные теряются,
форма разрушается, короче говоря макрос падает.
Вопрос: если есть объяснение этому явлению, то как
обойти эти проблемы. Либо порекомендуйте другое решение.
Мне необходимы кнопки на листе. Может можно использовать
стандартные объекты Excel?
AdAgent
Объявления
04.04.2012, 15:27     Как вставить кнопку в лист Excel?
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
04.04.2012, 15:27     Как вставить кнопку в лист Excel?
Посмотрите здесь:

VBA Excel 2007. Скрыть ярлычок "Вставить лист"
VBA Excel: как удалить лист, чтоб Excel не ругался?
VBA Как в Visio вставить новый лист в определенное место?
VBA Можно ли в excel с помощью VBA создать кнопку и поместить ее на рабочий лист?
VBA Как найти минимальное значение и вставить на другой лист
VBA Данные из Excel вставить в стороннее приложение и нажать там кнопку
VBA Как вставить в лист Excel несколько файлов Outlook из папки Windows
VBA Как вставить на Excel-лист рисунок - значок кнопки ленты MS Office
Димит
Форумчанин
7 / 7 / 0
Регистрация: 03.11.2010
Сообщений: 358
04.04.2012, 16:23     Как вставить кнопку в лист Excel?   #2
Код?
Можно делать кнопки на листе, в панеле, на форме и т.д.
Всё зависит от Вас.
Well78
Гость
Сообщений: n/a
04.04.2012, 16:53     Как вставить кнопку в лист Excel?   #3
Мне нужны кнопки в нужных мне ячейках.
Код там простой.
В цикле при определенных условиях я
вставляю по две кнопки в ячейки листа.
код вставки:
With WorkSheets("Лист2").Shapes.AddOLEObject Left:=CellX, Top:=CellY, Width:=30, Height:=20, ClassType:="Forms.CommandButton.1"
.Name = "AddButton" & Num
.Caption = "Добавить ..."
End With

также вторую кнопку пихаю
Letter_D
Форумчанин
1 / 1 / 0
Регистрация: 18.06.2008
Сообщений: 328
04.04.2012, 16:56     Как вставить кнопку в лист Excel?   #4
Объявить переменные на уровне модуля.
Well78
Гость
Сообщений: n/a
04.04.2012, 17:01     Как вставить кнопку в лист Excel?   #5
так и есть
Димит
Форумчанин
7 / 7 / 0
Регистрация: 03.11.2010
Сообщений: 358
04.04.2012, 17:38     Как вставить кнопку в лист Excel?   #6
Попробуй так:
With Worksheets("Лист2").OLEObjects.Add(ClassType:="Forms.CommandButton.1", Left:=CellX, Top:=CellY, Width:=30, Height:=20)
.Name = "AddButton" & Num
.Object.Caption = "Добавить ..."
End With
Yandex
Объявления
04.04.2012, 17:38     Как вставить кнопку в лист Excel?
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
Опции темы

Текущее время: 10:19. Часовой пояс GMT +4.
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.7 PL3
Copyright ©2000 - 2014, vBulletin Solutions, Inc.
Яндекс.Метрика