Thema: Tabellenzeilen in Abhängigkeit einer zweiten Tabelle einblenden

Home

Gruppe

Allgemein

Problem

Die ersten 25 Zellen in Spalte A sollen auf Inhalt geprüft werden. Ist die jeweilige Zelle nicht leer, soll die entsprechende Zeile in Tabelle2 eingeblendet werden.

Lösung

Geben Sie den nachfolgenden Code in ein Standardmodul ein und weisen Sie ihn einer Schaltfläche zu.

StandardModule: basMain

Sub PruefenEinblenden()
   Dim iRow As Integer
   For iRow = 1 To 25
      If Not IsEmpty(Cells(iRow, 1)) Then
         Worksheets("Tabelle2").Rows(iRow).Hidden = False
      End If
   Next iRow
End Sub

Beiträge aus dem Excel-Forum zu den Themen Allgemein und Ansicht

Formular Steuerelement bei "geschützer Ansicht"	VBA und geschützte Ansicht
Hilfe Laufzeitfehler wegen benutzerdef. Ansicht	OT: Exploreransicht
Allgemeine Frage zur Fehlerbehandlung	allgemeine Fragen zu einer Datenbank
Symbolleistenansicht beim Userformaufruf	Dateiansicht
Benutzerdefinierte Ansicht nach Blattschutz	Benutzerdefinierte Ansichten trotz Blattschutz
Bildschirmansicht optimieren	allgemein
Ansicht wie in Excel XP	Ansicht nach Arbeitsblatt wechsel
Zellenformat für Datumsansicht ???	Freigegebene Arbeitsmappe, Ansichten & Blattschutz
Liste ähnlich der Autofilter-Ansicht	Ansicht per Makro wählen
Scrollen bei Formelansicht.	drucken - seitenansicht
Email Ansicht auf automaticgröße einstellen	(verständnis) Problem mit benutzerdef. Ansicht
drucken oder seitenansicht	allgemein: VBA lernen?
Hide-Methode-Allgemeine Frage	Formelassistent allgemein
2 Tabellenblätter in einer Ansicht	Bentuzerdefinierte Ansicht Problem
allgemeingültig Blattschutz aufheben	druckansicht ohne drucken etc..nur schliessen funk
Ansichten	Seitenansicht via VBA schließen
Ansicht VBA-Projekt-Explorer	allgemeine Frage...
Ansichtsmodus Berechnungsbogen	Tabellenblattansicht
Solver - allgemein	noch offen - VBA Umgebung (Ansicht) ist durcheinan
Standardansicht VBA-Umgebung wiederherstellen	Solver - allgemein
Frage zum Forum allgemein	Ansicht aktualisieren
Monthview-Controll Objekt Ansicht "fixieren"	Zelle selektieren ändert Bildschirmansicht
Bildschirmansicht "zentrieren"	Allgemeine Frage - Finanz-Planungsmodell
Ansicht	Pivoteingrenzung Formel verallgemeinern
Bildschirmansicht, Zelle darüberhinaus schreiben	Bildschirmansicht auf Shape focusieren