online 1
gast (50)

/ Forum / Tabellenkalkulation

TabellenkalkulationTabellenkalkulation

Fragevon michaelsoft7 vom 14.10.2020, 15:50 Options

Lösung

Über VBA Zeile ausblenden sobald ein bestimmter Wert in der Zelle steht

Hallo,

ich möchte ein kleines VBA-Tool das mir auf Knopfdruck alle Zeilen ausblendet sobald in der Spalte P eine 0 steht.
Wer kann mir helfen?
Lg
michael


Antwort schreiben

Antwort 1 von rainberg vom 14.10.2020, 16:33 OptionsLösung

Lösung
Hallo Michael,

kopiere diesen Code in den Codebereich des relevanten Tabellenblattes und weise ihm eine Tastenkombination zu.

Option Explicit

Sub ausblenden()
    Dim rngC As Range, rngBer As Range
    Set rngBer = Range("P1:P" & Cells(Rows.Count, 16).End(xlUp).Row)
    For Each rngC In rngBer
        If rngC = "0" Then
            Rows(rngC.Row).EntireRow.Hidden = True
        End If
    Next
End Sub


Gruß
Rainer

Antwort 2 von michaelsoft7 vom 15.10.2020, 15:58 Options

Super, Tausend dank. Hat alles gelöst :)

Hinweis

Diese Frage ist schon etwas älter, Sie können daher nicht mehr auf sie antworten. Sollte Ihre Frage noch nicht gelöst sein, stellen Sie einfach eine neue Frage im Forum..

Neue Einträge

Version: supportware 1.9.150 / 10.06.2022, Startzeit:Thu Jan 8 21:07:44 2026