ich möchte in VBA eine Sverweis-Funktion erstellen, die in der Quell - Datei nur die ersten 8 Zeichen als Suchkriterium benutzt.
Ich habe es schon mit dem Marco-Recorder benutzt, aber hier werden nur die Formeln eingetragen..habt ihr eine Idee, wie der VBA code lauten würde?
Sub Sverweis()
' Sverweis Makro
Sheets("Ausgabedatei").Select
ActiveCell.Offset(-19, -5).Range("A1").Select
ActiveCell.FormulaR1C1 = _
"=VLOOKUP(LEFT(RC[-2],8),Quell-Sheet!R2C1:R306C2,2,0)"
ActiveCell.Select
Selection.AutoFill Destination:=ActiveCell.Range("A1:A304"), Type:= _
xlFillDefault
ActiveCell.Range("A1:A304").Select
End Sub