VBA formula to delete all formatting in workbook?

[mahmed1]

Hi Guys,

What 's the VBA formula to delete all formatting in workbook, just formatting on the cells? (Not conditional formatting).

 

[venkat1926]

try this.. highlight the cells and click format(menu)-cells-number-general

 

[AlphaFrog]

When you say Delete Formatting, that can mean a lot of different things; Font Bold, Font color, Cell number formats, cell bacground colors, etc.

This will clear just the cell background colors (not conditional formatting) for all sheets.

Sub Clear_Cell_Backgroud()
        
    Dim ws As Worksheet
    
    For Each ws In Worksheets
        Cells.Interior.ColorIndex = xlNone
    Next ws

End Sub

 

[mahmed1]

When you say Delete Formatting, that can mean a lot of different things; Font Bold, Font color, Cell number formats, cell bacground colors, etc.

This will clear just the cell background colors (not conditional formatting) for all sheets.

Sub Clear_Cell_Backgroud()
        
    Dim ws As Worksheet
    
    For Each ws In Worksheets
        Cells.Interior.ColorIndex = xlNone
    Next ws

End Sub

hi

i mainly need to delete borders

 

[VoG]

Try

Sub NoBorders()
Dim ws As Worksheet
For Each ws In ActiveWorkbook.Worksheets
    ws.UsedRange.Borders.LineStyle = xlNone
Next ws
End Sub

 

[mahmed1]

Try

Sub NoBorders()
Dim ws As Worksheet
For Each ws In ActiveWorkbook.Worksheets
    ws.UsedRange.Borders.LineStyle = xlNone
Next ws
End Sub

Thank You