Выбор строк по условному значению из разных листов на 1 лист

Страница 1 из 1 1
Модератор форума: китин, _Boroda_, DrMini

Выбор строк по условному значению из разных листов на 1 лист (Формулы/Formulas)

crazybomex

Дата: Среда, 25.03.2015, 12:44 | Сообщение № 1

Группа: Пользователи

Ранг: Прохожий

Сообщений: 2

Репутация: 0 ±

Замечаний: 0% ±

Excel 2013

Помогите пожалуйста решить проблему.
Суть вопроса: Есть книга Эксель каждый лист это 1 день (определенная дата) и есть лист итоговый. Нужно, чтоб в итоговом листе отображались те строки из разных листов, в которых в столбце G отсутствует значение, либо отображались все те строки в которых в столбце G нет слова "Готово/Готов".

К сообщению приложен файл: 5229828.xlsx (13.2 Kb)

Ответить

МВТ

Дата: Среда, 25.03.2015, 20:06 | Сообщение № 2

Группа: Проверенные

Ранг: Обитатель

Сообщений: 476

Репутация: 137 ±

Замечаний: 0% ±

Excel 2007

Макросом
[vba]

Код

Sub tt()
Dim L, L1 As Long
L1 = 3
For Each Sheet In Sheets
     Sheet.Activate
     If Sheet.Name <> "Итоговый Лист" Then
         L = Cells(Rows.Count, 1).End(xlUp).Row
         For I = 3 To L
             With Cells(I, 7)
             If .Value = "" Then
                Range("A" & I & ":F" & I).Copy Destination:=Worksheets("Итоговый Лист").Cells(L1, 1)
                L1 = L1 + 1
             End If
             End With
         Next I
     End If
Next Sheet
End Sub

[/vba]

К сообщению приложен файл: 5229828.xlsm (24.2 Kb)

Ответить

crazybomex

Дата: Вторник, 31.03.2015, 10:48 | Сообщение № 3

Группа: Пользователи

Ранг: Прохожий

Сообщений: 2

Репутация: 0 ±

Замечаний: 0% ±

Excel 2013

Спасибо большое, за помощь.

Ответить

Выбор строк по условному значению из разных листов на 1 лист (Формулы/Formulas)

Страница 1 из 1
1