2. Fórumok
  3. OS, alkalmazások
  4. Microsoft Excel topic
  5. (kiemelt téma)
Legfrissebb anyagok
Mobilarena témák
PROHARDVER! témák
IT café témák
GAMEPOD témák
  • Téma összefoglaló
    Utoljára frissítve: 2023-11-13 08:31

    Mobilarena

    A Microsoft Excel topic célja segítséget kérni és nyújtani Excellel kapcsolatos problémákra.
    Kérdés felvetése előtt olvasd el, ha még nem tetted.

Új hozzászólás Aktív témák

  • #45668 Fferi50 Topikgazda KBaj #45663
    Új Válasz #45668
    Új hozzászólás
    Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
    Privát üzenet küldése

    Fferi50

    Topikgazda

    válasz KBaj #45663 üzenetére

    Szia!
    Tapasztalatom alapján a következőt javaslom:
    Nem kell az adatokat az A oszlopba összevonni! A makróval csv-be mentés "magától" megcsinálja a vesszővel tagolt fájlt. Így megspórolhatod az összemásolás műveletét.
    Elég, ha az adott munkalapot átmásolod egy új munkafüzetbe és mented az újat, majd bezárod.
    A rákérdezést az
    Application.DisplayAlerts=False
    sorral tudod elkerülni.
    Vagyis nagyjából így nézhetne ki a makród ezen része:
    Sheets("… Adatsor").Copy '(az eredeti, oszlopokban adatot tartalmazó munkalap másolása új munkafüzetbe - ezután ez a munkafüzet lesz az aktív.
    Application.DisplayAlerts=False
    ActiveWorkbook.SaveAs Filename:= _
    "C:\...\Vesszővel tagolt" & sz & Cikl & ".csv", FileFormat:=xlCSVUTF8, CreateBackup:=False
    ActiveWorkbook.Close False ' további mentés nélkül bezárjuk az új munkafüzetet, ismét az eredeti lesz aktív
    Application.DisplayAlerts=True ' ha a figyelmeztetéseket látni szeretnéd

    Üdv.
    Ps. persze a mentéshez szükséges változóknak értéket kell adnod itt is előzetesen.

Új hozzászólás Aktív témák