crear archivo csv desde excel con visual basic
Publicado por luis (1 intervención) el 31/07/2001 00:13:18
Estimados. tengo el siguiente codigo con el cual estoy crando un archivo CSV, lamentablemente no he podido hacer que el separador sea ; (punto y coma).
estoy con vBa 6.0 , excel 97 -sr2 en la configuracion regional tengo separardor de miles (punto), separador decimales(coma) y separador de lista (punto y coma).
Set vbaplexc = CreateObject("Excel.application")
vbaplexc.Workbooks.Open ("C:\Equipos de Bodega.xls")
vbaplexc.Workbooks("Equipos de Bodega.xls").Activate
vbaplexc.Workbooks("Equipos de Bodega.xls").Sheets("Hoja1").Activate
vbaplexc.DisplayAlerts = False
vbaplexc.ActiveWorkbook.SaveAs FileName:="C:\Equiposb.csv", FileFormat:=xlCSV, _
CreateBackup:=False
vbaplexc.Quit
Set vbaplexc = Nothing
Unload Me
Si alguien me puede dar una mano o una idea por donde agarrarlo
Gracias amigos
estoy con vBa 6.0 , excel 97 -sr2 en la configuracion regional tengo separardor de miles (punto), separador decimales(coma) y separador de lista (punto y coma).
Set vbaplexc = CreateObject("Excel.application")
vbaplexc.Workbooks.Open ("C:\Equipos de Bodega.xls")
vbaplexc.Workbooks("Equipos de Bodega.xls").Activate
vbaplexc.Workbooks("Equipos de Bodega.xls").Sheets("Hoja1").Activate
vbaplexc.DisplayAlerts = False
vbaplexc.ActiveWorkbook.SaveAs FileName:="C:\Equiposb.csv", FileFormat:=xlCSV, _
CreateBackup:=False
vbaplexc.Quit
Set vbaplexc = Nothing
Unload Me
Si alguien me puede dar una mano o una idea por donde agarrarlo
Gracias amigos
Valora esta pregunta
0