What am i doing wrong? VBA

[filarap]

Hi all,

I have a subscript out of range error, but i cannot find the reason why.
Whatever i do or change, it still comes back. Debug shows me range selection as an error.
Can anyone assist me?



char1 = "'"
char2 = "/"
char3 = "-"
char4 = ","
char5 = "."
char6 = "ß"





Set rng1 = Worksheets("Sheet1").Range("B22:u120").CurrentRegion






For Each rng2 In rng1

....

Regards
Filarap

 

[Fluff]

Do you have a sheet called Sheet1?

 

[filarap]

Sheet itself has different name, but i used the name sheet1 as it is designating that sheet in projects window.
I will guess that it cannot be used in that way?

Regards

 

[Fluff]

If your referring to the codename try

Set rng1 = Sheet1.Range("B22:u120").CurrentRegion

But that sheet has to be in the same workbook as the macro

 

[filarap]

Thank you Fluff,

I tried both your suggestion and using sheet name instead and it works

Regards

 

[Fluff]

Glad you got it sorted & thanks for the feedback