Hi Thyagaraj,

you could make use of a For Each...Next Loop to format all worksheets
in a workbook one by one.

Dim ws As Worksheet
For Each ws In ActiveWorkbook.Worksheets
'your code
Next 'ws

Regards,
Ingolf
Thyagaraj schrieb:

I have some code to format a sheet.

I dont know how to format all the sheets in a workbook.

Regards
Thyagaraj