Telefonszámunk: 1-472-0679

CSV file létrehozása makróval

Kezdőlap Fórumok Excel programozás CSV file létrehozása makróval

4 bejegyzés megtekintése - 1-4 / 4
  • Szerző
    Bejegyzés
  • #3364
    Vbacube
    Felhasználó

      Szia Imre,
      belefutottam egy CSV készítési problémába. Adott egy munkalap, benne egy táblázat, az egyes cellákban adatokkal Ezeket az adatokat importálni szeretném egy másik alkalmazásba, de az csak .csv fájlt tud beolvasni, és azt is csak akkor, ha az importálandó fájl a tartalmat táblázatos formában tartalmazza. A csv mentésre szerettem volna egy makrót írni, hogy egy gomb megnyomásával létrejöhessen az állomány. Itt a probléma. Ha ugyanis az állományt csv fájlként manuálisan mentem, a táblázatos forma megmarad, és a beolvasása is működik ha azonban ugyanezt makróval végeztetem, akkor vesszővel tagolt formában jön létre a csv, amit viszont az alkalmazás nem fogad el.
      Ugyanez a jelenség a CSV (pontosvesszővel tagolt) és a CSV (MS-DOS) formátum választása esetén is fennáll.
      Csatoltam a fájlt, benne a makróval, amivel készült, valamint az OK és NOK formátumok mintáival.
      Van valami ötleted?
      Előre is köszönöm.
      Üdvözlettel
      András

      #3365
      Vbacube
      Felhasználó

        Nem látom a csatolmányt, úgyhogy megpróbálom még egyszer.

        Attachments:
        You must be logged in to view attached files.
        #3368
        horvimi
        Adminisztrátor

          Szia!

          Csak egy apróságon múlik a dolog. A mentéskor meg kell adni a Local:=True argumentumot is.
          Ezzel utasítjuk arra, hogy a helyi beállításoknak megfelelő elválasztójeleket kezeljen.
          tehát olvasáskor és íráskor is a magyar rendszernek megfelelően pontosvesszőket használ.

          Ez persze csak akkor igaz, ha magyar a Windows vagy olyan, ahol a nemzetközi beállításokban a listaelválasztó jel pontosvessző.

          A kérdéses parancs tehát nálad:

          ActiveWorkbook.SaveAs Filename:= _
                  "C:\Users\.....\Desktop\Partnerek_Teszt.csv", FileFormat:=xlCSV, _
                  CreateBackup:=False, Local:=True

          Imre

          #3369
          Vbacube
          Felhasználó

            Köszi szépen, így már működik! 🙂

            András

          4 bejegyzés megtekintése - 1-4 / 4
          • Be kell jelentkezni a hozzászóláshoz.