setting format cell accounting using vba

Hi,
i am doing some calculations using vba in excel, i need to know how to set the cell format to 'accounting' in vba ?

thanks for the help
sam