Mir ist nicht klar, weshalb mein Code "Variante 1" funktioniert, jedoch "Variante 2" nicht. Bei Variante 2 habe ich die Zahl 2 der Long Variable spVal zugewiesen und diese dann verwendet. Weshalb gibt dies ein Anwendungs- oder objektdefinierter Fehler?
Gruss, Peter
''Variante 1
With Range("vk_Titel")
.FormulaR1C1 = "VLOOKUP(RC2 ,KuSH_Daten,COLUMN(KuSH_Titel),FALSE)"
End With
''Variante 2
Dim spVal As Long
spVal = 2
With Range("vk_Titel")
.FormulaR1C1 = "VLOOKUP(RC " & spVal & " ,KuSH_Daten,COLUMN(KuSH_Titel),FALSE)"
End With