|
|
|
кнопка на рабочем листе exel
|
|||
|---|---|---|---|
|
#18+
На рабочем листе есть кнопка "Button 12", 1. где можно поменять ее Name? 2. Как написать правильно: if текст на кнопке = "скрыть" то Rows("18:26").Select Selection.EntireRow.Hidden = False else текст на кнопке = "отобразить" Rows("18:26").Select Selection.EntireRow.Hidden = True End if Спасибо! ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 22.12.2008, 13:47:36 |
|
||
|
кнопка на рабочем листе exel
|
|||
|---|---|---|---|
|
#18+
If ActiveSheet.Shapes("Button 12").TextFrame.Characters.Text = "Скрыть" Then Call serv.skrit ActiveSheet.Shapes("Button 12").TextFrame.Characters.Text = "Отобразить" Else Call serv.otobrazit ActiveSheet.Shapes("Button 12").TextFrame.Characters.Text = "Скрыть" End If Все пояла, тема закрыта ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 22.12.2008, 14:03:46 |
|
||
|
|
start [/forum/search_topic.php?author=the_stoned&author_mode=last_posts&do_search=1]: |
0ms |
get settings: |
9ms |
get forum list: |
8ms |
get settings: |
9ms |
get forum list: |
10ms |
check forum access: |
2ms |
check topic access: |
2ms |
track hit: |
54ms |
get topic data: |
7ms |
get forum data: |
2ms |
get page messages: |
22ms |
get tp. blocked users: |
1ms |
| others: | 688ms |
| total: | 814ms |
| 0 / 0 |
