|
|
|
кнопка на рабочем листе 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/topic.php?fid=61&gotonew=1&tid=2179966]: |
0ms |
get settings: |
11ms |
get forum list: |
18ms |
check forum access: |
4ms |
check topic access: |
4ms |
track hit: |
182ms |
get topic data: |
12ms |
get first new msg: |
7ms |
get forum data: |
3ms |
get page messages: |
56ms |
get tp. blocked users: |
2ms |
| others: | 226ms |
| total: | 525ms |
| 0 / 0 |
