Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.10.2025 17:40:39
16.10.2025 17:25:38
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Dropdown mit Bedingung VBA

Dropdown mit Bedingung VBA
06.07.2020 14:37:03
Christian
Hallo
Ich benötige wieder einmal Hilfe
im Moment verwende ich zur Erstellung von DropDown Feldern folgende Formel
=WENN($B9="";"";WENN(C$8="Sa";"";WENN(C$8="So";"";Einträge!$Z$9:$Z$15))) ~f~
Im Makro sieht es so aus
~f~=IF($B9="""","""",IF(C$8=""Sa"","""",IF(C$8=""So"","""",Einträge!$Z$9:$Z$15)))" ~f~
Das funktioniert auch Wunderbar
Nun möchte ich die Formel so erweitern
~f~=WENN($B9="";"";WENN(C$8="Sa";"";WENN(C$8="So";"";WENN(ZÄHLENWENN(Feiertage!$L$2:$L$20;C$7)>0;"";Einträge!$Z$9:$Z$15))))
Gruß Christian
Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Dropdown mit Bedingung VBA
06.07.2020 14:58:51
ChrisL
Hi Christian
Die Formel mal abgekürzt:
=WENN(ODER($B9="";C$8="Sa";C$8="So";"";ZÄHLENWENN(Feiertage!$L$2:$L$20;C$7)>0);""; Einträge!$Z$9:$Z$15)
M.E. kann das Ergebnis aber nicht einen ganzen Bereich sein: Einträge!$Z$9:$Z$15
"=IF(OR($B9="""",C$8=""Sa"",C$8=""So"","""",COUNTIF(Feiertage!$L$2:$L$20,C$7)>0),"""",Einträge!$Z$9:$Z$15)"
cu
Chris
Anzeige
AW: Dropdown mit Bedingung VBA
06.07.2020 15:08:11
Christian
Hallo
Ich habe es ausprobiert
Leider erhalte ich immer einen Debuggen
Gruß Christian
AW: Dropdown mit Bedingung VBA
06.07.2020 15:14:05
ChrisL
Hi
Kann ich nicht nachvollziehen. Die Zeile funktioniert fehlerfrei.
ActiveCell.Formula = "=IF(OR($B9="""",C$8=""Sa"",C$8=""So"","""",COUNTIF(Feiertage!$L$2:$L$20,C$7)>0),"""",Einträge!$Z$9:$Z$15)"
cu
Chris
Anzeige
AW: Dropdown mit Bedingung VBA
06.07.2020 15:20:46
Christian
Hallo
So sieht das bei mir aus
Range("C9:NP63).Select
With Selection.Validation
.Delete
.Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
xlBetween, Formula1:="=IF(OR($B9="""",C$8=""Sa"",C$8=""So"","""",COUNTIF(Feiertage!$L$2:$L$20,C$7)>0),"""",Einträge!$Z$9:$Z$15)"
.IgnoreBlank = True
.InCellDropdown = True
.InputTitle = ""
.ErrorTitle = ""
.InputMessage = ""
.ErrorMessage = ""
.ShowInput = True
.ShowError = True
End With
Funktioniert leider nicht
Bitte daran denken das ich Anfänger bin
Gruß Christian
Anzeige
AW: Dropdown mit Bedingung VBA
06.07.2020 15:27:29
Christian
Hallo
So funktioniert es jetzt bei mir
Formula1:="=IF(OR($B9="""",C$8=""Sa"",C$8=""So""),"""",IF(COUNTIF(Feiertage!$L$2:$L$20,C$7)>0,"""",Einträge!$Z$9:$Z$15))"
Vielen Dank
Gruß Christian
AW: Dropdown mit Bedingung VBA
06.07.2020 15:31:13
ChrisL
Sorry, der fett markierte Teil ist aus der ursprünglichen Formel hängen geblieben (löschen)
"=IF(OR($B9="""",C$8=""Sa"",C$8=""So"","""",COUNTIF(Feiertage!$L$2:$L$20,C$7)>0),"""",Einträge!$Z$9:$Z$15)"
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige