VBA zwei dropdown Fenster
21.10.2015 16:59:11
Joe
ich möchte zwei Dropdown-Fenster in Execel 2010 erstellen, welche mit anderen Seiten verknüpft sind. Ich möchte im ersten Register Eintragungen vornehmen, welche dann auf Register 2 und 3 übernommen werden.
Es klappt aber nicht, dass beide funktionieren. Einzeln betrachtet klappt es, aber wie füge ich es zusammen, das Einträge in den jeweiligen Fenster auf den anderen Seiten übernommen werden
So schauts aus:
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("I7")) Is Nothing Then Exit Sub
Application.EnableEvents = False
Sheets("Tabelle2").Cells(7, 9) = Target
Sheets("Tabelle3").Cells(30, 5) = Target
Application.EnableEvents = True
End Sub
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("L7")) Is Nothing Then Exit Sub
Application.EnableEvents = False
Sheets("Tabelle 2").Cells(7, 12) = Target
Sheets("Tabelle 3").Cells(31, 5) = Target
Application.EnableEvents = True
End Sub
Anzeige