Disabilitare tasto esc



  • Disabilitare tasto esc
    di Rita (utente non iscritto) data: 25/11/2014 12:07:27

    Ciao a tutti
    avrei bisogno di disabilitare il tasto esc nell'esecuzione di una macro
    ho inserito il comando posto qui sotto all'inizio della macro ma premendo il tasto esc la macro si interrompe lo stesso
    qualcuno ha un idea dove possa sbagliare

     
    Application.OnKey "{ESC}", ""
    



  • di lepat (utente non iscritto) data: 25/11/2014 17:03:16

    prova così
     
    Sub NoChange()
    i = 0 ' does nothing, used by NoEsc macro
    End Sub
    
    
    Sub NoEsc()
    Application.OnKey "{ESC}", "NoChange"
    ' Goes to procedure NoChange if escape key hit
    End Sub
    
    
    Sub YesEsc()
    Application.OnKey "{ESC}"
    ' Turns on the keyboard escape key.
    End Sub



  • di Rita (utente non iscritto) data: 25/11/2014 18:48:10

    Scusa ma non ho capito come andrebbero utilizzate e in che modo
    Sono tre sub



  • di lepat (utente non iscritto) data: 26/11/2014 08:46:15

    I titolo parlano da soli,
    NoEsc() disabilita esc (simile alla tua, ma al posto di "" lancia una sub che non fa niente
    YesEsc() lo riabilita
    NoChange() è una sub di servizio utilizzata da NoEsc.