XL 2010 Importer le texte dans plusieurs onglet en fonction d'un ChekBox

[Myst]

Bonsoir le forum
Ci-joint un petit fichier que je voudrais modifier, j'ai passé l'aprés midi dessus mais il y a toujour un bug quelque part donc je me tourne vers vous

1- je clique sur le boutton "Ajouter des événements" de l'onglet "Base"
2- l'userform1 s' ouvre et je remplis tous les ComboBox et TextBox puis je valide
3- toutes les données viennent ce copier dans l'onglet "Base"

La modification que je voudrais apporter est la suivante
1- je clique sur le boutton "Ajouter des événements" de l'onglet "Base"
2- l'userform1 s'ouvre et je remplis tous les ComboBox et TextBox
3- si je selection le chekbox2 je voudrais que les données ailles ce copier dans l'onglet "Base" et aussi dans "QIE"

merci

 

[Lone-wolf]

Re : Importer le texte dans plusieurs onglet en fonction d'un ChekBox

Bonsoir Myst

Private Sub CheckBox2_Click()
If CheckBox2.Value = True Then
With Sheets("QIE")
derligne = .Range("A65536").End(xlUp).Row + 1
For Each Ctrl In UserForm1.Controls
            r = Val(Ctrl.Tag)
            If r > 0 Then
                If r = 1 Then
                    .Cells(derligne, r) = CDate(Ctrl)
                Else
                    .Cells(derligne, r) = Ctrl
                End If
            End If
        Next
    End With
Else
Exit Sub
  End If
End Sub

 

[Myst]

Re : Importer le texte dans plusieurs onglet en fonction d'un ChekBox

Bonsoir Lone-wolf, le forum
OK pour la solution mais je n'ai pas le contenu du TextBox7 dans l'onglet "QIE"

 

[Lone-wolf]

Re : Importer le texte dans plusieurs onglet en fonction d'un ChekBox

Bonsoir Myst

Moi j'ai fait un test avant et je n'ai pas eu ce problème. La macro For Each Ctrl In UserForm1.Controls prends en charge tout les contrôles, je ne comprend pas.

EDIT: j'ai vu d'où venait le problème, Il faut enlever Else Exit Sub. Désolé pour le quack.

 

[Myst]

Re : Importer le texte dans plusieurs onglet en fonction d'un ChekBox

Re
Merci pour tout :
une dernière chose, j'ai modifié un peu l'ensemble pourrais tu jeter un œil pour vérifié si l'ensemble des codes te parais cohérent
Encore merci

 

[Lone-wolf]

Re : Importer le texte dans plusieurs onglet en fonction d'un ChekBox

Bonjour Myst

Je viens de regarder les codes et tout me semble correct. Tu peux continuer sans soucis.


À bientôt.