VBA+CODE for Loop for Rows (from 1 to 12 numbes)

[vangoori]

Hi Team,

I am trying to paste values from ("J1:U1") ....numbers like 1 to 12

i wrote code when i am trying to excute that i am geeting error

Sub ColorCells1()
Dim myRange As Range
Set myRange = Range("A1:U1")
For i = 1 To 12
Rows(i, 13) = i
Next i
End Sub


thanks,
Shekar.

 

[bbott]

Try changing Rows to Cells. Does that fix your issue?

Sub ColorCells1()
Dim myRange As Range
Set myRange = Range("A1:U1")
For i = 1 To 12
[COLOR=#ff0000][B]Cells[/B][/COLOR](i, 13) = i
Next i
End Sub

I'm not exactly sure what you're trying to accomplish. The first two rows of your code don't do anything.

 

[vangoori]

Hi,

Just i need 1 to 12 numbers from J1 to U1...

am i clear now

thanks,
Vangoori,

 

[bbott]

Hi,

Just i need 1 to 12 numbers from J1 to U1...

am i clear now

thanks,
Vangoori,

You're welcome.