Страницы: 1
RSS
Как определить строку Кнопки?
 
Помогите чайнику!  
 
Есть форма, где на каждую строку будет сделана кнопка добавляющая лист. Хотел бы сделать, чтобы строка кнопки определялась автоматом. Иначе придется на каждую кнопку писать новый макрос.
 
Вот вам макрос:  
 
Sub ОпредСтрокуКнопки()  
   SR% = ActiveSheet.Shapes("Button 1").TopLeftCell.Row  
   MsgBox SR  
End Sub  
 
PS: Делать по кнопке на каждую строку - плохая идея.  
Сделайте ОДНУ кнопку НАД таблицей, а макрос, срабатывающий при её нажатии, пусть вставляет лист, исходя из данных в активной строке (в той строке, где выделена ячейка)
 
Кнопки я все-таки сделаю, а то там ген. дир. с алогичным мышлением.  
Из каких источников черпаете информацию о всех свойствах и методах объектов?
 
Информацию черпаю из неиссякаемого источника - встроенной в Excel справки по VBA  
 
PS: Если надоест вручную рисовать кнопки - здесь можно найти макрос для программного их создания:  
http://www.programmersforum.ru/showpost.php?p=220090&postcount=11
 
> Хотел бы сделать, чтобы строка кнопки определялась автоматом. Иначе придется на каждую кнопку писать новый макрос.  
 
Application.Caller рулит, см. код.  
Я просто скопировал ячейку с кнопкой вниз по столбцу.
Страницы: 1
Читают тему
Наверх