Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1532to1536
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

spalten ausblenden mit Dropdown abfrage II

spalten ausblenden mit Dropdown abfrage II
03.01.2017 13:52:14
Oliver
Hallo zusammen
mit eurer super hilfe habe ich diesen Code in meinem Excel einbauen können
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub
If Target.Address = "$D$5" Then
Range("L:T").EntireColumn.Hidden = False = Range("D5") = "ALLE"
End If
If Target.Count > 1 Then Exit Sub
If Target.Address = "$D$5" Then
Range("L:L,N:N,O:O").EntireColumn.Hidden = Range("D5") = "CC"
End If
End Sub

wie stelle ich es nun an, dass ich die Auswahl im Feld D5 noch nach mehreren werten "arbeiten" lassen kann. Es sollten schlussendlich 5-6 Auswahlkriterien (AA, BB, ....) zur Verfügung stehen und jede sollte andere Spalten ausblenden.
Vielen Dank im Voraus
Oli

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: spalten ausblenden mit Dropdown abfrage II
03.01.2017 13:58:02
Michael
Hallo!
Private Sub Worksheet_Change(ByVal Target As Range)
With Target
If .Count > 1 Then Exit Sub
If .Address = "$D$5" Then
Select Case .Value
Case Is = "ALLE"
Range("L:T").EntireColumn.Hidden = False
Case Is = "AA"
'Deine Bedingungen
Case Is = "BB"
'Deine Bedingungen
Case Is = "CC"
Range("L:L,N:N,O:O").EntireColumn.Hidden = True
Case Is = "DD"
'Deine Bedingungen
End Select
End If
End With
End Sub
LG
Michael
AW: spalten ausblenden mit Dropdown abfrage II
03.01.2017 14:35:14
Oliver
Perfekt, danke vielmals
Gern! LG und owT
03.01.2017 14:40:35
Michael
Anzeige

316 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige