|
Hallo Robin,
nur weil es in diesem Forum Leute gibt, die gern ein bisschen herumpoltern musst du nicht gleich zurück poltern. Das verschreckt andere Helfer. Und du musst zugeben. So ganz Unrecht hat Gast2202 nicht. Eine derartige Variablenzuweisung macht wirklich wenig Sinn.
Für dein Anliegen solltest du dich mal mit Arrays beschäftigen. Die machen genau das was du willst.
Dim FQold(1 to 10)
For Each c In wksZ.Range(Cells(1, k), Cells(1, i))
j = j + 1
FQold(j) = wksZ.Cells(letzteZeile, l)
l = k + 1
Next
If FQold(1) = FQold(2) Then
Else
End If
'usw.
Achtung da du im Array nur 10 Speicher-Positionen vergeben hast, aber die Anzahl der Zellen im Bereich über 10 hinausgehen kann, ist es möglich, dass du einen Laufzeitfehler (Index außerhalb des gültigen Bereichs) erhälst. In dem Fall meld dich nochmal und sag Bescheid was du eigentlich erreichen willst. Dann ließe sich der Code entsprechend anpassen.
Gruß Mr. K.
|