Avatar billede Gatthebazz Nybegynder
06. april 2011 - 17:11

VBScript ændre CSV format

Hej Eksperten.

Jeg har klippet en VBScript sammen, som åbner en Excel fil og går til et ark, ændre text i celle B44 og går til et nyt ark hvor den så kører en macro. Denne macro gemmer arket som CSV, men i .txt filformat. Når jeg kører dette script, så gemmer den filen med "," (comma) som delimiter, hvor jeg gerne ville have at den brugte ";" (semicomma) som delimiter. Hvis jeg åbner Excel filen manuelt, og kører macro'en så gemmer den CSV (.txt) filen med ";" (semicomma) da der i macro'en er inkl. denne lille streg: "Local:=True". Hvilket fortæller at den skal bruge mine Regional settings. Der er som sagt ikke forskel på macro'en, men outputtet af filen bliver ikke det samme :(

Jeg er rimelig noob på dette område, men har søgt nettet igennem dog uden at jeg fandt løsningen nogen steder.... jeg håber derfor at der er en "Ekspert" der lige kender løsningen på mit problem.

I får også lige det script jeg har sat sammen, hvis det hjælper?

--------------------------------------------

Dim objExcel
Dim objWorkbook


Set objExcel = CreateObject("Excel.Application")
objExcel.Visible = True
set objWorkbook = objExcel.Workbooks.Open("P:\Import to Glomaris\VBS\TEST.xlsm")
set objSheet = objExcel.WorkSheets("List")
objSheet.Activate
objExcel.Cells(44, 2).Value = "C_TEST!"
set objSheet = objExcel.WorkSheets("EXPORT")
objSheet.Activate
objExcel.Run "'TEST.xlsm'!ThisWorkbook.TEST"
objWorkbook.Close True
objExcel.Quit


Set objWorkbook = Nothing
Set objExcel = Nothing

--------------------------------------------
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester