sub EveryCertainSheet()

dim ws as worksheet
for each ws in worksheets
if isnumeric(ws.name) then call YourMacro
next ws

end sub

" wrote:

On Jan 17, 11:32 am, dan dungan wrote:
If the sheets are formatted identically, you could select the sheets
and enter the formula. This enters the formula in all sheets selected.

If that's no good, please describe your need with more detail.

Dan

hello Dan,

i wrote a code that will perform some calculations . i have several
sheets in this book, and the names could be 20, 20s , 20R, 30,30s,
30R..... and so on. i want to execute the code i wrote inside all
sheets that have have a name like 20,30,40,45,...... . i dont want to
execute this code in sheets that has a name that include letters like
20s, or 20R, or 40s.....