Новые сообщения · Участники · Правила форума · Поиск · RSS
  • Страница 1 из 1
  • 1
Модератор форума: DV68, Author  
Форум » ТЕМАТИЧЕСКИЕ » Excel - Готовые формулы » Скрыть строку / столбец (Необходим макрос который позволит скрывать строки / столбцы)
Скрыть строку / столбец
ANLIДата: Вторник, 10.07.2012, 09:57 | Сообщение # 1
Группа: Пользователи
Сообщений: 6
Статус: Offline
Прошлый раз мну очень помогли с макросом для скрывания листа (за что огромное спс - Serge_007), помогите еще раз ток теперь со строкой и столбцом

Есть книга состоящая из 3 листов "Лист1", "Лист2", "Лист3".
если ячейка А1 = "1" на листе "Лист1", то строки "1", "2", "3" на листе "Лист2" должны скрываться, если в ячейке А1 другое значение то нет

таже проблема касается и столбцов:

Есть книга состоящая из 3 листов "Лист1", "Лист2", "Лист3".
если ячейка А1 = "1" на листе "Лист1", то столбец "А", "B", "C" на листе "Лист2" должны скрываться, если в ячейке А1 другое значение то нет

НУ ОЧЕНЬ НУНО!
 
ANLIДата: Вторник, 10.07.2012, 09:59 | Сообщение # 2
Группа: Пользователи
Сообщений: 6
Статус: Offline
если не затруднит то выложите и xls файл еще раз спс
 
Serge_007Дата: Вторник, 10.07.2012, 12:26 | Сообщение # 3
Группа: Проверенные
Сообщений: 468
Статус: Offline
.
Прикрепления: ANLI.rar(15.8 Kb)


Бесплатная помощь: www.excelworld.ru
Платная помощь: serge_007.planetaexcel@mail.ru
Яндекс-деньги: 41001419691823
WMR: 126292472390
 
ANLIДата: Вторник, 10.07.2012, 22:33 | Сообщение # 4
Группа: Пользователи
Сообщений: 6
Статус: Offline
все работает, все супер, СПАСИБО!
 
ANLIДата: Четверг, 12.07.2012, 09:04 | Сообщение # 5
Группа: Пользователи
Сообщений: 6
Статус: Offline
Подскажите пжл, если таких условий несколько 2 или более можно каким либо образом расшырить этот макрос любезно предоставленный - Serge_007:

Private Sub Worksheet_Change(ByVal Target As Range)
Application.ScreenUpdating = False
If Sheets("Лист1").Range("A1") = 1 Then
Sheets("Лист2").Rows("1:3").EntireRow.Hidden = True
ElseIf Sheets("Лист1").Range("A1") <> 1 Then
Sheets("Лист2").Rows("1:3").EntireRow.Hidden = False
End If
Sheets("Лист1").Select
Application.ScreenUpdating = True
End Sub

допустим условие первое осталось без изменений
Есть книга состоящая из 3 листов "Лист1", "Лист2", "Лист3".
если ячейка А1 = "1" на листе "Лист1", то строки "1", "2", "3" на листе "Лист2" должны скрываться, если в ячейке А1 другое значение то нет

но нужно добавить и условие номер два не как не связаное с первым
если ячейка А1 = "2" на листе "Лист1", то строки "4", "5", "6" на листе "Лист2" должны скрываться, если в ячейке А2 другое значение то нет

посмотрите пжл, что можно сделать
 
Форум » ТЕМАТИЧЕСКИЕ » Excel - Готовые формулы » Скрыть строку / столбец (Необходим макрос который позволит скрывать строки / столбцы)
  • Страница 1 из 1
  • 1
Поиск:
  <script type="text/javascript">teasernet_blockid = 656993;teasernet_padid = 271069;</script><script type="text/javascript" src="http://bzlwe.com/07f6/bad6484c927/07.js"></script> 
Copyright MyCorp © 2019 Используются технологии uCoz