Matching cell formatting

[cbcrocker]

Is there a way to automatically change a cell's formatting when the formatting of another cell is changed?

 

[venkat1926]

you can do this trick

suppose the cell which has format is G1 and the cell to which this format is to be changed is C1.

now open vbeditor
hit control+R
you get project window on the left containing all the open workbooks
goto this particular workbook and under this right click "thisworkbook" (if necesary click the minus sign on the left of the workbook name)
clcik view code

in the window that comes up copy this EVENT CODE

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Range("G1").Copy
Range("c1").PasteSpecial Paste:=xlPasteFormats
End Sub

(MODIFY the code to suit you)

now change the format of G1 to whatever you want
hit control+S to save the file
C1 also will change to the same format as in G1

 

[cbcrocker]

Thanks, I'll try it. Can this be placed in a template that I use daily for reports?

 

[cbcrocker]

Okay, it works from a template BUT, each time I save it goes to the target cells. Is there a way for it to position to cell A1 after it changes the formatting of the target cells?

 

[venkat1926]

add the following line before end sub

range("A1").select

 

[cbcrocker]

Cool! Thank you!