Discussion :

[Patouillou]

Bonjour à tous, j'ai presque fini mon outil de travail , mai il me reste juste un petit détail à modifier , quand je double clic sur une ligne de mon tableau , alors une page s'ouvre avec toute les données de la ligne . Mais mon problème, est que lorsque modifie une case ( par exemple l'installateur, ou le N° de produit ) je clic sur le bouton "Modifier" , la page se ferme ( pour l'instant tous va bien ) , mais ici, la valleur modifier dans l'UserForm n'est pas modifier dans le tableau :/

Si quelqu'un pouvait me résoudre mon problème :p

Merci de votre aide !

Cordialement

Voici le fichier : SUIVI INTERVENTIONS Pour forum.xlsm
Ps: Merci de ne pas toucher au reste du code qui me conviens très bien , juste mon problème ^^

[eriiic]

Bonjour,

Tu te bases sur le Tag pour savoir si tu dois mettre à jour mais ils sont tous vides (?)
Et Cancel=true pour ne pas passer en édition.

eric

[Patouillou]

Bonjour éric , je doit te dire, que , tout d'abord , je suis un débutant et que n'est aucunes idée de ce que sont les Tag :p
J'ai créer mon code a partir de mélange rechercher sur différent forum , et pour une grande partie du code, c'est un certain Thauthème qui m'a aidé , il m'avait fais un UserForm ou la modification marchait , mais pas le reste , jai donc mélangé le tout , mais il n'y a plus que la modification à faire fonctionner ..

Si tu pouvais faie en sorte que cela marche x)

Merci beaucoup de ton aide !

Cordialement

[Theze]

Bonjour,

Tag est une propriété des contrôles qui permet de stocker une valeur plutôt que d'utiliser une variable.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
If CTRL.Tag <> "" Then O.Cells(LI, CInt(CTRL.Tag)).Value = CTRL.Value

Ici, Tag devrait contenir le numéro de la colonne correspondant au contrôle. Dans le cas de "L'installateur", la valeur doit être 4.
Tu as deux solutions pour affecter les différentes valeurs correspondantes au numéro de colonne, soit par proc. évènementielle comme ci-dessous :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
Private Sub TextBox5_Change()
    TextBox5.Tag = 4
End Sub

soit en les saisissant manuellement dans la page des propriétés (en bas à gauche) en mode conception.

Hervé.

[Patouillou]

Boujour à toi, je te remercie beaucoup, tu m'a permis de finir mon projet !!
Merci

Cordialement