Jak sprawdzić, czy komórka lub zakres wielu komórek jest pusty w Excel VBA?

Dzisiaj dowiemy się, jak łatwo sprawdzić, czy jedna lub wiele komórek jest pusta za pomocą Visual Basic for Applications (VBA). Treść dotyczy programu Excel 2019/365, 2016 i wcześniejszych wersji pakietu Microsoft Office.

Prace przygotowawcze

Przed rozpoczęciem kodowania za pomocą VBA w programie Excel musisz upewnić się, że karta deweloperska jest włączona. Jeśli tak nie jest, zajrzyj do tego krótkiego samouczka.

Sprawdzanie, czy zakres komórek Excela jest pusty za pomocą VBA

  1. W programie Excel otwórz środowisko Visual Basic, naciskając Alt + F11
  2. Wstaw następujący kod jako procedurę w arkuszu lub alternatywnie w dedykowanym module VBA.
Sub Check_Cell_is_empty_alt()
    Dim rng As Range
    Set rng = Selection
    For Each Cell In rng
        If IsEmpty(Cell.Value) = True Then
            Debug.Print ("Pusta")
        Else
            Debug.Print ("Nie pusta")
        End If
    Next Cell
    End Sub
  1. Przejdź do arkusza kalkulacyjnego i wybierz dowolny zakres komórek.
  2. Wróć do edytora Visual Basic i upewnij się, że przeglądarka natychmiastowa (CTRL+G) jest widoczna — ponieważ metoda Debug.Print w kodzie wygeneruje wynik do tego okna.
  3. Naciśnij F5, aby uruchomić swój kod.
  4. Spójrz na wyniki w bezpośrednim oknie.

Jak sprawdzić, czy komórka lub zakres wielu komórek jest pusty w Excel VBA?

Wyniki

Wszystkie puste komórki zostaną zidentyfikowane.

Możliwe rozszerzenia kodu

Możesz oczywiście rozszerzyć ten kod w razie potrzeby, jeśli chcesz pominąć puste wartości lub po prostu nic nie robić, jeśli komórki nie są pełne. Możesz również sprawdzić, czy sam zakres jest pusty, czyli nie zawiera żadnych wartości.

Sprawdzanie niepustych pól

W ten sam sposób można użyć właściwości IsEmpty, aby sprawdzić pola, które nie są puste.

If Not IsEmpty(Cell.Value) = True Then
        Debug.Print ("Nie pusta")
    Else
        Debug.Print ("Pusta")
    End If

Bonus: Wyróżnianie pustych komórek

Dim i As Long
        Dim c As Long
        Dim myRange As Range
        Dim myCell As Range
        Set myRange = Range("A1:A10")
        For Each myCell In myRange
            If IsEmpty(myCell) Then
                myCell.Interior.Color = RGB(255, 87, 87)
                i = i + 1
            End If
        Next myCell
        MsgBox "Razem jest " & i & " pustych komórek z " & c & "."

36 Comments

  1. Jola_Kot -

    Nigdy bym nie pomyślała, że sprawdzanie pustych komórek może być tak proste! Dziękuję za ten wpis

  2. Pawel M. -

    Można też użyć formuły ISBLANK do szybkiego sprawdzenia pustych komórek bez kodowania VBA!

  3. Krystyna -

    Dzięki, że podzieliłeś się tym! Moja praca w Excelu stała się o wiele łatwiejsza, odkąd to wiem

  4. Gosia -

    Nareszcie znalazłam coś, co rozwiązuje mój problem! Dzięki! Teraz będę miała więcej czasu na inne rzeczy

  5. Ania W. -

    Mam pytanie! Czy jest możliwość, aby kod działał automatycznie przy każdej zmianie danych w komórkach?

  6. Jarek -

    Czy jest łatwiejszy sposób na sprawdzenie pojedynczej komórki czy przypadkiem nie jest to zbyt trudne?

  7. Czarek -

    Znalazłem kilka błędów, ale ogólnie super artykuł! Pomógł mi znaleźć lukę w moim kodzie.

  8. Łukasz -

    Super artykuł, ale wciąż nie udało mi się zastosować tego w praktyce. Może ktoś dać więcej wskazówek

  9. Kornel -

    Czy zmodyfikowanie skryptu, aby działał na różnych arkuszach, byłoby trudne? Fajnie by było to wiedzieć

  10. Daria -

    To naprawdę pomocne! Myślałem, że to będzie trudniejsze, ale udało mi się to dzięki twojemu poradnikowi.

  11. Marzena -

    Dobry temat! Tylko muszę przetestować różne podejścia, ale już jestem pełna nadziei

  12. Hania 88 -

    Świetny poradnik! Ale co jeśli chcę, żeby kod działał tylko na komórkach z określonym zakresem? Jak to zrobić

  13. Mirek -

    Nie wiedziałem, że VBA ma takie możliwości! Warto to wykorzystać w codziennej pracy

  14. Szymon123 -

    Jestem pod wrażeniem! Uhrinłem do ostatniej linijki. Artykuł jest bardzo szczegółowy, dzięki!

  15. Rafał -

    Fajnie, że to opisujesz, bo większość ludzi nie zdaje sobie sprawy z potencjału VBA

  16. Kasia z Krakowa -

    Czy ktoś próbował dodatkowo filtrować wyniki według innych warunków? Będzie to ciekawe zadanie

  17. Olaf -

    Czy ktoś mógłby podać kod, którego używają do sprawdzania wszystkich pustych komórek w danym zakresie

  18. Michał -

    Czy możesz podać więcej szczegółów na temat używania tej samej techniki w arkuszu kalkulacyjnym? Uwielbiam VBA

  19. Felia -

    Jak zrobić, aby kod ignorował puste komórki w formułach? To może być trudne, kiedy używam złożonych danych

  20. Kasia -

    Świetny artykuł! Dzięki niemu zrozumiałem, jak używać VBA do sprawdzania pustych komórek w Excelu. Naprawdę przydatne

  21. Sonia -

    Wow, w końcu znalazłem coś, co mi się przyda! Zobaczę, co da się zrobić w moim projekcie

  22. Grzegorz IT -

    Proszę, jest szansa, że dodasz kilka przykładów w praktyce? Bardzo bym się przydał!

  23. Ola -

    Również spotkałem ten problem, ale po przeczytaniu tego artykułu! Bardzo pomocne, dziękuję!

  24. Tomek123 -

    Niesamowite! Uwielbiam VBA, ale nadal się uczę. Ten artykuł mi pomoże w praktyce

  25. Nina -

    Jestem tak szczęśliwa, że znalazłam ten artykuł! Rozwiązał mój problem z pustymi komórkami w Excelu

  26. Zosia -

    W porządku to działa! Cieszę się, że to znalazłam. Moje dane są teraz bardziej uporządkowane

  27. Julia -

    Bardzo przydatne, jednak mój kod wciąż nie działa prawidłowo. Może ktoś pomóc sprawdzić

  28. Piotr -

    Jak dla mnie to rozwiązanie jest najlepsze! Czy możesz dodać więcej przykładów

  29. Patryk -

    Ciekawe rozwiązanie! Jakie inne sztuczki można zastosować w Excelu, aby poprawić jakość danych?

  30. Ela M. -

    Wszystko fajnie, ale nie można zapomnieć, że czasami puste komórki mogą zawierać formuły, które zwracają pusty wynik. To też trzeba wziąć pod uwagę

  31. Kris IT -

    Czy to rozwiązanie jest kompatybilne z starszymi wersjami Excela? Mógłbyś to wyjaśnić

  32. Sabrina -

    Znalazłem ten artykuł dzięki koledze i jestem zachwycony! Proszę o więcej treści tego typu.

  33. Mateusz -

    Dzięki za pomoc! Zawsze miałem problemy z pustymi komórkami w VBA. Teraz wszystko działa jak należy

  34. Zuzanna -

    Świetny artykuł! Pomogło mi to zrozumieć VBA lepiej. Dziękuję za wyjaśnienia!

  35. Bąbel -

    Czy mógłbyś wyjaśnić, jak można użyć tej metody do sprawdzenia zakresu komórek? Jestem nowicjuszem w VBA

  36. Hania -

    Uwielbiam takie tutoriale! Mam nadzieję, że więcej takich tematów się pojawi.

Leave a Comment

Messenger nie może otworzyć załącznika lub linku? Oto co robić

Messenger nie może otworzyć załącznika lub linku? Oto co robić

Messenger nie może otworzyć załącznika lub linku? Dowiedz się, jak rozwiązać ten problem dzięki sprawdzonym krokom i wskazówkom.

Jak utworzyć grupę kontaktów lub listę dystrybucyjną w programie Outlook

Jak utworzyć grupę kontaktów lub listę dystrybucyjną w programie Outlook

Dowiedz się, jak szybko stworzyć grupę kontaktów w Outlook, aby efektywnie zarządzać swoimi wiadomościami e-mail. Oszczędzaj czas z naszą szczegółową instrukcją.

[NAPRAWIONO] Błąd 740 Żądana operacja wymaga podwyższenia systemu Windows 10

[NAPRAWIONO] Błąd 740 Żądana operacja wymaga podwyższenia systemu Windows 10

Dowiedz się, jak rozwiązać problem z błędem 740 żądana operacja wymaga podniesienia Windows 10 problemów z rozwiązaniami przedstawionymi w tym artykule.

Jak włączyć lub wyłączyć uprawnienia witryny w Microsoft Edge

Jak włączyć lub wyłączyć uprawnienia witryny w Microsoft Edge

Jeśli chcesz mieć większą kontrolę nad tym, które witryny próbują uzyskać dostęp na Twoim komputerze, oto jak skutecznie zarządzać uprawnieniami witryny w Microsoft Edge.

5 najlepszych emulatorów PS4 dla systemu Windows 10/11 do zainstalowania w 2022 r.

5 najlepszych emulatorów PS4 dla systemu Windows 10/11 do zainstalowania w 2022 r.

Poznaj najlepsze emulatory PS4 na PC, które pozwolą Ci grać w gry na konsole PlayStation 4 za darmo na komputerach z Windows.

Jak naprawić „Nieznany wyjątek oprogramowania (0xe0434352)”?

Jak naprawić „Nieznany wyjątek oprogramowania (0xe0434352)”?

Odkryj możliwe rozwiązania, aby naprawić błąd wyjątku nieznanego oprogramowania (0xe0434352) w systemie Windows 10 i 11 podany tutaj…

Jak usunąć animacje z prezentacji PowerPoint

Jak usunąć animacje z prezentacji PowerPoint

Jak usunąć animacje z prezentacji PowerPoint, aby dostosować ją do profesjonalnych standardów. Oto przydatne wskazówki.

Napraw niedziałające Wicked Whims 6 łatwych rozwiązań

Napraw niedziałające Wicked Whims 6 łatwych rozwiązań

Radzenie sobie z Wicked Whims, które nie działają w Sims 4. Wypróbuj 6 skutecznych rozwiązań, takich jak aktualizacja modów i więcej.

Napraw kontroler PS4 nie ładuje się [8 łatwych ROZWIĄZAŃ]

Napraw kontroler PS4 nie ładuje się [8 łatwych ROZWIĄZAŃ]

Odkryj jak naprawić problem z kontrolerem PS4, który się nie ładuje. Sprawdź 8 prostych rozwiązań, w tym testy kabli, portów oraz reset kontrolera.

Operacja nie została zakończona pomyślnie, ponieważ plik zawiera wirusa [NAPRAWIONO]

Operacja nie została zakończona pomyślnie, ponieważ plik zawiera wirusa [NAPRAWIONO]

Dowiedz się, jak naprawić Operacja nie zakończyła się pomyślnie, ponieważ plik zawiera wirusa Windows 11/10 i nie można otworzyć żadnego pliku…