Spaltenbegrenzung bei .range?
17.09.2015 17:17:33
Thorsten
gibt es bei .Range("xx:xy")eine Spaltenbegrenzung?
In meinem Code kann ich den Datenbereich nur bis zur Spalte "GE" (=179 Spalten)wählen, -wenn ich den Datenbereich erweitere (z.B. auf "GF1000", dann wird gar kein Ergebnis mehr angezeigt. Woran liegt das und hat jemand eine Idee, wie ich das Problem lösen kann? Die Originaldatei hat ca. 200 Spalten, die ich auswerten möchte ...
Besten Dank Euch und viele Grüße
Thorsten
Hier mein Code:
Sub sverweis1()
On Error Resume Next
Dim Zeile, Spalte As Long
table1 = Sheets("Eingabe").Range("A3:A10")
table2 = Sheets("Produkte").Range("i2:ge1000")
Zeile = Sheets("Eingabe").Range("c3").Row
For Each cl In table1
Sheets("Eingabe").Cells(Zeile, 3) = Application.WorksheetFunction.VLookup(cl, table2, 5, False)
'(...)
Zeile = Zeile + 1
Next cl
End Sub