Jeg skal bede om nogle inputs til at danne en tekstfil. Jeg har et regneark med 94 kolonner, som jeg skal have eksporteret i et bestemt format som hedder: "1","2","3",...,"94"
Desværre kan jeg ikke finde dette format, da CVS laver det som: 1;2;3;...;94.
Jeg er klar over at jeg kan få semikolon erstattet med komma via søg og erstat i tekstfilen, men hvordan får jeg hver værdi indrammet med ""?
Nogen der kan hjælpe? Kan det laves ved at lave det i Access eller andet?
Nedenstående VBA-kode giver dette resultat: "1","2","3","4","5","6","7","8","9","10"
Const sti = "" 'justeres Const antalkolonner = 10 'justeres Public Sub xlsTILcsv() Dim linje As String, værdi As String, komma As String linje = "" Open sti + "test.txt" For Output As #1 For k = 1 To 10 værdi = ActiveWorkbook.Sheets(1).Cells(1, k) 'fra række 1 If k < 10 Then komma = "," Else komma = "" End If linje = linje & Chr(34) & værdi & Chr(34) + komma Next k Print #1, linje Close #1 End Sub
Synes godt om
Ny brugerNybegynder
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.
