Target .Address
09.01.2004 14:17:38
Ernst Dunkel
Habs immer noch nicht so ganz begriffen.
Wenn ich in Zelle H7 einen Wert eingebe (z.B. UG), so wird ein zugehörender Wert aus der Tabelle1 der Zellen B17:E29 (4-Wert) gesucht und in der Zelle J11 eingetragen.
Im untenstehenden Code muss noch etwas falsch sein, komme jedoch nicht darauf.
Für eine Hilfe bin ich dankbar.
Mit freundlichen Grüssen
Ernst Dunkel
Hier stimmt was nicht
Private Sub worksheet_selectionchange(ByVal target As Excel.Range)
If target.Address = ("$H$7") Then
Cells(target.Range("J11")) = WorksheetFunction.VLookup(target, worksheets("Tabelle1").Range("B17:E29"), 4, 1)
End If
End Sub