Worksheet_Change in Verbindung mir Auswahlliste
16.09.2004 16:10:08
emuc
wie kann ich den übernommenen Wert einer Auswahlliste erkennen. Über Worksheet_Change funktioniert es nicht da ich ja nicht direkt in die Zelle eingebe.
Ich hab mal folgendes Probiert:
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
Dim var As Variant
MsgBox Target.Value 'Zeigt den Inhalt der Target-Zelle
If Target.Address = "$E$22" Then
var = Application.Match(Target, Tabelle2.Columns(3), 0)
MsgBox var 'Zeigt an in welcher Zeile der Vergleichswert liegt
On Error Resume Next
End if
End Sub
Ergebnis: wie beschreiben; es wird nur direkt eingegebener Text in der MsgBox angezeigt. Aber nicht wie gewünscht der aus der Auswahlliste übernommene Wert.
Ich hab keine Ahnung wie ich die Auswahl aus einer AuswahlListe abfrage. Im Archiv hab ich trotz langer suche nichts passendes gefunden.