Скрыть строку / столбец

Дата: Вторник, 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 другое значение то нет

посмотрите пжл, что можно сделать