Thank you James,
I am happy to learn something new today.
>Borislav, Tariq,
>Thanks to Sergey, you can surpres 0s this way
>
>.NumberFormat = "###,###,###"
>* Or condtional formatting
>.NumberFormat = "#[=0];###,###,###.00"
>
>
>>>Dear Sir,
>>>
>>>Thank you very much for helping.
>>>your all codes work fine
>>>Here is another question
>>>
>>>How to apply following format in range(a1:d2)
>>>
>>>@Z 9,99,999.99
>>>
>>>Please help again
>>
>>
>>loSheet.Range("A1:D2").Select
>>loExcel.Selection.NumberFormat = "#,##0.00"
>>
Against Stupidity the Gods themselves Contend in Vain - Johann Christoph Friedrich von Schiller
The only thing normal about database guys is their tables.