Local loX loX = Createobject("EXCEL.application") loX.Workbooks.Open( Fullpath(myExcelFile)) && && CELL Formating and Conversion Process loX.Columns("A:IV").Select loX.Selection.NumberFormat = "@" && Setting the format of the column as "Text" or being precise "AS ENTERED" lcROWTOTCOUNT=loX.Cells.SpecialCells(11).Row && 11 stands as constant to give value for the filled cell in the column lcCOLTOTCOUNT=loX.Cells.SpecialCells(11).Column && 11 stands as constant to give value for the filled column For lcROWCOUNTER = 1 To lcROWTOTCOUNT && Going though every value in the column to the number of rows till the data is filled For lcCOlCOUNTER = 1 To lcCOLTOTCOUNT && Going though every value in the column to the number of rows till the data is filled If Type('loX.Cells(lcROWCOUNTER,lcCOlCOUNTER).Value')='N' && Checking for its type to be Numeric loX.Cells(lcROWCOUNTER,lcCOlCOUNTER).Value = Padl(Alltrim(Str(loX.Cells(lcROWCOUNTER,lcCOlCOUNTER).Value,14)),8,'0') && Converting in the desired format Endif Next NEXT *Updates to Autofit the columns of the entire excel file loX.Columns("A:IV").Select loX.Selection.Columns.AutoFit && Autofit the contents of the column loX.DisplayAlerts = .F. loX.Save() loX.Workbooks.Close() Release loXThanks.