CStr should work but doesn't, any ideas?

[scottr99]

When I 'step' through this, I can see that the right side of the "=" works fine, but the left side doesn't. I'm puzzled!!!


For i = 2 To 5 Step 25
Range("P" + CStr(i)) = Range("A" + CStr(i + 13))
Range("Q" + CStr(i)) = Range("B" + CStr(i + 13))
Range("R" + CStr(i)) = Range("D" + CStr(i + 13))
Range("S" + CStr(i)) = Range("A" + CStr(i + 34))
Range("T" + CStr(i)) = Range("B" + CStr(i + 34))
Range("U" + CStr(i)) = Range("C" + CStr(i + 34))
Range("V" + CStr(i)) = Range("K" + CStr(i + 26))
Range("W" + CStr(i)) = Range("D" + CStr(i + 23))
Range("X" + CStr(i)) = Range("I" + CStr(i + 18))
Range("Y" + CStr(i)) = Range("G" + CStr(i + 24))
Next i

[Greg M]

Hi there,

Please Login or Register  to view this content.

Untested, and difficult to be certain without more information, but maybe:

Please Login or Register  to view this content.

Hope this helps,

Regards,

Greg M

[scottr99]

Hi there,

Please Login or Register  to view this content.

Untested, and difficult to be certain without more information, but maybe:

Please Login or Register  to view this content.

Hope this helps,

Regards,

Greg M

Thanks Greg, but that didn't do it. As I said the right side is perfect but on the left it's not doing the addition.

[scottr99]

It's working, thank you.

[protonLeah]

Range("P" + CStr(i)) = Range("A" + CStr(i + 13)) ===>
Cells(i,"P").Value = Cells(i + 13, "A").Value, ...

[TMS]

I think you should be using ampersand ( & ) on both sides rather than plus ( + ). And I don't think you need CStr at all.

Range("P" & i) = Range("A" & (i + 13))


How does this work: For i = 2 To 5 Step 25

[Greg M]

Hi again,

but on the left it's not doing the addition

It's not "addition", it's concatenation - thats why an Ampersand (&) is more appropriate.


If your "i" variable is an integer (not obvious from your code) you shouldn't need to use the CInt function.


Regards,

Greg M