On Feb 6, 4:54*pm, "Per Jessen" wrote:
HI

Look at this:

Dim Rng2 As Range
With Worksheets("Data")
* * * *Set rng = .Range("a2", .Range("a" & Columns.Count).End(xlToLeft))
End With

Regards,
Per

"darkblue" skrev i ...



Dim rng As Range
With Worksheets("Data")
* * * Set rng = .Range("a2", .Range("a" & Rows.count).End(xlUp))
End With
rng.Select
--------------------

With above code I select all data in column A.
How can I select all data in row 1.
I mean what is the equal code for selecting columns in a row ?
Thank you.- Hide quoted text -

- Show quoted text -


Thank you so much Per.