Не работает удаление строки

Как програмно удалить текущую строку из табличного поля.

Не могу разобраться толком в связке табличное поле — данные табличного поля. Вобщем есть ТП ХХХ содержащее древо значений с темже именем ХХХ, есть необходимость удалить програмно строку где стоит курсор.

Ругается что строка не принадлежит коллекции. Получается что табличное поле и древо разные коллекции, но как тогда связать текущую строку табличного поля с программным древом.

(1) а если не найдет, то функция Найти возвращает «НЕОПРЕДЕЛЕНО», тогда при Удалить возникнет Искл.Ситуация.

Лучше сначало найти, проверить на неопределено, если все нормально тогда удалять

(3) (5) Табличное поле ХХХ, что в интерфейсе, и древо ХХХ, что в памяти, формально разные наборы, связанные вместе, поэтому получение индексов и поиск по текущим строкам не работаю, я так понял.

(1) Получается единственный выход искать по значениям ссылок из колонок-строк Табличного поля в Древе и потом удалять. Для табличного поля не обнаружил получение номера строки или его индекса ваще ничего подобного.

Как вариант можно прикрутить контекстное меню, но я эксперементирую, охота чтоб програмно происходило.

Мать моя, о чем вы говорите. Деревом просто надо пользоваться ВНИМАТЕЛЬНО:

(8) Работает, Большое спасибо. Тока не Владелец а Родитель.

Теперь помоги ликвидировать пробел, значит это все таки не разные наборы, когда обращаешься программно к древу через переменную ХХХ и через ЭлементыФормы.ХХХ обращение происходит к одному и томуже набору данных?

Источник

Удалить строку

Эта версия Orchestrator достигла конца поддержки, мы рекомендуем выполнить обновление до Orchestrator 2019.

Действие Удалить строку удаляет строки из текстового файла. Действие Удалить строку используется для удаления устаревших строк текста из текстового файла.

Это действие заменяет функциональные возможности устаревшего действия «Управление текстовым файлом» из Opalis 6,3.

Настройка действия «Удаление строки»

Перед настройкой действия «Удаление строки» необходимо определить следующее:

Имя файла, из которого нужно удалить строку.

Тип кодировки файла, который будет использоваться файлом для удаления строки.

Номера строк, которые необходимо удалить.

Используйте следующие сведения для настройки действия «Удаление строки».

Вкладка «Подробные сведения»

Параметры	Инструкции по настройке
Файл	Введите путь и имя файла, из которого нужно удалить текст, или нажмите кнопку с многоточием (. ) и найдите его.
Кодировка файла.	Нажмите кнопку с многоточием (. ) и выберите формат, в котором кодируется файл, из раскрывающегося списка Кодировка файла. Убедитесь, что выбран правильный формат кодирования. Если файл использует другой формат кодирования, действие завершается ошибкой.
Номера строк	Введите номера строк текста, которые необходимо удалить из указанного файла.

Чтобы указать диапазон строк, используйте дефис: 1-3. Это приведет к удалению строк с 1 до 3.

Чтобы указать конкретные строки, используйте запятую: 5, 7, 9. Это приведет к удалению строк 5, 7 и 9.

Объединение диапазона и отдельных строк: 1 – 3, 5, 7, 9. Это приведет к удалению строк с 1 до 3, а строки 5, 7 и 9.

Чтобы указать от конкретной строки до последней строки файла, введите номер строки, дефис и конец: 4-конец. Это приведет к удалению строк 4 на последнюю строку файла.

Чтобы указать из определенной строки строку относительно последней строки файла, введите номер строки, дефис, знак «меньше» и номер строки относительно конечной строки: 4-END —>

Источник

Как програмно удалить текущую строку из табличного поля.

Не могу разобраться толком в связке табличное поле — данные табличного поля. Вобщем есть ТП ХХХ содержащее древо значений с темже именем ХХХ, есть необходимость удалить програмно строку где стоит курсор.

Ругается что строка не принадлежит коллекции. Получается что табличное поле и древо разные коллекции, но как тогда связать текущую строку табличного поля с программным древом.

(1) а если не найдет, то функция Найти возвращает «НЕОПРЕДЕЛЕНО», тогда при Удалить возникнет Искл.Ситуация.

Лучше сначало найти, проверить на неопределено, если все нормально тогда удалять

(3) (5) Табличное поле ХХХ, что в интерфейсе, и древо ХХХ, что в памяти, формально разные наборы, связанные вместе, поэтому получение индексов и поиск по текущим строкам не работаю, я так понял.

(1) Получается единственный выход искать по значениям ссылок из колонок-строк Табличного поля в Древе и потом удалять. Для табличного поля не обнаружил получение номера строки или его индекса ваще ничего подобного.

Как вариант можно прикрутить контекстное меню, но я эксперементирую, охота чтоб програмно происходило.

Мать моя, о чем вы говорите. Деревом просто надо пользоваться ВНИМАТЕЛЬНО:

(8) Работает, Большое спасибо. Тока не Владелец а Родитель.

Теперь помоги ликвидировать пробел, значит это все таки не разные наборы, когда обращаешься программно к древу через переменную ХХХ и через ЭлементыФормы.ХХХ обращение происходит к одному и томуже набору данных?

Источник

Удаление пустых строк в документе Microsoft Word

Если вам часто приходится работать в Word с документами большого объема, наверняка вы, как и многие другие пользователи, сталкивались с такой проблемой, как пустые строки. Добавляются они с помощью нажатий клавиши «ENTER» один, а то и более раз, а делается это для того, чтобы визуально разделить фрагменты текста. Вот только в некоторых случаях пустые строки не нужны, а значит, их нужно удалить.

Вручную удалять пустые строки слишком хлопотно, да и просто долго. Именно поэтому в данной статье речь пойдет о том, как за раз удалить все пустые строки в документе Word. Поможет нам в решении этой задачи функция поиска и замены, о которой мы писали ранее.

1. Откройте документ, в котором нужно удалить пустые строки, и нажмите кнопку «Заменить» на панели быстрого доступа. Находится она во вкладке «Главная» в группе инструментов «Редактирование».

Совет: Вызвать окно «Заменить» можно и с помощью горячих клавиш — просто нажмите «CTRL+H» на клавиатуре.

2. В открывшемся окне установите курсор в строке «Найти» и нажмите кнопку «Больше», расположенную внизу.

3. В выпадающем списке «Специальный» (раздел «Заменить») выберите «Знак абзаца» и вставьте его дважды. В поле «Найти» появятся следующие символы: «^p^p» без кавычек.

4. В поле «Заменить на» введите «^p» без кавычек.

5. Нажмите кнопку «Заменить все» и дождитесь, пока процесс замены будет завершен. Появится уведомление о количестве выполненных замен. Пустые строки будут удалены.

В случае, если пустые строки в документе все еще остались, значит, они были добавлены путем двойного, а то и тройного нажатия клавиши «ENTER». В таком случае необходимо проделать следующее.

1. Откройте окно «Заменить» и в строке «Найти» введите «^p^p^p» без кавычек.

2. В строке «Заменить на» введите «^p» без кавычек.

3. Нажмите «Заменить все» и дождитесь, пока замена пустых строк будет завершена.

Вот так просто можно удалить пустые строки в Word. При работе с большими документами, состоящими из десятков, а то и сотен страниц, такой метод позволяет заметно сэкономить время, заодно уменьшив общее количество страниц.

Помимо этой статьи, на сайте еще 12333 инструкций.
Добавьте сайт Lumpics.ru в закладки (CTRL+D) и мы точно еще пригодимся вам.

Отблагодарите автора, поделитесь статьей в социальных сетях.

Источник

В excel не удаляется строка

Удаление пустых строк в таблице Microsoft Excel

​Смотрите также​: А как исправить​ = » «​ сделать стандартным УФ(Условным​Почитай тут:​ это?​ но это не​ На форуме почти​ отвлекала от работы.​Программа отмечает пустые ячейки.​ Они мешают работе,​ 21. Получится так.​Далее перейдите во вкладку​ таблицы. Однако можно​ где имеются данные.​ столбцы с листа».​ поиск и удаление​Таблицы, в которых присутствуют​

​ название темы?)))​ Then​

Стандартное удаление

​ Форматированием)​И тут:​Sub ReduceSize()​ решает две проблемы:​ каждый третий пост​ Думал, что впоследствии​ На главной странице​ отвлекают.​Эти скрытые строки (18​ «Главная» и кликните​ ускорить этот процесс,​ В этом случае,​ После этого, нужный​ может занять значительное​ пустые строки, выглядят​Pelena​If delRa Is​

​Sub Макрос()​KuklP​Dim lAntR As​ скроллинга и размера.​ касается определения последней​ данные еще понадобятся.​ находим вкладку «Ячейки»,​

​Некоторые формулы могут работать​ и 21) нам​ по кнопке «Сортировка​

​ пропустив этапы по​ может произойти смещение​ столбец будет удален.​ время. В этом​ не очень эстетично.​: Название темы Вы​ Nothing Then​Dim x As​: Это макрос. Попробуйте​ Long​R Dmitry​ строки диапазона. И​

​ Не понадобились –​ нажимаем «Удалить».​ некорректно. Использовать ряд​ нужно удалить.​ и фильтр», а​

Сортировка

​ вызову контекстного меню.​ ячеек, и таблица​Урок: Сортировка в Microsoft​ случае, должна помочь​ К тому же,​ сами уже не​Set delRa =​ Range: Application.ScreenUpdating =​ выполнить его в​Dim iAntK As​: Урезал таблицу до​ может не нужно​

​ скрытые строки можно​Результат – заполненный диапазон​ инструментов в отношении​Выделяем ячейки нового​ в контекстном меню​ Для этого просто​ нарушится.​ Excel​ сортировка.​ из-за лишних строк​ сможете исправить, слишком​ Cells(i, 1)​ False​ своем файле. Вам​ Integer​ 25 строк, все​ будет удалять остаток​ удалить: они влияют​ «без пустот».​ не полностью заполненного​ пустого столбца D.​

​ выберите «Фильтр».​ выделите ненужные строки​Как видим, существует несколько​Ещё одним вариантом скрыть​Выделяем всю табличную область.​ навигация по ним​ давно была начата​Else​Set x =​ он никак не​Dim aR() As​

​ по прежнему, размер​ листа. Вам подскажут​ на формулы, мешают.​Внимание! После удаления часть​ диапазона невозможно. Научимся​ Затем, чтобы выделить,​Как только вы это​

​ и нажмите сочетание​ способов удаления пустых​

​ пустые ячейки является​ Кликаем по ней​ может усложниться, так​ тема, предложите новое​Set delRa =​

​ [C:C].Find(0, , ,​ навредит. Ваш файл​ Single​ книги с одним​ решение поэффективней. С​В тренировочной таблице скрыты​ ячеек перескакивает вверх​ быстро удалять пустые​

​ только, видимые строки​ сделаете, в шапке​ клавиш «CTRL+-«.​ ячеек из таблицы.​ применение фильтра.​ правой кнопкой мыши,​ как придется прокручивать​ в посте, я​ Union(Cells(i, 1), delRa)​ xlWhole)​ не пострадает. Будет​Dim aK() As​ листом 1,5Мб О_о​ уважением, Сергей.​ ряды 5, 6,​

​ – данные могут​ ячейки в конце​

Применение фильтра

​ (без скрытых), нажимаем​ столбцов появятся выдающие​Также есть альтернатива. Вы​

​ Каким именно способом​Выделяем всю область таблицы,​ и в контекстном​ больший диапазон ячеек​ исправлю​End If​If Not x​ создан новый -​ Single​Сжал в rar-архив​

​Евгений Шульц​ 7:​ перепутаться. Поэтому для​ или середине таблицы.​ на функцию «Найти​ списки, вам необходимо​

​ можете после выделения​ лучше воспользоваться, зависит​ и, располагаясь во​ меню выбираем пункт​

​ для перехода из​-=Dj=-​End If​ Is Nothing Then​

​ (2)+имя Вашего файла.​Dim n As​

Выделение ячеек

​ — 20Кб. Скрыть​: Так тоже делал.​Будем их удалять.​ перекрывающихся диапазонов инструмент​ Будем использовать простые​ и выделить» и​ развернуть один из​ строк перейти во​ от сложности таблицы,​ вкладке «Главная», делаем​ «Сортировка». После этого,​ начала таблицы в​: Название: «Удаление строки​Next​[C:C].ColumnDifferences(x).EntireRow.Hidden = True​

​ Так мне удалось​ Integer​ неиспользуемые строки можно,​ После этого закрываю​Переходим на «Файл»-«Сведения»-«Поиск проблем»​

​ не подходит.​ средства, доступные пользователю​ выбираем функцию «Выделить​ них (любой).​ вкладку «Главная» и​ и от того,​ клик по кнопке​ появляется ещё одно​

​ конец. Давайте выясним,​ при определенном значении​If Not delRa​

​ActiveSheet.UsedRange.SpecialCells(xlCellTypeVisible).EntireRow.Delete​ уменьшить Ваш пример​Dim sFil1 As​ но это не​ файл, открываю, Ctrl+End​ — инструмент «Инспектор​Полезный совет! Сочетание клавиш​ любого уровня.​ группу ячеек».​В меню, которое появилось,​ там на панели​

​ как именно по​ «Сортировка и фильтр»,​ меню. В нём​ какие существуют способы​ в столбце С»​ Is Nothing Then​Rows.Hidden = False​ с 1.5мб до​ String​ решает две проблемы:​ — 65536 строка.​ документов».​ для удаления выделенной​

​Чтобы показать на примере,​

Четыре способа, как в Excel удалить пустые строки

​В появившемся окне ставим​ надо снять галку​ инструментов из выпадающего​ ней разбросаны пустые​ которая расположена в​ нужно выбрать один​ удаления пустых строк​Pelena​ delRa.EntireRow.Interior.Color = 255​End If​ 18кб. Если интересно,​Dim sFil2 As​ скроллинга и размера.​И скроллер не​В отрывшемся окне ставим​ строки в Excel​ как удалить лишние​ галочку у функции​ с пункта «Пустые»​ списка «Удалить» выбрать​ строки (располагаются одним​ блоке настроек «Редактирование».​

Простое удаление

​ из следующих пунктов:​ в программе Microsoft​: Тему переименовала, ответы​End Sub​End Sub​ пошаговые инструкции Вам​ String​да у вас​ меняется.​

​ галочку напротив «Скрытые​ CTRL+«-». А для​ строки, для демонстрации​

1. ​ «Только видимые ячейки».​ и нажать «ОК».​ пункт «Удалить строки​
2. ​ блоком, или перемешаны​ В появившемся меню,​ «Сортировка от А​
3. ​ Excel, и как​ открыла​

​KuklP​Manyasha​ либо я, либо​Dim sKat As​ лист волшебный удалите​Guest​ строки и столбцы».​ ее выделения можно​ порядка действий возьмем​Нажимаем «ОК». Получится так​Вот и все, как​ с листа», что​ со строками, заполненными​ делаем переход по​ до Я», «От​ их убрать быстрее​ant6729​: Вопросов как раз-таки​

​:​ любой из планетян​ String​ его а данные​: Извините Сергей, не​ Нажимаем «Проверить».​ нажать комбинацию горячих​ таблицу с условными​ – сплошной выделенный​ видно, третий способ,​

Сортировка

​ также довольно удобно.​ данными).​ пункту «Фильтр».​ минимального к максимальному»,​ и проще.​: На счет последнего​ два, как и​ZatX​ дадут. Это не​Dim sArk As​ вставьте на новый​ понял, что значит​Через несколько секунд программа​ клавиш SHIFT+ПРОБЕЛ.​

​ данными:​ диапазон прервется у​

1. ​ как удалить лишние​Первый способ, как в​Автор: Максим Тютюшев​
2. ​В ячейках шапки таблицы​ или «От нового​Скачать последнюю версию​ не уверен, но​
3. ​ пишет Вам модератор​, у нас не​ сложно. Попробуйте.​ String​KuklP​ пример на десяток​

​ отображает результат проверки.​​Пример 1. Сортировка данных​ скрытых ячеек.​ строки в Excel,​ Excel удалить пустые​Работая с огромным объемом​ появляется характерный значок.​ к старому». Какой​ Excel​

Использование фильтра

​ работает.​ и они абсолютно​ принято помогать в​KuklP​sFil1 = ActiveWorkbook.Name​: Ну вот, пока​

1. ​ строк ? Что​Нажимаем «Удалить все». На​Чтобы удалить одинаковые строки​ в таблице. Выделяем​Теперь, не убирая​ намного удобнее, чем​ строки, мы разобрали.​ данных в таблицах​
2. ​ Кликаем по этому​ именно из перечисленных​Самым известным и популярным​Ответ удален. Вопрос не​ разные. Давайте все​ темах с нарушениями​
3. ​: 🙂 Это одно​sKat = ActiveWorkbook.Path​ я шушукался в​ выложить ?​ экране появится соответствующее​ в Excel, выделяем​
4. ​ всю таблицу. Открываем​ выделения ячеек, в​ некоторые из предыдущих.​ Однако он не​

​ «Эксель», ненароком можно​ значку в любом​ пунктов будет находиться​ способом удаления пустых​ относится к теме​ темы будем называть​

Выделение

​ Правил форума.​ и то же.:-)​sArk = ActiveSheet.Name​ оффсайте R Dmitry​KuklP​ уведомление.​ всю таблицу. Переходим​ вкладку «Данные» -​ первой ячейке выделенного​Напоследок расскажем еще об​

1. ​ очень удобен, если​ оставить пустые строки,​ на ваш выбор​ в меню, зависит​ строк, является использование​
2. ​-=Dj=-​ «Эксель» и валить​Почитайте на досуге:​
3. ​Alex_ST​lAntR = Cells.Find(What:=»*»,​ уже успел.​: Вашу таблицу в​
4. ​В результате проделанной работы​ на вкладку «Данные»​ инструмент «Сортировка и​ столбца пишем цифру​ одном интересном способе,​

​ нужно удалить много​ что в некоторых​ столбце.​ от типа данных,​ контекстного меню программы​: ant6729, По поводу​ в них все,​ Ответы в темах​: Продолжение темы про​

Как удалить скрытые строки в Excel.

Как удалить пустые строки в Excel быстрыми способами

​ самом деле там​И код надо​ — виноват, извините.​ до нелогичных размеров»​For n =​ да. Откуда вес,​

​ все известны. Гадать,​ с помощью встроенного​ которых находятся повторяющиеся​ сортировку «от минимального​ цифра «1».​ с помощью специального​ удалить пустые строки​ строки. Будет представлено​ все пустые строки​ переместятся в самый​ правой кнопкой мыши.​

Как в таблице Excel удалить пустые строки?

​ стоит пробел в​ оформлять тегами. Знак​ а на счет​ ( )​ 1 To lAntR​ так и не​

​ что у Вас​ функционала программы Excel.​ значения. Так как​ к максимальному».​Отображаем скрытые строки.​ инструмента. Но обо​ при помощи инструмента​ четыре способа, которые​ исчезли, так как​ низ таблицы. Теперь,​ В раскрывшемся контекстном​ ячейках.​

​ # на панели​ 1 вопрос -​-=Dj=-​

​aR(n) = Rows(n).RowHeight​ понял. Скролл работает​ не так, нудно​Евгений Шульц​ нужно удалять повторяющиеся​Пустые строки после сортировки​ В ячейках скрытых​ всем по порядку:​ «Сортировка».​

​ помогут вам это​ они были отфильтрованы.​ мы можем удалить​ меню делаем переход​Pelena​ редактирования:​ 1 тема, так​: Здравствуйте.​Next n​ и вниз и​ и малоперспективно. Поэтому​: Как удалить неиспользуемые​ строки, то должны​

​ по возрастанию оказываются​ строк нет цифры​Снова выделите всю таблицу,​Итак, вам необходимо сделать​ сделать. Советуется дочитать​Урок: Как использовать автофильтр​

​ эти ячейки любым​ по пункту «Удалить…».​: Опять двадцать пять!​-=Dj=-​ вопрос по сути​Помогите с макросами,​For n =​ вбок. В том​

​ и прошу: заголовок​ строки ниже рабочей​

​ быть выделены все​ внизу диапазона.​ «1». Получится так.​ в которой находятся​

​ следующее:​ статью до финала,​

​ в Microsoft Excel​ из тех способов,​ Можно не вызывать​ При чём тут​: В таком случае,​ то один. вот​

​ пожалуйста.​ 1 To iAntK​ числе и на​ таблицы, несколько строк​ области?​ столбцы.​Если порядок значений важен,​

​Далее, выделяем столбец​

Как удалить повторяющиеся строки в Excel?

​ нужные вам данные​Выделите всю таблицу. Для​ чтобы в конце​Ещё один способ удаления​ о которых шла​ контекстное меню, а​ выделение?! В теме​

​ второй вопрос просто​ сам нашел решение,​Нужно удалить все​aK(n) = Columns(n).ColumnWidth​ тяжелом файле.​ данных и подвал(это​Excel 2003, рабочая​После нажатия ОК Excel​

​ то до сортировки​ D. Устанавливаем сортировку​

Как удалить каждую вторую строку в Excel?

​ и непосредственно пустые​ этого можно нажать​ принять для себя​

​ использует выделение группы​ речь в первой​ набрать на клавиатуре​

1. ​ про удаление строки!​ не нужно было​ макрос один просто​ строки в таблице,​Next n​Юрий М​ там где подписи​ область до 400​ формирует мини-отчет вида:​ необходимо вставить пустой​ «От минимального к​ строки.​ кнопку «CTRL+A».​ решение, каким способом​
2. ​ пустых ячеек. Чтобы​ части урока.​ сочетание клавиш «Ctrl+-».​
3. ​-=Dj=-​ задавать. ​ изменил условие и​
4. ​ в которых столбец​Application.CutCopyMode = False​: У кого есть​

​ начальников). От этого​ строки.​Проредить таблицу можно с​

Как удалить скрытые строки в Excel?

​ столбец, сделать сквозную​ максимальному» или «От​Перейдите во вкладку «Главная»​Нажмите правую кнопку мыши​ пользоваться, так как​ использовать этот способ,​Если критически важен порядок​Появляется небольшое окошко, в​, создайте уже отдельную​KuklP​

​ действие.​ С равен нулю.​Range(Cells(1, 1), Cells(lAntR,​

​ две версии? Сохраните​

1. ​ можно будет плясать.​При определении последней​ помощью макроса. Например,​
2. ​ нумерацию. После сортировки​ максимального к минимальному».​ и нажмите по​ на таблице и​
3. ​ они в достаточной​ сначала выделяем всю​
4. ​ размещения ячеек в​ котором нужно указать,​ тему по этому​

​: Почему? В новой​Удаление​Выделить сроки цветом,​

​ iAntK)).Copy​ в другой и​ А так, все​ ячейки показывает на​ такого:​

Как удалить неиспользуемые строки ниже рабочей области

​ и удаления пустых​​ Все строки, с​ «Найти и выделить».​ в меню кликните​
​ степени отличаются друг​ таблицу. Затем, находясь​ таблице, то перед​
​ что конкретно мы​ вопросу​ теме. Решается одной​Sub delete()​ в которых столбец​Workbooks.Add​ потом обратно. Что​ только гадают.​
​ 65536 строку, до​А можно ручками. Предлагаем​ строк вновь отсортировать​ пустыми ячейками переместились​В меню, которое появится,​ по строке «Сортировка».​ от друга.​ во вкладке «Главная»,​ тем как совершить​ хотим удалить. Выставляем​KuklP​

​ строкой. Да и​​Dim x, i&,​ G или H​sFil2 = ActiveWorkbook.Name​
​ получится — будут​KuklP​ нее же и​ простенький способ, доступный​ данные по вставленному​ вниз таблицы.​
​ вам необходимо нажать​

​Из дополнительного меню вам​​Для начала разберемся, как​ кликаем по кнопке​ сортировку, вставляем в​ переключатель в позицию​: Отож. Я уж​ первый вопрос можно​ delRa As Range​ пуст.​ActiveSheet.Name = sArk​ ли изменения?​: Я вообще-то имел​ полоса прокрутки крутит,​

​ каждому пользователю.​​ столбцу с нумерацией.​Осталось их выделить и​ на строку «Выделение​ необходимо выбрать один​
​ в Excel удалить​ «Найти и выделить»,​

​ середину таблицы ещё​​ «строку». Жмем на​ думал, раз модеры​ без цикла и​x = Range(«C1:C»​Прошу сделать двумя​

​ActiveSheet.Paste​​KuklP​ ввиду файл сВашей​ из-за этого в​В конце таблицы делаем​Пример 2. Фильтр. Диапазон​ удалить удалить обычным​ группы ячеек».​ из пунктов, в​ пустые строки самым​ которая расположена на​ один столбец.​ кнопку «OK».​ не против, в​ короче, просто удалите​ & [a65535].End(xlUp).Row).Value​ отдельными макросами.​Application.CutCopyMode = False​: Юрий М имел​

​ таблицей в 2003​​ рабочую область скроллером​ вспомогательный столбец. Заполняем​ должен быть отформатирован​ способом. какими способами​В появившемся меню, вам​ соответствии с тем,​ простым способом, который​ ленте в группе​Все ячейки этого столбца​

​После этого, все строки​​ теме каша -​

​ второй вопрос из​

​For i =​​Manyasha​For n =​

​ ввиду 2003 и​​ Экселе сохраненный. И​ практически невозможно попасть.​

​ чередующимися данными. Например,​​ как таблица с​ быстро выделить строки,​

​ нужно установить переключатель​​ какой тип данных​ используют практически все​ инструментов «Редактирование». В​ нумеруем по порядку.​ выделенного диапазона будут​
​ опубликовать и свой​ топика:​ 1 To UBound(x)​:​ 1 To lAntR​ 2007.​

​ не более 100​​В ручную не​ «о у о​ заголовками. Выделяем «шапку».​ читайте в статье​ на «пустые ячейки»​
​ находится в таблице.​ неопытные пользователи, но​ появившемся меню, кликаем​Затем, производим сортировку по​ удалены.​ вариант на второй​
​Sub DeleteNulRows()​If x(i, 1)​-=Dj=-​Rows(n).RowHeight = aR(n)​

​Евгений Шульц​​ кб. размером(в соответствии​ удаляется. Выделяю 401​ у о у»​ На вкладке «Данные»​
​ «Как выделить в​ и нажать кнопку​Как только вы сделаете​ в некоторых случаях​ по пункту «Выделение​ любому другому столбцу,​Как альтернативный вариант, можно​ вопрос​On Error Resume​ = «0» Then​, для вопросов о​Next n​

​: Прикольно, я нашел​​ с правилами форума).​ строку, далее выделяю​ и т.д. Вносим​ нажимаем кнопку «Фильтр»​ Excel ячейки, таблицу,​ «ОК».​

​ выбор, все пустые​​ именно такое удаление​ группы ячеек…».​ и удаляем перемещенные​

​ выделить ячейки в​​Привет, Леночек.​ Next​
​If delRa Is​ макросах есть своя​For n =​ волшебный лист )​
​ Еще раз с​ все неиспользуемые строки​ значения в первые​ («Сортировка и фильтр»).​
​ др.» здесь. Получилось​Теперь все пустые строки​ строки, которые были​
​ использовать лучше всего.​Открывается окно, в котором​

​ вниз ячейки, как​​ соответствующих строках, и​Pelena​With Intersect(ActiveSheet.UsedRange, Columns(3))​ Nothing Then​ ветка на форуме.​ 1 To iAntK​

​А я уж​​ уважением, Сергей.​ CTRL+SHIFT+стрелка вниз. Пробовал​
​ четыре ячейки. Потом​
​ Справа от названия​ так.​
​ выделены и вы​ в таблице, переместятся​
​Итак, чтобы удалить лишние​ переставляем переключатель в​
​ уже описывалось выше.​ находясь во вкладке​
​: Привет. Выкладывай в​.ColumnDifferences(.Find(0, , xlValues,​
​Set delRa =​ Тему перенесла.​
​Columns(n).ColumnWidth = aK(n)​ думал че с​
​Serge​ очищать это выделение​
​ выделяем их. «Цепляем»​ каждого столбца появится​

​Удаляем столбец D.​
​ можете их удалить.​
​ в ее низ​

​ пустые строки в​ позицию «пустые ячейки».​
​После этого, чтобы вернуть​ «Главная», кликнуть по​

​ новой теме​
​ xlWhole)).EntireRow.Hidden = -1​
​ Cells(i, 1)​Название Вашей темы​
​Next n​
​ руками или с​
​: У меня работает. ​ по всякому, удалять,​
​ за черный крестик​
​ стрелочка вниз. Нажимаем​

​Какими способами можно​
​ Для этого, как​ и их будет​
​ программе, вам необходимо:​
​ Жмем на кнопку​
​ порядок строк к​
​ кнопке «Удалить», которая​
​ant6729​

​.SpecialCells(12).EntireRow.Delete​Else​
​ слишком общее, дайте​
​Application.DisplayAlerts = False​
​ головой уже О_о​25Кб​
​ сохраняться, ничего не​
​ в правом нижнем​

​ – открывается окно​
​ удалить пустые, скрытые​ и в первом​ легче выделить и​
​Изначально выделить ту область​
​ «OK».​
​ тому, который уже​

​ расположена в блоке​​: Добрый вечер, а​.EntireRow.Hidden = 0​Set delRa =​ более конкретно.​Workbooks(sFil2).SaveAs sKat &​Заменить лист сложно,​KuklP​ меняется, неиспользуемая область​ углу и копируем​

​ фильтрации. Снимаем выделение​​ строки, ячейки, читайте​

​ способе, нажмите на​
​ удалить, используя способ,​

​ таблицы, которая содержит​​Как видим, после этого,​ был перед сортировкой,​ инструментов «Ячейки» на​ как удалить все​End With​ Union(Cells(i, 1), delRa)​По Правилам форума:​ «\» & «(2)»​ много данных и​: Хитрый и коварный​ остается, скроллер не​ буквы до конца​ напротив имени «Пустые».​ в статье «Как​ кнопку «Удалить» в​ который был приведен​ ненужные строки.​

​ все строки, содержащие​​ проводим сортировку в​ ленте. После этого,​

​ строки, если не​​End Sub​End If​ 1 вопрос -​ & sFil1​ перекрестных ссылок с​ Serge 007.:-)​ изменятся.​

Удаление строки при определенном значении в столбце С (Макросы/Sub)

​ диапазона.​​Таким же способом можно​
​ удалить пустые строки​ панели инструментов вкладки​
​ самым первым.​Затем нажать правую кнопку​ пустые ячейки, выделились.​ колонке с номерами​
​ сразу произойдет удаление​ содержит? (Например, слово​_Boroda_​End If​
​ 1 тема. Для​Workbooks(sFil1).Close savechanges:=True​

​ другими листами.​​Guest​​Guest​​Устанавливаем «Фильтр». Отфильтровываем последний​ удалить пустые ячейки​ в Excel» тут.​ «Главная».​
​В Excel удалить повторяющиеся​ мыши, чтобы вызвать​ Теперь жмем на​
​ строк «От минимального​ без дополнительных диалоговых​ «Вася»)​: Марина выше писала​Next​

​ второго макроса создайте​​Application.DisplayAlerts = True​Видимо придеться использовать​: а если скрыть​: Что значит -​ столбец по значению​ в строке Excel.​В Excel есть​Автор: Вадим Матузок​ строки, которые пустые,​ контекстное меню.​ уже знакомую нам​ к максимальному».​ окон.​
​Если нужно, создам​
​ еще про название​If Not delRa​ отдельную тему.​
​End Sub​ вариант со скрытием​ лишние строки?​
​ «В ручную не​ «у».​
​ Выбираем нужный столбец​
​ несколько способов разделить​
​Рассмотрим,​
​ можно при помощи​
​В списке надо нажать​

​ кнопку «Удалить», расположенную​​Как видим, строки выстроились​​Конечно, способ очень простой​​ новую тему.​Второй ответ тоже​ Is Nothing Then​ZatX​
​Евгений Шульц​ областей.​KuklP​ удаляется». ​

​Выделяем все что осталось​​ и фильтруем его​ данные одной ячейки​как удалить скрытые строки​ фильтра. Много не​ на строку «Удалить».​ на ленте в​ в прежнем порядке,​ и известный. Но,​Пробую такую запись,​ пока скрываю​ delRa.EntireRow.Delete​
​: Вот есть готовое​
​: А что это​
​Всем спасибо за​: А Серж, что​
​Вариант (как один​ после фильтрации и​
​ данные.​ на несколько ячеек.​
​ в​ разглагольствуя, перейдем непосредственно​
​После этого появится окошко,​ группе инструментов «Ячейки».​
​ исключая пустые, которые​ является ли он​
​ но не срабатывает.​
​KuklP​End Sub​
​ решение! Если я​
​ Сергей? Просто ни​
​ помощь )​
​ по-Вашему сделал?​ из многих): после​ удаляем.​
​Пример 3. Выделение группы​
​ Как зазделить числа,​
​Excel без макроса​
​ к самой инструкции:​ в котором необходимо​
​После этого, все пустые​ удалены. Теперь, нам​
​ самым удобным, быстрым​Sub delete()​
​: Саш, я думал​Выделение​ Вас правильно понял.​
​ макросами ни кодом​Михаил С.​
​Guest​ проделанных манипуляций по​
​Убираем фильтр – останутся​
​ ячеек. Выделяем всю​ коды на несколько​
​. Как в таблице​
​Изначально вам необходимо выделить​
​ выбрать, что именно​
​ строки будут удалены​ осталось только удалить​ и безопасным?​
​For x =​

​ он автоматом скроется,​​КодSub highlighter()​ Чуть подправил по​ не пользуюсь, поэтому​: Сохраненный в формате​: Урезал таблицу до​ очистке/удалению обязательно сразу​ только ячейки с​ таблицу. В главном​ составных ячстей, смотрите​ скрыть строки, смотрите​ область вашей таблицы.​ нужно удалить. В​
​ из таблицы.​ добавленный столбец с​Если пустые строки расположены​ Cells(Rows.Count, 1).End(xlUp).Row To​

​ пока модер не​​Dim x, i&,​ Вас. Попробуйте. Но​ собственно не понимаю​ 2010, файл весит​

​ 25 строк, все​​ же жмем Ctrl+Home​ «о».​ меню на вкладке​ в статье «Разделить​ в статье «Как​ Для этого, зажав​ нашем случае это​Важное замечание! Последний способ​
​ порядковыми номерами. Выделяем​
​ в одном месте,​ 1 Step -1​
​ отключит скрытие ответов.​
​ delRa As Range​ минус в том,​
​ о чем речь.​
​ 180 КБ, Но​
​ по прежнему, размер​
​ и затем Ctrl+S!​

​Вспомогательный столбец можно устранить​​ «Редактирование» нажимаем кнопку​ текст в ячейке​
​ скрыть столбцы в​ левую кнопку мыши​

​ строки, значит, выбирайте​​ нельзя использовать в​ этот столбец. Затем​ то их удаление​If Cells(x, 4).Value​​Учту на будущее.​
​x = Range(«G1:G»​ что нумерация строк​ Но если не​

​ если его опять​​ книги с одним​Z.​

​ и работать с​​ «Найти и выделить».​ Excel по столбцам».​ Excel».​ в левом верхнем​ пункт «Строку» и​ таблицах с перекрывающимися​ кликаем по кнопке​

​ будет довольно легким.​​ Like «<>*Вася*» Then​P.S. вроде ТС​ & [a65535].End(xlUp).Row).Value​

​ хромает (и то​​ сложно готов попробовать​ сохранять в 2003,​

​ листом 1,5Мб О_о​​KuklP​ «прореженной таблицей».​ Выбираем инструмент «Выделение​
​При импорте и копировании​У нас такая​

​ ее углу, перетащите​​ нажимайте «ОК». Теперь​ диапазонами, и с​ на ленте «Удалить».​ Но, если они​ Rows(x).Delete (xlShiftUp)​ адекватный, думаю исправит​For i =​ исправима) А по​

​ )​​ то 1,43 МБ​Сжал в rar-архив​: Евгений может, настало​Однажды пользователь скрыл некую​
​ группы ячеек».​​ таблиц в Excel​ таблица.​ ее в нижний​

​ все лишние строки​​ пустыми ячейкам, которые​ В раскрывшемся меню​ раскиданы по всей​Next x​ топик.​ 1 To UBound(x)​ поводу второго вопроса. ​​Казанский​

​KuklP​​ — 20Кб. Скрыть​ время выложить пример​

​ информацию в строках,​​В открывшемся окне выбираем​ могут формироваться пустые​Скроем строки 18 и​ правый.​ будут удалены из​
​ находятся в строках,​ выбираем пункт «Удалить​
​ таблице, то их​End Sub​
​-=Dj=-​
​If x(i, 1)​ так его можно​:​
​: Может еще вот​ неиспользуемые строки можно,​ на десяток строк?​
​ чтобы она не​
​ пункт «Пустые ячейки».​

Источник