Difficultés avec une boucle for avec la condition

Bonjour jean-Claude,

alors, j'ai essayer de remplacer le code, normalement j'ai du faire ça au bon endroit

par contre nous avons un message d'erreur quand on vide les champs dans paramètres et que l'on remplie via l'application ça ne vaut pas

j'ai fait une capture écran, et je remets le fichier.

si j'ai fais une erreur de manipulation ce qui reste du domaine du possible je m'en excuse

bonne fin de journée / soirée

Bien cordialement,

PS: oui la fonction de rajouter une prestation c'est super idée, mais je n'ai pas trouvé

un grand merci

Jeanphy

3doc1.docx (46.14 Ko)

Salut le fil...

Oui je suis aller trop vite j'ai rajouter un TextBox donc le code ne tournait plus.

Change le code de la Méthode Click du CommandButton cmdValid comme suit.

Private Sub cmdValid_Click()

    Dim ctl As control, flag As Boolean

    For Each ctl In Me.MultiPage1.Pages(1).Controls
        If TypeOf ctl Is MSForms.TextBox Then
            With ctl
                If .Value = "" Then
                    flag = True
                End If
            End With
        End If
    Next

    If flag Then
        MsgBox "Vous devez renseigner tous les champs."
    Else

        For Each ctl In Me.MultiPage1.Pages(1).Controls
            If TypeOf ctl Is MSForms.TextBox Then
                With ctl
                    Range(getTheValue(.Tag, "ControlSource")).Value = .Value
                End With
            End If
        Next
        MsgBox "Changement effectué avec succès."
        MultiPage1.Value = 0
    End If
End Sub

Je vais revoir le fichier et rajouter une commande d'effacement des Lieux...

Jean-Claude,

j'ai effectué la manipulation, mais hélas je crois qu'il y a toujours un soucis

je remets le fichier.

désolé si le problème c'est moi

merci beaucoup et bonne nuit à vous.

bien cordialement,

jeanphy

Salut le fil...

Jean-Claude,

j'ai effectué la manipulation, mais hélas je crois qu'il y a toujours un soucis

je remets le fichier.

désolé si le problème c'est moi

merci beaucoup et bonne nuit à vous.

bien cordialement,

jeanphy

Télécharges le fichier que j'ai mis dans le post précédent, j'ai fait d'autres changements...

Bonjour Jean-Claude,

il y a toujours un problème au niveau des lieux ça nous prends le jour en cours et non le lieux

je ne comprends plus

j'ai du faire une mauvaise manipulation je ne sais pas ?

bonne fin de soirée / journée

Cordialement

JEANPHY

Rechercher des sujets similaires à "difficultes boucle condition"