cancellazione CheckBox



  • cancellazione CheckBox
    di marxitpa data: 10/03/2014 17:12:03

    In una Userform ho inserito tre caselle di controllo con il codice indicato.
    Quando seleziono la casella preferita, nella cella BL10 mi compare previsto (1, 2 o 3).
    Purtroppo il simbolo di selezione nell'ultima CheckBox scelta mi compare anche dopo la chiusura e successivo riavvio della Userform
    Come fare per azzerare le CheckBox al riavvio della Userform?

     
    Private Sub CheckBox1_Click()
    If CheckBox1.Value = True Then Range("BL10").Value = 1
    If CheckBox1.Value = False Then Range("BL10").Value = ""
    End Sub
    Private Sub CheckBox2_Click()
    If CheckBox2.Value = True Then Range("BL10").Value = 2
    If CheckBox2.Value = False Then Range("BL10").Value = ""
    End Sub
    Private Sub CheckBox3_Click()
    If CheckBox3.Value = True Then Range("BL10").Value = 3
    If CheckBox3.Value = False Then Range("BL10").Value = ""
    End Sub



  • di Lucas87 data: 10/03/2014 19:31:10

    Ciao.
    Inserisci questo in thisworkbook nell'evento open.
     
    For n = 1 To ActiveSheet.OLEObjects.Count	
    If InStr(1, ActiveSheet.OLEObjects(n).Name, "checkbox", vbTextCompare) > 0 Then		
        ActiveSheet.OLEObjects(n).Object.Value = False
    End If
    Next
    



  • di marxitpa (utente non iscritto) data: 10/03/2014 19:47:57

    Grazie Lucas87, sei sempre gentilissimo.
    Mi sono accorto, e ne chiedo scusa a tutti, di aver posto in modo non corretto la richiesta.
    In effetti ho l'esigenza quando seleziono una CheckBox, la spunta deve scomparire dalle altre, anche in fase di scelta.

    Esempio: metto la spunta sulla 2. Prima di procedere con altre fasi voglio modificare la scelta e mettere la spunta sulla 1 (chiedo che quella della 2 si cancelli).



  • di Zer0Kelvin data: 11/03/2014 03:00:59

    Ciao.
    Stai usando, e non sei il primo che vedo, il controllo sbagliato.
    Per fare quello che ti serve (una sola opzione selezionabile per volta) non si usano le ChekBoxes, ma gli OptionButtons, che si escludono automaticamente a vicenda.



  • di marxitpa data: 11/03/2014 06:40:42

    Grazie Zer0Kelvin, risolto.



  • di marxitpa data: 11/03/2014 06:52:21




  • di Grograman (utente non iscritto) data: 12/03/2014 08:50:26

    cit: "Stai usando, e non sei il primo che vedo, il controllo sbagliato. "

    Maporcpalettmannag....

    Non hai idea l'ultima volta quanto ho imprecato per far attivare solo l'ultima checkbox cliccata....