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

  • Fferi50

    őstag

    válasz Sprite75 #44890 üzenetére

    Szia!
    "Szóval az kivitelezhető, hogy a rendelős táblázat bezárásakor leálljon az időzítő ha az excel továbbra is nyitva marad egy máik táblázat miatt?"
    Természetesen. Ehhez egy leállító makrót kell meghívni a fájl bezárásakor.
    A kovido változód legyen Date típusú.
    Az időzítés indításakor meg kell nézni, hogy a korábban beállított időzítés élő-e még, hogy ne indítson rá egy újabbat.
    Tehát az első sor az időzítő makróban:
    If kovido>Now Then Exit Sub ' azaz nem indítunk újabb időzítést, ha még nem futott le.
    A leállító makró:
    Sub idoleall()
    If kovido > Now Then Application.OnTime kovido, "idozit", , False  ' ide a saját időzítő makród nevét írd
    End Sub

    A makrót a Thisworkbook modulba a Workbook_BeforeClose eseménykezelőbe kell betenni:
    Private Sub Workbook_BeforeClose(Cancel As Boolean)
    idoleall
    ThisWorkbook.Saved = True
    End Sub

    Remélem sikerül.

    Üdv.

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