Set Range Reference

[30percent]

Hi,


I got the final column from the code below.

finalCol = ThisWorkbook.Worksheets("Daily Totals").Cells(2, Sheets("Daily Totals").Columns.Count).End(xlToLeft).Column

How do I set a range to reference G2 to finalCol & row 2?


The following code is only for reference to help explain what I try to code - but it doesn't reference the range that I want.

'Set rng_column_loop = ThisWorkbook.Worksheets("Daily Totals").Range("G2: finalCol and row 2)

 

[Norie]

Try this.

With ThisWorkbook.Sheets("Daily Totals")
    Set rng_column_Loop = .Range("G2", .Cells(2, .Columns.Count).End(xlToLeft))
End With