View Single Post
Old 09-10-2007, 00:12   #8
MarcoGG
Senior Member
 
L'Avatar di MarcoGG
 
Iscritto dal: Dec 2004
Messaggi: 3210
1. Excel / Visualizza / Barre Degli Strumenti / Strumenti Di Controllo.

2. Quando la barra "Strumenti Di Controllo" è visibile, scegli il controllo "Interruttore", che non è altro che un pulsante di comando "speciale" ( Interruttore = "ToggleButton" - nome VBA... )
Ne crei uno sul foglio che ti interessa. Ad es.: Foglio1.

3. Se entri in modalità progettazione e fai Doppio-Click sul ToggleButton ti si apre l'editor VBA, no ?
La routine, ossia il codice da far eseguire al Click del ToggleButton sarà diversa a seconda che in quel momento sia premuto o rilasciato :
- ToggleButton1.Value = True significa che lo stato è PREMUTO.
- ToggleButton1.Value = False significa che lo stato è RILASCIATO.

4. Le msgbox sono finestre di messaggio che ho usato per esemplificare... In pratica devi usare questo codice e sostituire solo dove è grassetto, mettendoci le tue macro...
Codice:
Private Sub ToggleButton1_Click()
    If ToggleButton1.Value = True Then
        MsgBox "PREMUTO"   
    Else
        MsgBox "RILASCIATO"    
    End If
End Sub
MarcoGG è offline   Rispondi citando il messaggio o parte di esso