View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.misc
Don Guillett Don Guillett is offline
external usenet poster
 
Posts: 10,124
Default Equal = both value and format of another cell

Right click sheet tabview codecopy/paste this. You may want to restrict to
certain cells.

Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
Range(Cells.Find(Target).Address).Copy
Target.PasteSpecial Paste:=xlPasteFormats
Application.CutCopyMode = False
Application.EnableEvents = True
End Sub

--
Don Guillett
SalesAid Software

"Kevin BC" wrote in message
...
How can I modify the formula of equals (=) so that it equals both the
value
and formatting of another cell?
--
KBC