ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Отображение или скрытие строк с помощью кнопки
15 сообщений из 15, страница 1 из 1
Отображение или скрытие строк с помощью кнопки
    #35122012
Khersonets
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Khersonets
Гость
Помогите чайнику! Нужен срочно макрос, который отображает ранее скрытые строки по одной при каждом клике на кнопку.
...
Рейтинг: 0 / 0
09.02.2008, 20:19:57
| Ответить | Цитировать | Написать  
Отображение или скрытие строк с помощью кнопки
    #35123379
Фотография Rampage
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Rampage
Участник
Мож чем поможет.
Код: plaintext
1.
2.
Sub kolonki()
Rows("1:1").Hidden = False
End Sub
...
Рейтинг: 0 / 0
11.02.2008, 10:32:15
| Ответить | Цитировать | Написать  
Отображение или скрытие строк с помощью кнопки
    #35125396
Khersonets
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Khersonets
Гость
Есть несколько срытых строк и одна кнопка. Нужно, чтобы при каждом клике на эту кнопку открывалось по одной скрытой строке.
...
Рейтинг: 0 / 0
11.02.2008, 21:32:59
| Ответить | Цитировать | Написать  
Отображение или скрытие строк с помощью кнопки
    #35125814
ЛиП
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ЛиП
Участник
Я вобщето на делфи пишу, но попробывал на VBA. так что в нужный вид доведи сам
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
im r As Integer


Private Sub CommandButton1_Click()
 ' i = 1
l1: r = r +  1 
 ' MsgBox (CByte(r) & ":" & CByte(r))
 
 If (Rows(CInt(r) & ":" & CInt(r)).Hidden = True) And (r <  300 ) Then
Rows(CInt(r) & ":" & CInt(r)).Hidden = False
 Else: GoTo l1
End If


End Sub
...
Рейтинг: 0 / 0
12.02.2008, 09:37:16
| Ответить | Цитировать | Написать  
Отображение или скрытие строк с помощью кнопки
    #35125917
Фотография Rampage
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Rampage
Участник
KhersonetsЕсть несколько срытых строк и одна кнопка. Нужно, чтобы при каждом клике на эту кнопку открывалось по одной скрытой строке.

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
Sub kolonki()
Dim introw As Integer
For introw =  1  To  300 
If Rows((introw) & ":" & (introw)).Hidden = True Then
GoTo  10 :
End If
Next
 10 : Rows((introw) & ":" & (introw)).Hidden = False
End Sub
а мона и так :)
смысл вроде бы не изменился %)
...
Рейтинг: 0 / 0
12.02.2008, 10:15:02
| Ответить | Цитировать | Написать  
Отображение или скрытие строк с помощью кнопки
    #35131326
Khersonets
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Khersonets
Гость
Спасибо огромное!!! Ребя, если бы вы были в Херсоне, я бы выставил вам пива.
...
Рейтинг: 0 / 0
13.02.2008, 22:39:25
| Ответить | Цитировать | Написать  
Отображение или скрытие строк с помощью кнопки
    #35137930
Khersonets
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Khersonets
Гость
Есть еще пара вопросов. Чтобы долго не объяснять, прилагаю файл.
1. Как сделать, чтобы строки удалялись, начиная с нижней.
2. Как скрыть кнопки вместе со скрыванием блока (подозреваю, что в свойствах, но ничего не подходит).
Заранее, спасибо!
...
Рейтинг: 0 / 0
17.02.2008, 22:51:15
| Ответить | Цитировать | Написать  
Отображение или скрытие строк с помощью кнопки
    #35138090
ЛиП
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ЛиП
Участник
KhersonetsЕсть еще пара вопросов. Чтобы долго не объяснять, прилагаю файл.
1. Как сделать, чтобы строки удалялись, начиная с нижней.
2. Как скрыть кнопки вместе со скрыванием блока (подозреваю, что в свойствах, но ничего не подходит).
Заранее, спасибо!

1.


Делаешь обратный цикл с шагом -1
Код: plaintext
For introw =  15  To  7  Step - 1

2

контекстное меню на кнопке/Формат объекта/Свойства/НЕ ПЕРЕМЕЩАТЬ И НЕ МЕНЯТЬ РАЗМЕРЫ.

На твоем примере прилагаю
...
Рейтинг: 0 / 0
18.02.2008, 08:38:51
| Ответить | Цитировать | Написать  
Отображение или скрытие строк с помощью кнопки
    #35138093
ЛиП
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ЛиП
Участник
ЛиП

2
контекстное меню на кнопке/Формат объекта/Свойства/НЕ ПЕРЕМЕЩАТЬ И НЕ МЕНЯТЬ РАЗМЕРЫ.

Ой, звеняй - на оборот.
...
Рейтинг: 0 / 0
18.02.2008, 08:41:27
| Ответить | Цитировать | Написать  
Отображение или скрытие строк с помощью кнопки
    #35138105
ЛиП
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ЛиП
Участник
ЛиП ЛиП

2
контекстное меню на кнопке/Формат объекта/Свойства/НЕ ПЕРЕМЕЩАТЬ И НЕ МЕНЯТЬ РАЗМЕРЫ.

Ой, звеняй - на оборот.
Блин...не проснулся еще...не так понял вопрос.
Код: plaintext
CommandButton2.Visible = Not CommandButton2.Visible
Прописывай в обоих обработчиках.
Можешь на прямую - TRUE и FALSE - как в примере
Код: plaintext
1.
2.
[SRC vba]CommandButton2.Visible =TRUE
...
[SRC vba]CommandButton2.Visible =FALSE
...
Рейтинг: 0 / 0
18.02.2008, 08:50:16
| Ответить | Цитировать | Написать  
Отображение или скрытие строк с помощью кнопки
    #35141377
Khersonets
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Khersonets
Гость
Подскажите еще макрос, с помощью которого можно было бы увеличивать/уменьшать строку с комментариями (размер строки зависит от кол-ва внесенных комментариев). Спасибо!!!
...
Рейтинг: 0 / 0
19.02.2008, 13:28:31
| Ответить | Цитировать | Написать  
Отображение или скрытие строк с помощью кнопки
    #35141480
ЛиП
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ЛиП
Участник
Код: plaintext
1.
2.
Private Sub CommandButton3_Click()
Rows("19:19").RowHeight = Rows("19:19").RowHeight +  3 
End Sub

Увеличивает на 3 пикселя при нажатии.
Измени шаг как надо.
...
Рейтинг: 0 / 0
19.02.2008, 13:59:36
| Ответить | Цитировать | Написать  
Отображение или скрытие строк с помощью кнопки
    #35141745
Khersonets
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Khersonets
Гость
Все гениальное - просто! Спасибо ОГРОМНОЕ!!! Возник еще вопрос: с помощью какого макроса будут синхронно удаляться/добавляться строки в двух таблицах (строки Excel'я 15-35, 14-34, 13-33 и т.д.)?
...
Рейтинг: 0 / 0
19.02.2008, 15:21:05
| Ответить | Цитировать | Написать  
Отображение или скрытие строк с помощью кнопки
    #35141876
Фотография Rampage
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Rampage
Участник
нопку создай и повесь на неё удаление строк.
...
Рейтинг: 0 / 0
19.02.2008, 15:55:35
| Ответить | Цитировать | Написать  
Отображение или скрытие строк с помощью кнопки
    #35142055
ЛиП
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ЛиП
Участник
Ну да...
В обработчик одной кнопки пихаешь эти три цикла...
Если процедуры ужо написаны, то просто вызываешь их
...
Рейтинг: 0 / 0
19.02.2008, 16:45:05
| Ответить | Цитировать | Написать  
15 сообщений из 15, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Отображение или скрытие строк с помощью кнопки
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=61&msg=35137930&tid=2181399]:
 0ms
get settings:
 6ms
get forum list:
 12ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 42ms
get topic data:
 8ms
get forum data:
 2ms
get page messages:
 46ms
get tp. blocked users:
 1ms
others: 207ms
total:  328ms
созд. / загр.: 328ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]