Identifying Multiple Selected Worksheets

[Guest]

Hi,

I'm trying to create a macro that will only affect the worksheets that are currently selected (when a user uses ctrl+click on multiple worksheet tabs). How do I identify which worksheets are selected in VBA?

Thank you very much,
-David

 

[Michael Malinsky]

This code shows a message box for each selected worksheet in the workbook:

For Each sh In Workbooks("BOOK2.XLS").Windows(1).SelectedSheets
MsgBox sh.Name
Next

HTH

--
Michael J. Malinsky
Pittsburgh, PA

"I am a bear of very little brain, and long
words bother me." -- AA Milne, Winnie the Pooh

Hi,

I'm trying to create a macro that will only affect the worksheets that are

currently selected (when a user uses ctrl+click on multiple worksheet tabs).
How do I identify which worksheets are selected in VBA?

 

[Ron de Bruin]

Hi David

You can loop through them like this

Sub test()
Dim sh As Worksheet
For Each sh In ActiveWindow.SelectedSheets
MsgBox sh.Name
Next
End Sub


--
Regards Ron de Bruin
http://www.rondebruin.nl

Hi,

I'm trying to create a macro that will only affect the worksheets that are currently selected (when a user uses ctrl+click on

multiple worksheet tabs). How do I identify which worksheets are selected in VBA?