möchte gerne ,wenn ich mit tab in eine Zelle gesprungen bin ,dort einen Makro ausführen,der
wie bei sverweis mir in einem Datenblatt einen Wert ausliest und diesen Wert in diese aktive Zelle
schreibt.
Kann mir jemand helfen.
Gruß
Hermann
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
dim ZielZelle as range
set ZielZelle = Range("A1")
if Targent.Address = ZielZelle.address then
Target.value = Worksheefunction.VLookup(DeinSuchbegriff, DeineMATIX, DeineSpaltenNR, _
Dein4.Parameter)
end if
End Sub
das Makro gehört ins Modul des Tabellenblatts und startet, sobald du die Zelle A1 auswählst.
die Parameter für VLOOKUP sind genauso, wie für den SVERWEIS in Excel, außder daß du die Suchmatrix in VBA-gemäß als RANGE angeben musst.
Gruß, Daniel