Hirdetés

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

  • Szirty

    őstag

    válasz DP_Joci #3869 üzenetére

    Üdv DP_Joci!

    "A file létrehozásánál a file neve és a munkafüzet neve ugyanaz lesz, a munkafüzet nevét lehet változtatni létrehozáskor?"

    Az excel nevezi el így. Természetesen a scriptből adhatsz más nevet is a file-nak, így a munkafüzeted nevét is tudod befolyásolni.

    "Lehet egy file-ba különböző munkafüzeteket felvenni?"
    A kérdésnek nincs értelme, mert ez nem excel munkalap file-t hoz létre, hanem egyszerű szöveges CSV-t, ami semmi mást nem tartalmaz, mint adatok hosszú sorát. Vagyis nincs benne "munkafüzet".
    Ha esetleg az excelt lehet CSV-ből arra késztetni, hogy egy bizonyos "utasítás" beolvasása utáni adatokat egy bizonyos másik munkafüzetben helyezze el, ekkor lehet, mert a scriptből a CSV-be azt írsz, amit akarsz, de ez nem a scripten fog múlni ilyenformán, hanem az excelen (kétlem, hogy lenne ilyen lehetőség, de utána kell nézni).

    "Az egyes cellákba lehet adatokat pakolni a cella címének hivatkozásával pl. A1, B2, stb"

    Nem hinném, hogy az excelt CSV-ből ilyesmire lehetne kényszeríteni. Egyszerűen berakja a táblázat egy-egy sorába a CSV-ben egymás után lévő adatokat. Ami új sorba van a CSV-ben az új sorba kerül a táblázatban. Nagyjából ez minden.

    "Van helyette valami olyasmi, amivel lehet jelezni, hogy az írás készen van?"

    Nincs, mert az írás akkor van kész, amikor a script lefutott és végrehajtotta a file objektumra vonatkozó Close metódust. Azt meg a scriptből kezelheted jelzőkkel hogy mikor futott le. Tehát ahogy most csinálod az úgy jó szerintem.

    "...valahogyan ellenőrizni, hogy nincs bedugva a pendrive"

    Ellenőrizheted a logikai meghajtó létezését, ami a pendrive-ot reprezentálja. Remélve, hogy mindig ugyanazt a betűjelet kapja. Ez így néz ki:

    Dim CSV
    Set CSV = CreateObject("Scripting.FileSystemObject")
    If CSV.DriveExists("I:") Then
    'Ami itt van lefut ha az I: drive létezik
    End If

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