Userform en vba

Résolu

fredow -
fredow - 23 févr. 2009 à 16:53

Bonjour,
je réalise un programme en vba et j'ai un petit souci. J'ai crée une userform avec dessus 5 case à cocher (mes différent critère) et un bouton "ok". Pour le moment quand j'effectue le programme, les actions que j'ai lié aux critère s'effectue dès que je les coche et je souhaiterais qu'elle se réalise que lorsque j'appui sur le bouton "ok" qui ferme la userform
Je découvre les userform et tout ça et j'ai un peu de mal.

Voici le ptit programme au cas ou :
Private Sub CommandButton1_Click() "ok"
Unload Me
End Sub
Private Sub OptionButton1_Click() "1er critère"
Range("A8:A12").Select
Selection.ClearContents
End Sub
Private Sub OptionButton2_Click() "2er critère"
Range("B8:B12").Select
Selection.ClearContents
End Sub
.
.
.

Merci d'avance pour votre aide

Afficher la suite

A voir également:

Userform en vba
Excel compter cellule couleur sans vba - Guide
Incompatibilité de type vba ✓ - Forum VB / VBA
Erreur 13 incompatibilité de type VBA excel ✓ - Forum Excel
Mkdir vba ✓ - Forum VB / VBA
Dépassement de capacité vba ✓ - Forum Excel

3 réponses

Réponse 1 / 3

blfr Messages postés 46 Date d'inscription Statut Membre Dernière intervention 1

normal tes action se passe au moment ou tu choisi ton option
essaie de mettre des action sur le bouton ok donc:

Private Sub CommandButton1_Click() "ok"

'ce que tu avais dans la premiere option
Range("A8:A12").Select
Selection.ClearContents

'ce que tu avais dans la deuxieme option
Range("B8:B12").Select
Selection.ClearContents

Unload Me
End Sub

Réponse 2 / 3

lermite222 Messages postés 8724 Date d'inscription Statut Contributeur Dernière intervention 1 191

Bonjour,
En un peu plus clair :-)

Private Sub CommandButton1_Click() '"ok"
    If OptionButton1 Then
        Range("A8:A12").Select
    ElseIf OptionButton2 Then
        Range("B8:B12").Select
    End If
    Unload Me
End Sub

A+

Réponse 3 / 3

blfr Messages postés 46 Date d'inscription Statut Membre Dernière intervention 1

ha oui désolé j'étais pas vachement clair merci lermitte222

fredow

merci pour les programme mai il mon lair un peu identique, lol, a+

Discussions similaires

"L'indice n'appartient à la sélection" + VBA

Erreur d'exécution 13 Incompatibilité de type

appliquer une pause dans une macro vba excel

ouverture d'un fichier excel à partir d'un code VBA

Méthode find dans VBA - Recherche de données sous Excel

Votre réponse

Discussions similaires