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

• Lasersailing senior tag

  #48852 2022-04-21 12:42:27

  Új Válasz

  Ú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

  

  Lasersailing

  senior tag

  Sziasztok,

  (angol office 365, excel vba)

  Egy programmal szeretnék írható formátumban megnyitni egy exceles adatbázist. Azt nem tudom biztosítani, hogy épp abban a pillanatban más program ne írjon a file-ba, de azt igen, hogy a másik program ha megnyitja írásra, akkor írás után zárja is be azonnal az adatbázist.
  Jelenlegi megoldásom: megnyitom a file-t ha readonly, akkor bezárom és újranyitom, közben kap egy üzenetet a felhasználó, hogy várjon és 1 másodperc múlva újra próbálom nyitni a filet:
  Res = SH.Popup(Text:="Az adatbázisba éppen másik program ír adatot. Kis türelmet kérek: " & Chr(13) & szamolo & " -szer fogom még megpróbálni", secondstowait:=1, Title:="Adatbázis írás", Type:=vbOKOnly)
  Ez egész jól is működik, csak nem tudom, hogyan lehetne a várakozási időt pl. 0.1 másodpercre levinni. Ezt hogyan lehet megtenni?

  Vagy a másik szintén jó megoldás lenne, ha az adatírás előtt ki tudné tenni a képernyőre egy üzenetet, hogy "adatok írása", ami addig van kint, amíg az adat kiírása meg nem történik.

  Köszönöm előre is a segítséget!

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