[You need to copy the cell with the format then use paste special using
fORMATS to paste the cell into the the sedcond workbook


To get format only:

Range("A1").Copy
Range("C1").PasteSpecial _
Paste:=xlPasteFormats


Or to get the value and the format

Range("A1").Copy
Range("C1").PasteSpecial _
Paste:=xlPasteFormats
Range("C1").PasteSpecial _
Paste:=xlPasteValues



The source and destination cells can be any cell in any workbook.


--
joel
------------------------------------------------------------------------
joel's Profile: http://www.thecodecage.com/forumz/member.php?u=229
View this thread: http://www.thecodecage.com/forumz/sh...d.php?t=207258

http://www.thecodecage.com/forumz