View Single Post
 
Old 01-09-2024, 04:11 AM
Guessed's Avatar
Guessed Guessed is offline Windows 10 Office 2016
Expert
 
Join Date: Mar 2010
Location: Canberra/Melbourne Australia
Posts: 3,995
Guessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant future
Default

I'm not sure on the purpose of this macro but your loop might work with
Code:
  For i = 2 To 100
    Range(Range("range" & i), rng0).Select
    Set rng0 = Selection
  Next i
__________________
Andrew Lockton
Chrysalis Design, Melbourne Australia
Reply With Quote