xlObj dévil como objeto, xlFile, lastRow como de largo
csvFile dévil como secuencia
csvFile = “C:\Ipaymetrics.csv”
xlFile = “C:\Ipaymetrics.xls”
Fijar el xlObj = CreateObject (“Excel.Application”)
xlObj.Workbooks.Open xlFile
Con el xlObj
lastRow=.Usedrange.rows.count
. Gama (“A” y lastrow). Selecto
. Selection.EntireRow.Delete
Extremo con
xlObj.ActiveWorkbook.SaveAs csvFile, FileFormat: =6, CreateBackup: =False
xlObj.Application.DisplayAlerts = falso
xlObj.Quit
Fijar el xlObj = nada