im Range als Argument anderes Range zu verwenden

[Ka3ax]

Guten Morgen zusammen.

Ich versuche zu verstehen wo kann die Fehler sein und brauche eure Hilfe.

Wenn das  Argument von Range direkt ist, funktioniert der Programmcode.

Code:

For i = 1 To Sheets("initializ").Range("A1").Value

  For x = 1 To Sheets("initializ").Range("A1").Value

    If Sheets(1).Range("C" + CStr(i)).Value = Sheets(2).Range("C" + CStr(x)).Value then

Wenn anstatt des Arguments C anderes Range verwenden, ensteht die Fehler 1004

in der Zelle D1 liegt der Buchstabe C

Code:

str_Var2 = Sheets("initializ").Range("D1").Value


For i = 1 To Sheets("initializ").Range("A1").Value

  For x = 1 To Sheets("initializ").Range("A1").Value

    If Sheets(1).Range("str_Var" + CStr(i)).Value = Sheets(2).Range("str_Var" + CStr(x)).Value then

grundsätzlich darf mann das Argument von Range via anderes Range zuweisen?

[Ka3ax]

Grund ist falsche Syntax, unnötige Anführungsstriche 
statt 

Code:

If Sheets(1).Range("str_Var" + CStr(i)).Value = Sheets(2).Range("str_Var" + CStr(x)).Value then

soll so sein, dann läuft

Code:

If Sheets(1).Range(str_Var + CStr(i)).Value = Sheets(2).Range(str_Var + CStr(x)).Value then