>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.