Spalte ein/ausblenden

Bild

Betrifft: Spalte ein/ausblenden
von: Andreas
Geschrieben am: 06.10.2015 12:30:40

Hi,
ich brauche einen Code um eine komplette Spalte auszublenden, wenn in einer bestimmten Zelle dieser Spalte nichts steht.
Jemand eine Idee?
Grüße

Bild

Betrifft: AW: Spalte ein/ausblenden
von: Steff
Geschrieben am: 06.10.2015 12:48:51
Hi,
zum Beispiel, wenn Deine zu überprüfende Zelle S39 ist:
If Len(Range("S39")) = 0 Then
Columns("S:S").Select
Selection.EntireColumn.Hidden = True
End If
Gruß
Steff

Bild

Betrifft: AW: Spalte ein/ausblenden
von: Andreas
Geschrieben am: 06.10.2015 13:00:52
Hi Steff,
funktioniert super gut,
Danke :-)

Bild

Betrifft: AW: Spalte ein/ausblenden
von: HuberFranz
Geschrieben am: 06.10.2015 12:56:53
Probier mal:
If Trim(Range("A10")) = "" Then Columns("A:A").EntireColumn.Hidden = True
"A10" ist die Zelle, welche auf Inhalt überprüft wird. "A:A" ist die Spalte die bei Inhalt "" (also kein Inhalt) ausgeblendet wird

Bild

Betrifft: AW: Spalte ein/ausblenden
von: Andreas
Geschrieben am: 06.10.2015 13:10:34
Hi HuberFranz,
funktioniert auch gut.
Danke dir :-)

 Bild

Beiträge aus den Excel-Beispielen zum Thema "Spalte ein/ausblenden"