Forgot some info, once you have imported it (from a new workbook press Alt +
F11, click file>import and import it), then save as *.xla, then go to
tools>add-ins and check it. Finally to use it
=EXTCELL("bold",A1)
will return 1 if cell is formatted bold, so with regards to your specifics
=IF(EXTCELL("bold",A1)=1,A1,"")
there are a lot of other functions built in as well, there is no help file
so you need to open the bas file in notepad for instance and print it since
each function has it's own description
Regards,
Peo Sjoblom