Vlookup
13.07.2004 14:20:34
Dominic
Kann mir jemand helfen? Ich habe ein Problem mit vlookup. Das Code ist wie folgt:
Dim a As Double
Dim arg1 As String
Dim arg2 As String
For a = 2 To Rows.Count
arg1 = Cells(a, 2).Value
If IsEmpty(Cells(a, 1)) = True Then
Exit For
ElseIf Cells(a, 6).Value "ROW" And Cells(a, 7) = "2001" Then
arg2 = "'[split.xls]%'!R141C2:R186C6"
Cells(a, 21).Value = Application.WorksheetFunction.VLookup(arg1, arg2, 2, False)
usw....
End If
Next a
End Sub
Irgendwie wird arg1 und arg2 nicht erkannt. Bin für jede Hilfe dankbar!
Vielen Dankt im Voraus!
Gruß,
Dominic