controllo insubroutine



  • controllo insubroutine
    di Beppe (utente non iscritto) data: 04/01/2015 16:22:56

    Ciao ragazzi volevo chiedere se per favore potevate aiutarmi, il problema è che vorrei inserire un commandbutton in una subroutine in modo che cliccandolo dal pannello di controllo che ho su un foglio dia un comando di exit sub. Si può ?? se si come ??

    ringrazio anticipatamente

    Ciao



  • di lepat (utente non iscritto) data: 04/01/2015 16:36:16

    un esempio


     
    dim flag as boolean ' dichiarata prima della sub è pubblica
    sub tuasub
    flag = False
    do 
    ....
    ...
    if flag = true then exit sub
    loop
    end sub
    
    sub pulsantepremuto
    flag = true
    end sub



  • di Beppe (utente non iscritto) data: 04/01/2015 16:44:09

    La provo grazie ciao



  • di Vecchio Frac data: 04/01/2015 16:52:27

    Non si può "inserire un commandbutton in una subroutine".
    E che cos'è questo "pannello di controllo"? Una userform? un pulsante activex sul foglio?
     
    
    






  • di beppe (utente non iscritto) data: 04/01/2015 16:59:31

    sul foglio1 ho creato una zona in cui ci sono due cmd uno dà la partenza e l'altro dovrebbe dare lo stop anticipato da un ciclo For,quindi vorrei inserire nella sub un comando in cui in secondo cmd mi fermi la sub anticipatamente. Grazie ciao



  • di Vecchio Frac data: 04/01/2015 17:17:58

    Una specie di cronometro?
    Hai tirato fuori una bella gatta da pelare :)
    Comunque cerca DoEvents() nella Guida, dovrebbe darti qualche informazione in più.





  • di lepat (utente non iscritto) data: 04/01/2015 17:56:50

    Giusto ! come ha detto Vecchio Frac all'interno del loop o del for devi inserire l'istruzione DoEvents() in modo da poterti dare la possibilità di cliccare sul pulsante (l'avevo dimenticato).
    Se hai dubbi allega un file di esempio.



  • di Beppe (utente non iscritto) data: 04/01/2015 18:29:51

    Grazie a tutti ci provo e vi faccio sapere

    Ciao



  • di Beppe (utente non iscritto) data: 04/01/2015 20:18:15

    Ho adattato il codice di lepat e funziona .
    Grazie a tutti
    p.s. Vecchio frac hai azzeccato è proprio un conto alla rovescia. con la funzione timer



  • di Vecchio Frac data: 04/01/2015 20:39:45

    Se è così vai a studiarti come funziona Application.OnTime, magari con Google cerca anche SetTimer e KillTimer.
    Nello storico di questo forum ci sono interventi interessantissimi sull'argomento, sia miei che di scossa, con soluzioni molto valide e soprattutto sicure (cioè che non ti inchiodano il pc).





  • di Beppe (utente non iscritto) data: 04/01/2015 20:49:57

    Ok ! VF , grazie