Forum di Excel e VBA, per condividere esperienze e risolvere problemi su:
Excel, Word, Access, Power Point, Microsoft Office, macro, Visual Basic e Visual Studio.
Evento ToggleButton
- Hai un problema con Excel?
Evento ToggleButton
di gargiu data: 25/11/2015 14:20:27
Ciao a tutti, tramite il tasto ToggleButton1 inserito in una UserForm, voglio abilitare o disabilitare le barre di scorrimento orizzontali e verticali della UserForm.
Credevo di poterlo fare con la macro che propongo sotto. Clicco una volta ed effettivamente le barre appaiono ma disabilitando il tato, queste non spariscono più.
Sapete dirmi il perchè?
Grazie
Private Sub ToggleButton1_Click() If ToggleButton1.Enabled = True Then UserForm1.ScrollBars = fmScrollBarsBoth Else UserForm1.ScrollBars = fmScrollBarsNone End If End Sub
di gargiu data: 25/11/2015 14:28:51
Risolto, la proprietà era quella sbagliata.
Questo il codice giusto:
Private Sub ToggleButton1_Click() If ToggleButton1.Value = True Then UserForm1.ScrollBars = fmScrollBarsBoth Else UserForm1.ScrollBars = fmScrollBarsNone End If End Sub
di gargiu data: 25/11/2015 14:29:26
Chiudo
- Vuoi Approfondire?
