April 2006
Beginner
1114 pages
98h 16m
English
Application.ReplaceFormat [= setting]
Sets or returns the CellFormat object used when reformatting during search and replace. For example, the following code replaces all bold with italic:
Sub TestReplaceFormat( )
Dim fBold As CellFormat, fItal As CellFormat
Set fBold = Application.FindFormat
Set fItal = Application.ReplaceFormat
fBold.Font.Bold = True
fItal.Font.Bold = False
fItal.Font.Italic = True
Cells.Replace "", "", , , , , True, True
End SubRead now
Unlock full access