Note: The other languages of the website are Google-translated. Back to English

 Як приховати кілька Excel порожніх рядків або стовпців одночасно в Excel?

Щоб приховати чи видалити порожні рядки або стовпці, це може допомогти вам ущільнити робочий аркуш, у цій статті я представив вам кілька швидких способів приховати чи видалити порожні рядки або стовпці на аркуші Excel.

Швидко сховайте кілька порожніх рядків або стовпців за допомогою коду VBA

Швидко видаліть кілька порожніх рядків або стовпців за допомогою Kutools для Excel


стрілка синя права міхур Швидко сховайте кілька порожніх рядків або стовпців за допомогою коду VBA

Наступний код VBA може допомогти вам швидко і легко приховати кілька порожніх рядків або стовпців на аркуші.

1. Утримуйте клавішу ALT + F11 ключі, щоб відкрити Microsoft Visual Basic для додатків вікна.

2. Натисніть Insert > Модуліта вставте наступний код у Модулі Вікно

Код VBA: приховання декількох порожніх рядків на аркуші

Sub HideEmpties()
'Updateby Extendoffice
    Dim xRg As Range
    Dim xTxt As String
    Dim xCell As Range
    Dim I As Long
    On Error Resume Next
    If ActiveWindow.RangeSelection.Count > 1 Then
      xTxt = ActiveWindow.RangeSelection.AddressLocal
    Else
      xTxt = ActiveSheet.UsedRange.AddressLocal
    End If
    Set xRg = Application.InputBox("Please select the data range:", "Kutools for Excel", xTxt, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    On Error Resume Next
    For I = 1 To xRg.Row + xRg.Rows.Count
        If Application.WorksheetFunction.CountA(xRg.Rows(I)) = 0 Then
            xRg.Rows(I).EntireRow.Hidden = True
        End If
    Next
End Sub

3. Потім натисніть F5 клавішу для запуску цього коду, і відобразиться підказка, щоб нагадати вам про вибір діапазону даних, який потрібно приховати порожні рядки, див. знімок екрана:

doc приховати порожні рядки 4

4. А потім клацніть OK кнопки, порожні рядки відразу приховані, див. знімок екрана:

doc приховати порожні рядки 5

примітки: Щоб приховати кілька порожніх стовпців, застосуйте такий код VBA:

Код VBA: приховання кількох порожніх стовпців на аркуші

Sub HideEmpties()
'Updateby Extendoffice
    Dim xRg As Range
    Dim xTxt As String
    Dim xCell As Range
    Dim I As Long
    On Error Resume Next
    If ActiveWindow.RangeSelection.Count > 1 Then
      xTxt = ActiveWindow.RangeSelection.AddressLocal
    Else
      xTxt = ActiveSheet.UsedRange.AddressLocal
    End If
    Set xRg = Application.InputBox("Please select the data range:", "Kutools for Excel", xTxt, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    On Error Resume Next
    For I = 1 To xRg.Column + xRg.Columns.Count
        If Application.WorksheetFunction.CountA(xRg.Columns(I)) = 0 Then
            xRg.Columns(I).EntireColumn.Hidden = True
        End If
    Next
End Sub

стрілка синя права міхур Швидко видаліть кілька порожніх рядків або стовпців за допомогою Kutools для Excel

У цьому розділі я розповім про те, як видалити кілька порожніх рядків або стовпців, які ви не бажали, у діапазоні, аркуші чи книзі. Kutools для ExcelАвтора Видалити приховані (видимі) рядки та стовпці утиліта може допомогти вам вирішити це завдання якомога швидше.

Kutools для Excel : з більш ніж 300 зручними надбудовами Excel, які можна спробувати без обмежень протягом 30 днів. 

після установки Kutools для Excel, будь ласка, виконайте наступне:

1. Виберіть діапазон даних, для якого потрібно видалити порожні рядки або стовпці, а потім клацніть Кутулс > видаляти > Видалити приховані (видимі) рядки та стовпці, див. скріншот:

2, в Видалити приховані (видимі) рядки та стовпці діалогове вікно, виберіть У вибраному діапазоні in Заглядати випадаючий список (ви також можете вибрати інший варіант у цьому випадаючому списку, як вам потрібно), виберіть ряди or Колони від Тип видалення розділ, і виберіть Пусті ряди or Пусті стовпці під Детальний тип розділ, див. знімок екрана:

doc приховати порожні рядки 2

3. А потім клацніть Ok кнопки, порожні рядки або стовпці у виділенні були видалені відразу. Дивіться знімок екрана:

doc приховати порожні рядки 3

примітки: За допомогою цієї функції ви також можете видаляти приховані рядки або стовпці, видимі рядки або стовпці у виділенні, аркуші або книзі, як вам потрібно.

Клацніть безкоштовно завантажити Kutools для Excel зараз!


Найкращі інструменти для підвищення продуктивності офісу

Kutools для Excel вирішує більшість ваших проблем і збільшує продуктивність на 80%

  • Повторне використання: Швидко вставте складні формули, діаграми і все, що ви використовували раніше; Шифрувати комірки з паролем; Створити список розсилки та надсилати електронні листи ...
  • Супер формула бар (легко редагувати кілька рядків тексту та формули); Макет читання (легко читати та редагувати велику кількість комірок); Вставте у відфільтрований діапазон...
  • Об’єднати клітинки / рядки / стовпці без втрати даних; Вміст розділених комірок; Об'єднати повторювані рядки / стовпці... Запобігання дублюючим клітинам; Порівняйте діапазони...
  • Виберіть Повторюваний або Унікальний Рядки; Виберіть Пусті рядки (усі клітинки порожні); Супер знахідка та нечітка знахідка у багатьох робочих зошитах; Випадковий вибір ...
  • Точна копія Кілька клітинок без зміни посилання на формулу; Автоматичне створення посилань на кілька аркушів; Вставте кулі, Прапорці та інше ...
  • Витяг тексту, Додати текст, Видалити за позицією, Видаліть пробіл; Створення та друк проміжних підсумків підкачки; Перетворення вмісту комірок та коментарів...
  • Супер фільтр (зберегти та застосувати схеми фільтрів до інших аркушів); Розширене сортування за місяцем / тижнем / днем, частотою та іншим; Спеціальний фільтр жирним, курсивом ...
  • Поєднайте робочі зошити та робочі аркуші; Об’єднати таблиці на основі ключових стовпців; Розділіть дані на кілька аркушів; Пакетне перетворення xls, xlsx та PDF...
  • Понад 300 потужних функцій. Підтримує Office / Excel 2007-2019 та 365. Підтримує всі мови. Простота розгортання на вашому підприємстві чи в організації. Повна функція 30-денної безкоштовної пробної версії. 60-денна гарантія повернення грошей.
вкладка kte 201905

Вкладка Office забезпечує інтерфейс з вкладками для Office і значно спрощує вашу роботу

  • Увімкніть редагування та читання на вкладках у Word, Excel, PowerPoint, Publisher, Access, Visio та Project.
  • Відкривайте та створюйте кілька документів на нових вкладках того самого вікна, а не в нових вікнах.
  • Збільшує вашу продуктивність на 50% та зменшує сотні клацань миші для вас щодня!
дно офісної таблиці
Коментарі (0)
Поки немає оцінок. Оцініть першим!
There are no comments posted here yet
Залишайте свої коментарі
Публікація як гість
×
Оцініть цю публікацію:
0   Персонажі
Рекомендовані місця