Ich möchte gerne in Sheets "Februar" die Spalte AE ausblenden,wenn AE1 =""
Könnte mir dazu bitte jemand helfen?
Gruß
Heinz
Sub Spalte_Ausblenden()
Sheets("Februar").Range ("AE:AE")
EntireColumn.Hidden = True
End Sub
Sub Spalte_Ausblenden()
Sheets("Februar").Range ("AE:AE")
EntireColumn.Hidden = True
End Sub
Sheets("Februar").Columns(31).Hidden = Range("AE1") = ""
With Sheets("Februar")
.Columns(31).Hidden = .Range("AE1") = ""
End With
Private Sub Worksheet_Activate()
If Range("AE1") = "" Then
Columns(31).EntireColumn.Hidden = True
End If
End Sub
Codezeilen in das entsprechnede Tabellenblatt