2 jednoduché metody pro výběr všech neprázdných buněk v listu aplikace Excel

Pokud jsou v listu aplikace Excel data zadána do nesousedních buněk, může být výběr a kopírování dat z neprázdných buněk trochu problematické. V tomto příspěvku si nyní ukážeme 2 způsoby, jak rychle vybrat všechny neprázdné buňky.

Uživatelé aplikace Excel jsou často povinni kopírovat a vkládat data. Někdy však mohou nastat nějaké potíže. Například v listu aplikace Excel je několik nespojitých prázdných buněk. V tomto případě je trochu těžké vybrat všechny buňky, které mají obsah. Ale nebojte se. Zde vám sdílíme 2 přístupy k výběru všech neprázdných buněk v listu aplikace Excel.

Metoda 1: Vyberte pomocí „Přejít na speciální“

1. Na začátku otevřete list aplikace Excel.
2. Poté stisknutím klávesy „F5“ spusťte dialogové okno „Přejít na“.
3. V dialogu „Přejít na“ klikněte na tlačítko „Speciální“.
4. Dále zaškrtněte možnost „Konstanty“ a poté možnosti „Čísla“, „Text“, „Logické“ a „Chyby“.
5. Nakonec klikněte na „OK“.
6. Když se dialogové okno zavře, jak vidíte, byly vybrány všechny neprázdné buňky.

Metoda 2: Vyberte pomocí aplikace Excel VBA

1. Nejprve získejte přístup k editoru Excel VBA s odkazem na „Jak spustit kód VBA v aplikaci Excel".
2. Poté vložte následující kód do nepoužívaného modulu.

Sub SelectAllNonBlankCells()
    Dim objUsedRange As Range
    Dim objRange As Range
    Dim objNonblankRange As Range

    Set objUsedRange = Application.ActiveSheet.UsedRange

    For Each objRange In objUsedRange
        If Not (objRange.Value = "") Then
           If objNonblankRange Is Nothing Then
              Set objNonblankRange = objRange
           Else
              Set objNonblankRange = Application.Union(objNonblankRange, objRange)
           End If
        End If
    Next

    If Not (objNonblankRange Is Nothing) Then
       objNonblankRange.Select
    End If
End Sub

3. Poté ukončete editor VBA a přidejte toto makro na panel nástrojů Rychlý přístup.
4. Nyní otevřete požadovaný list a klikněte na tlačítko makra.
5. Najednou budou vybrány všechny neprázdné buňky, jak je znázorněno na následujícím obrázku.

Porovnání

Opravte nepříjemné potíže s Excelem

Soubor Excel je náchylný k chybám a poškozením. Pokud je například MS Excel často nesprávně uzavřen, může se soubor snadno poškodit. Uživatelé proto musí učinit určitá opatření, včetně pravidelného zálohování souborů. Navíc zdatný, robustní a spolehlivý xlsx opravit nástroj, jako DataNumen Excel Repair, je otázkou nezbytnosti.

Úvod autora:

Shirley Zhang je expertem na obnovu dat DataNumen, Inc., která je světovým lídrem v oblasti technologií pro obnovu dat, včetně SQL Server obnova a výhledové softwarové produkty pro opravy. Pro více informací navštivte www.datanumen.com