USERFORM

[DAVIDP]

Bonjour le forum,

je débute en VBA , si quelqu'un à un peu de temps à me consacrer.


j'ai créer un userform où j'accéde avec une macro.

j'ai mis sur l'userform 3 boutons option + 2 boutons command button ( 1 pour valider le choix d'un bouton option 'valider' l'autre pour sortir 'sortir').


Probléme: Quelle est la macro à écrire lorsqu'un choix est validé ( exemple : Feuille 'résultat'?


Je joins en annexe un fichier exemple.


Cela m'aidera à réaliser par la suite des choses plus complexe


Merci d'avance et bonne soirée

[file name=test_20050410204609.zip size=8569]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/test_20050410204609.zip[/file]

 

[Nanard]

Bonsoir DADIDP, le forum,

Voici ta réponse en fichier zippé

@+

Nanard [file name=testNanard.zip size=11744]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/testNanard.zip[/file]

 

[_Thierry]

Bonsoir David, le Forum

Voici un code à mettre dans le Private Module d ton UserForm1 à la palce de celui existant pour le CommandButton2_Click

Private Sub CommandButton2_Click()
    Dim i As Byte
   
        For i = 1 To 3
            If Controls('OptionButton' & i) = True Then
            Exit For
            End If
        Next
   
    Select Case i
        Case 1: Sheets('résultat').Select
        Case 2: Sheets('bilan').Select
        Case 3: Sheets('dette').Select
        Case 4: MsgBox 'aucun OptionButton sélectionné', vbCritical, 'ALerte Rouge LOL !!!'
    End Select

End Sub

Bonne Soirée
@+Thierry

 

[_Thierry]

Bonsoir Nanard, re David

Désolé je n'avais pas raffraichi.

Je viens de regarder ta solution, oui c'est tout à fait correct aussi et plus directe aussi, mais étant donné que David voulait un bouton pour valider le choix des OptionButtons, il faut faire plus compliqué !!! Ou supprimer le bouton de Choix !!!

Bonne Soirée
@+Thierry

 

[davidp]

Merci à Nanard et Thierry pour vos explications ,

je vais mettre en application tout ceci d'ici 2 h.


(en fois que tout le monde dormira)


A plus tard


Bonne soirée et merci pour votre rapidité

 

[Nanard]

Je m'incline devant le grand maitre du VBA ,lol

@+

Nanard

 

[davidp]

Merci à tous les deux ,

les 2 méthodes fonctionnent à merveille.


Bonne soirée