ClearContents for a range of worksheets

[dalex17]

Regarding Microsoft Excel:

I have a code (below) that clears the contents of cell B95 each time the workbook opens.

Range("B95&quot.ClearContents

The problem I am having is that it only clears the cell of the one active worksheet that was last open; each time I re-open the workbook.

Is there a way to clear that cell from all of the worksheets in the workbook, each time the workbook is closed and opened?

Please let me know if I should clarify.

Dalex

 

[dan1967]

Sure. Try:

For Each s In Sheets
Range("B95&quot.ClearContents
Next s

Dan.

 

[dan1967]

I want to ammend my post above. Try the following modified code instead:

Dim s
For Each s In Worksheets
s.Range("B1&quot.ClearContents
Next s