Delete a sheet...VB

[katie1071]

Hi,

Need help with an IF statement in VB. I need to check if a Sheet has been deleted before switching to it and processing.

For example, a user could delete a worksheet called out in a macro. If so, the module will fail.

In the code, each sheet is called out by Sheet#.Select. I just want to verify it exists before moving forward.

Thanks,
Katie

 

[Norie]

Katie

Is this code being used on every worksheet?

 

[katie1071]

In my workbook, there are 5 worksheets. Each worksheet is different and some link to each other. Before the user sends the file to an external client, they run this macro which strips out formulas, etc and each sheet has a different set of procedures to run. The user could delete a sheet if it's not needed. I want to be able to bypass a sheet if it's been deleted but not bypass other errors that may occur.

 

[pgc01]

Hi Katie

If you have tried the code you saw that you only had to Enable the error handler once and that it stayed enabled as you selected all the sheets. You can, if you want, disable it between selections

In this case you always have to enable it before you select each sheet.

Like blocks of


On Error Resume Next
Sheet6.Select
If Err.Number = 0 Then
Cells.Select
Selection.EntireColumn.Hidden = False
Else
Err.Clear
End If
On Error Goto 0


This way the code between the selections of the sheets will run as usual.

HTH
PGC

 

[katie1071]

I believe this is going to work...I really appreciate the assistance!