Goto Tools->macro->record macro
While macro is recording, select the cell, right click and select Format
Cells..., from Category listbox select Currency, OK. Click'Stop' button to
stop macro recording. Press Alt-F11, goto Modules and take a look at the
code for Macro1