Hi again
Sorry for this easy question but I am new in VBA.
How to get my cell to the next row if it reachs the border of the defined range?
Dim myCell As Range
Dim myRange As Range
Dim rowsCnt As Integer
Dim ColumnsCnt As Integer
Dim i As Integer
Dim j As Integer
Set myCell = Range("G6")
Set myRange = Range("G6:M15").CurrentRegion
rowsCnt = Range("G6:M15").CurrentRegion.Rows.Count
ColumnsCnt = Range("G6:M15").CurrentRegion.Columns.Count
For i = 0 To rowsCnt
For j = 0 To ColumnsCnt - 1
Set myCell = myCell.Offset(0, 1)
myCell.Select
Next j
Next i
Please advise
Thank you
Bookmarks