Sziasztok!
Excel VB kód - annyit tesz hogy vár egy keresési értéket - ehhez megnyilik egy beviteli mező. A keresési érték beadásakor indul a keresés, annyi kellene, hogy jelenítsen meg egy üzenetet 2 másodpercre ha megtalálta és akkor is ha nem .
messagebox-al, popup-al próbálkoztam, de mindig ott az OK gomb és ameddig arra nem nyomok rá nem lép tovább a kód.
MsgBox "A keresett érték (" & SearchValue & ") nem található, üres sorba felvétele megtörtént.", vbExclamation + vbSystemModal, "Keresés eredménye"
+ itt az adott VB kódrészlet végén ez a késleltetés is szerepel
Application.Wait (Now + TimeValue("0:00:02"))
illetve:
CreateObject("WScript.Shell").PopUp "A keresett érték (" & SearchValue & ") nem található, üres sorba felvétele megtörtént.", 2
Megjelennek ezek révén az üzenetek, csak ott az OK gomb is ami nem kéne.