ComboBox auswahl als Variable verwenden
daniela.schmidt@atlantisfoundries.com
Ich habe eine Userform mit einer ComboBox zum Auswaehlen erstellt.
In der ComboBox kann man auswaehlen zwischen: Feb, Mar, Apr, May, Jun, Jul, Aug, Sep, Oct, Nov, Dec
Weiterhin gibt es zwei CommandButton: Ok und Abbruch.
Meine Userform bis jetzt sieht so aus:
Private Sub UserForm_Activate()
Dim lngM As Long
With cmbMonat
For lngM = 2 To 12
.AddItem Format(DateSerial(2010, lngM, 1), "MMM")
Next
End With
End Sub
Private Sub cmdAbbruch_Click()
Unload Me
End Sub
Private Sub cmdOK_Click()
End Sub
Ich wuerde jetzt gerne bei Klick auf Ok, dass folgende Formel in F11 ausgefuehrt wird und 100 Zeilen nach unten Kopiert wird.
Die Formel soll sich aber je nach Auswahl in der ComboBox an den jeweils ausgewaehlten Monat anpassen.
Die Tabellenregister meiner Arbeitsmappe heissen Master Data Feb, Master Data Mar, usw.
Die Formel folgendermassen:
'=IF(AND(IF(C11="","",SUMPRODUCT(('Master Data Jun'!$E$5:$E$10883=C11)*('Master Data Jun'!$B$5:$B$10883=$F$3)*(1)))=0,IF(C11="","",SUMPRODUCT(('Master Data Jul'!$E$5:$E$10883=C11)*('Master Data Jul'!$B$5:$B$10883=$F$3)*(1)))=1,C11""),VLOOKUP(C11,'Master Data Jul'!$E$5:$W$10883,18,FALSE),"")
Wie kann ich jetzt die Auswahl der ComboBox als Variable in meine Formel eingeben, damit sich die Formel an den Monat anpasst, der ausgewaehlt wurde.
Juli ist in der Formel der ausgewaehlte Monat in der ComboBox und Juni ist dann der Vormonat.
Hat jemand eine Idee?
Daniela