Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Удаление строк при преобразовании таблицы, если значение=0 - Мир MS Excel

  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_, DrMini  
Удаление строк при преобразовании таблицы, если значение=0
chikko Дата: Понедельник, 20.04.2015, 15:53 | Сообщение № 1
Группа: Пользователи
Ранг: Новичок
Сообщений: 20
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
В продолжение темы Преобразование таблицы, прошу помочь с формулой (если это можно сделать формулой), чтобы удалялись (или не добавлялись изначально) строки, значение которых в параметрах равно нулю. В примере - Таблица 2, столбец E покрашен желтым, указал, какие строки надо удалить.
Возможно, проще будет сразу брать таблицу 2 из примера и работать с ней, чем добавлять что-то в формулу при преобразовании таблицы.
К сообщению приложен файл: 1577874.xlsx (10.3 Kb)
 
Ответить
СообщениеВ продолжение темы Преобразование таблицы, прошу помочь с формулой (если это можно сделать формулой), чтобы удалялись (или не добавлялись изначально) строки, значение которых в параметрах равно нулю. В примере - Таблица 2, столбец E покрашен желтым, указал, какие строки надо удалить.
Возможно, проще будет сразу брать таблицу 2 из примера и работать с ней, чем добавлять что-то в формулу при преобразовании таблицы.

Автор - chikko
Дата добавления - 20.04.2015 в 15:53
DJ_Marker_MC Дата: Понедельник, 20.04.2015, 16:16 | Сообщение № 2
Группа: Друзья
Ранг: Ветеран
Сообщений: 991
Репутация: 213 ±
Замечаний: 0% ±

Excel 2019
Добрый день. Для желтого столбца формула
Код
=ЕСЛИ(И(ЛЕВСИМВ(C11;1)="П";D11="");"удалить";"")

и применить фильтр - не равно "удалить"
К сообщению приложен файл: 0162237.xlsx (10.6 Kb)
 
Ответить
СообщениеДобрый день. Для желтого столбца формула
Код
=ЕСЛИ(И(ЛЕВСИМВ(C11;1)="П";D11="");"удалить";"")

и применить фильтр - не равно "удалить"

Автор - DJ_Marker_MC
Дата добавления - 20.04.2015 в 16:16
Nic70y Дата: Понедельник, 20.04.2015, 16:22 | Сообщение № 3
Группа: Друзья
Ранг: Экселист
Сообщений: 9133
Репутация: 2416 ±
Замечаний: 0% ±

Excel 2010
[vba]
Код
Sub tghcn()
      Dim rng As Range
      With Range("d11:d26")
          Set rng = .Find("", , LookIn:=xlValues, lookat:=xlWhole)
          If Not rng Is Nothing Then
              Do
                  rng.EntireRow.Delete
                  Set rng = .FindNext()
              Loop While Not rng Is Nothing
          End If
      End With
End Sub
[/vba]


ЮMoney 41001841029809

Сообщение отредактировал Nic70y - Понедельник, 20.04.2015, 16:22
 
Ответить
Сообщение[vba]
Код
Sub tghcn()
      Dim rng As Range
      With Range("d11:d26")
          Set rng = .Find("", , LookIn:=xlValues, lookat:=xlWhole)
          If Not rng Is Nothing Then
              Do
                  rng.EntireRow.Delete
                  Set rng = .FindNext()
              Loop While Not rng Is Nothing
          End If
      End With
End Sub
[/vba]

Автор - Nic70y
Дата добавления - 20.04.2015 в 16:22
DJ_Marker_MC Дата: Понедельник, 20.04.2015, 16:27 | Сообщение № 4
Группа: Друзья
Ранг: Ветеран
Сообщений: 991
Репутация: 213 ±
Замечаний: 0% ±

Excel 2019
Nic70y, не совсем так. Там где написано Объект - удалять не нужно. Только параметры насколько я правильно понял.
 
Ответить
СообщениеNic70y, не совсем так. Там где написано Объект - удалять не нужно. Только параметры насколько я правильно понял.

Автор - DJ_Marker_MC
Дата добавления - 20.04.2015 в 16:27
chikko Дата: Понедельник, 20.04.2015, 16:33 | Сообщение № 5
Группа: Пользователи
Ранг: Новичок
Сообщений: 20
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
DJ_Marker_MC, спасибо, но в реальном файле, который я показать не могу больше объектов и больше параметров с разными названиями, поэтому по первой букве не пройдет.
Nic70y, как заметил уважаемый DJ_Marker_MC, требуется удалять только нулевые параметры. Объект всегда остается.
 
Ответить
СообщениеDJ_Marker_MC, спасибо, но в реальном файле, который я показать не могу больше объектов и больше параметров с разными названиями, поэтому по первой букве не пройдет.
Nic70y, как заметил уважаемый DJ_Marker_MC, требуется удалять только нулевые параметры. Объект всегда остается.

Автор - chikko
Дата добавления - 20.04.2015 в 16:33
Nic70y Дата: Понедельник, 20.04.2015, 16:35 | Сообщение № 6
Группа: Друзья
Ранг: Экселист
Сообщений: 9133
Репутация: 2416 ±
Замечаний: 0% ±

Excel 2010
Сдаюсь, не врубился, по сслыке не ходил (лень) :(


ЮMoney 41001841029809
 
Ответить
СообщениеСдаюсь, не врубился, по сслыке не ходил (лень) :(

Автор - Nic70y
Дата добавления - 20.04.2015 в 16:35
Manyasha Дата: Понедельник, 20.04.2015, 17:16 | Сообщение № 7
Группа: Модераторы
Ранг: Старожил
Сообщений: 2198
Репутация: 902 ±
Замечаний: 0% ±

Excel 2010, 2016
chikko, здравствуйте. А если так:
Код
=ЕСЛИ((СЧЁТЕСЛИ($C$4:$C$7;G11)=0)*(H11="")>0;"удалить";"")
К сообщению приложен файл: 1577874_1.xlsx (10.6 Kb)


ЯД: 410013299366744 WM: R193491431804
 
Ответить
Сообщениеchikko, здравствуйте. А если так:
Код
=ЕСЛИ((СЧЁТЕСЛИ($C$4:$C$7;G11)=0)*(H11="")>0;"удалить";"")

Автор - Manyasha
Дата добавления - 20.04.2015 в 17:16
chikko Дата: Понедельник, 20.04.2015, 17:54 | Сообщение № 8
Группа: Пользователи
Ранг: Новичок
Сообщений: 20
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
Manyasha, спасибо, так работает. Помогите добить эту таблицу, последний вопрос здесь - Нумерация
 
Ответить
СообщениеManyasha, спасибо, так работает. Помогите добить эту таблицу, последний вопрос здесь - Нумерация

Автор - chikko
Дата добавления - 20.04.2015 в 17:54
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2025 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!