Thankyou Dave
The second suggestion works great..the .resize comand did the trick
and has saved me many 'if then' statements.
Thanks again
Chris
"Dave Peterson" wrote:

Dim G as long
dim gml as range

with sheets("input")
for g = 1 to 5
set gml = .range(.cells(g,13), .cells(g,15))
'do something with gml here???
next g
end with

or
for g = 1 to 5
set gml = sheets("sheet1").cells(g,13).resize(1,3)
'do something with gml here???
next g




cgnotrom wrote:

Don't know why this code won't work
Trying to define array ("M1:O1") thru ("M5:O5")
and input results to a child sheet
The code below this and before the 'NEXT' statement works fine.

For g = 1 to 5
Set gml = Sheets("Input").Range(cells(g,13),cells(g,15))
next

Anyhelp is appreciated
Chris

--

Dave Peterson