Select Case True question

[Pinaceous]

Hi All,

I'm working on a sub to apply it on a workbook with 26 worksheets in it.



So how do I use

Select Case True

to say something like ...

If active curser is on worksheet 26 then

Case Worksheet(26)

then

.Subject = Worksheets(26).Range("O18").Value   .Display

So on, if active curser is on worksheet 24 then

Case Worksheet(24)

then

.Subject = Worksheets(24).Range("O18").Value   .Display

Does anyone see where I'm going with this?

Many thanks for your help.

Respectfully,
Pinaceous

 

[JoeMo]

Is Worksheet(26) the tab name of the sheet or did you mean Worksheets(26) where 26 is the sheet index (26th sheet from the left-most sheet on the sheets tab of the workbook)? If you are referring to a sheet index try:

Select Case Activesheet.Index
Case 26
'rest of code
End Select

 

[Pinaceous]

Is Worksheet(26) the tab name of the sheet or did you mean Worksheets(26) where 26 is the sheet index (26th sheet from the left-most sheet on the sheets tab of the workbook)?]

Hello Joe!

This is correct.

Whereby if I'm actively on Worksheet(24) it will select that case.

I am getting a VBA compile error when using the code.

Case without Select Case

Can you help me with this?

Thank you!
Paul

 

[Pinaceous]

Hi Joe,

I'm sorry, I've got it to work.

Don't worry about it!

Your code worked perfect.

Thanks again!
Paul