Im Blatt Adressen werden die Daten eingegeben, im Blatt Auswertung verschiedene Berechnungen durchgeführt.
Mein Problem ist folgendes:
es soll über ein DropDown-Feld im Blatt Auswertung die jeweiligen Namen ausgegeben werden, die in dem ausgewählten Monat Geburtstag haben.
Also z.B. Februar auswählen, dann erscheinen darunter die nur diese Namen (und das Alter), aus dem Registerblatt Adressen.
Mit SVerweis habe ich es nicht hinbekommen…
Die Erklärung bei Iris (siehe unten) hat mich etwas weitergebracht, auch Recherchen über Google blieben bisher erfolglos.
Ich hoffe, es gibt eine einfache Lösung und bitte um Denkhilfe bzw. Unterstützung.
Vielen Dank schon mal im voraus!
In vba geht das so, unten Rechtsklick auf den Blattnamen von „Auswertung“, „Code anzeigen“, dort den Code reinkopieren, Editor schließen.
Private Sub Worksheet\_Change(ByVal Target As Range)
Dim ZeiA As Long, ZeiG As Long
If Target.Address "$D$12" Then Exit Sub
On Error GoTo Ende
ZeiA = 14
Application.EnableEvents = False
Range("B14:C1000").ClearContents
With Worksheets("Geburtstage")
For ZeiG = 2 To .Cells(Rows.Count, 3).End(xlUp).Row
If MonthName(Month(.Cells(ZeiG, 7))) = Range("D12") Then
Cells(ZeiA, 2) = .Cells(ZeiG, 3)
Cells(ZeiA, 3) = .Cells(ZeiG, 9)
ZeiA = ZeiA + 1
End If
Next ZeiG
End With
Ende:
Application.EnableEvents = True
End Sub