Delete all sheets in workbook with Value X in Cell X

[sweeter]

Hi there everyone.

Title is pretty self-explanatory. For example, I have a workbook with a hundred sheets in the same format. I would like a script to delete all the sheets with "Short Term" in cell A4.

Any help with this would be greatly appreciated. Attached is a dummy workbook for your reference.

:-)

[contaminated]

Try tgis our

Please Login or Register  to view this content.

How to use:

1. Copy above code.
2. In Excel press Alt + F11 to enter the VBE.
3. Choose Insert -> Module.
4. Paste code into the right pane.
5. Press Alt + Q to close the VBE.
6. Save workbook before any other changes.

[sweeter]

Thank you so much. It works perfectly. You are incredible. :-)