[vba excel] nettoyer un userform avec des optionbutton

[discusagon]

Bonjour,

j'ai une petite macro qui met en forme des comptes rendu dans excel.

j'ai fait un userform pour demander d'indiquer le valideur du compte rendu avec 4 optionbutton.

ça marche bien la première fois, mais j'ai un soucis quand je fais plusieurs compte rendus à la suite sans fermer les classeurs entre temps :

mes optionbutton restent cochés et je ne peux pas cocher à nouveau celui qui est déjà coché.

Je cherche donc un moyen de tout déselectionner à la fin de la macro pour repartir sur un user form vierge lors du prochain lancement.

Voici le code correspondant à un option button du userform :

Private Sub OptionButton1_Click()
'rappel des noms des fenetres
Dim dateCR As String
Windows("Bilans.xls").Activate
bilan = Sheets("param").Cells(1, 2)
feuillebilan = Sheets("param").Cells(4, 2)
Windows(bilan).Activate
Sheets(feuillebilan).Activate
Range("B5").Select
ActiveCell.End(xlDown).Offset(0, -1).Select
dateCR = ActiveCell
CR = "CR du " & Format((dateCR), "dd mmmm yyyy") & ".xls"
    
    Dim Ctrl As Control
    
    For Each Ctrl In valideur.Controls
        If Ctrl.Object.Value = True Then
            'MsgBox Ctrl.Object.Caption
Windows(CR).Activate
Sheets("CR").Select
Range("E66") = "valideur"
            Exit For
        End If
    Next Ctrl
'_______________________________________
valideur.Hide
ActiveWorkbook.Save
MsgBox ("le compte rendu est créé et enregistré")
   Load dialogue_dejaCR
 dialogue_dejaCR.Show
End Sub

merci

 

[excalibur]

Re : [vba excel] nettoyer un userform avec des optionbutton

bonjour discusagon le forum as tu essaye
unload me a la place de valideur. hide

 

[discusagon]

Re : [vba excel] nettoyer un userform avec des optionbutton

Merci, ça marche très bien avec

Unload Me

et en plus c'est plus propre de fermer complètement la fenêtre plutôt que de la cacher.