Discussion :

[Mehdi Chaaz]

bonjour à tous,

je viens de créer pour la gestion des tâches de mon équipe, en utilisant un USF de débutant avec une listbox des problèmes remontés par choix de pilote (collaborateur), les données de chaque problème sont affichées sur des textbox ( Action corrective, délai, etc ...), et jusqu'ici tout va bien, aujourd'hui je cherche à mettre à jour ces données au fur et à mesure de l'avancement sur ces problèmes.

exemple : Je choisi le Pilote sur un Combobox, les problèmes qui lui sont assignés sont affiché sur la listbox, je choisi un problème, les détails s'affichent sur les textbox, et si il y une mis à jour je dois modifier le détail sur le textbox en question et bien sur ça doit être enregistrer dans la BD.

Merci d'avance pour votre aide.

En PJ le fichier avec l'USF.

[Tylert]

Bon si j'ai un ticket d'incident avec marqué "je suis bloqué", c'est retour direct à l'utilisateur
Peux tu décrire plus précisément ton problème? (Pour info je crois que la plupart des gens n'ouvrent pas les classeurs excel en pièce jointe).
On veut savoir ce que tu essayes de faire et ce qui ne marche pas...
par exemple: "Quand un utilisateur selectionne un element de la list box, cela doit modifier la textbox mais cela ne fonctionne pas...".

La je n'arrive pas a savoir si tu veux rajouter des données via saisie dans les textbox et que cela ne marche pas, ou sauvegarder ce que tu saisis et que ca ne marche pas ou encore modifier a chaque clic sur une listbox et que ca ne marche pas.

Si tu as débuggé, tu dois savoir l'emplacement de code qui ne marche pas et donc pouvoir le fournir en dehors de la pièce jointe...

[Mehdi Chaaz]

Merci pour la remarque, j'ai modifié la description du problématique.

[Tylert]

Ok, ca me parle plus.

Donc il faut que tu utilises l'evenement click de ton bouton valider et que dans cet evenement tu codes la sauvegarde des données.
La problématique étant principalement de bien retrouver les celulles que tu veux impacter.

un truc comme cela devrait a peu près fonctionner (Je n'ai pas testé).

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
Private Sub Cmd_Valider23_Click()
 
With Sheets("Feuil1")
        .Range("c" & J) = Me.action.Text
        .Range("d" & J) = Me.résultat.Text
        .Range("g" & J) = Me.comm.Text
        .Range("e" & J) = Me.délai.Text
        .Range("f" & J) = Me.cloturé.Text
End With
 
End Sub

A noter que ta variable J n'est pas public et ne seras donc pas visible par cette sous-fonction. il faut donc la remonter au meme niveau que ta variable Ws.

[Mehdi Chaaz]

Merci infiniment pour cette réponse aussi rapide, j'ai remonté la variable J et marche impéc sauf ça rajoute une nouvelle ligne et ne modifie pas la ligne chargé dans le USF

[Tylert]

Du coup, j'ai fait le test et ca fonctionne parfaitement chez moi avec le code suivant:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
 
Dim Ws As Worksheet
Dim J As Long
 
Private Sub Cmd_Valider23_Click()
 
With Sheets("Feuil1")
        .Range("c" & J) = Me.action.Text
        .Range("d" & J) = Me.résultat.Text
        .Range("g" & J) = Me.comm.Text
        .Range("e" & J) = Me.délai.Text
        .Range("f" & J) = Me.cloturé.Text
End With
 
End Sub

[Mehdi Chaaz]

Voilà ce que je reçois, j'ai modifié l'ACTION1 en rajoutant " +1 " et c'est renseigné sur une nouvelle ligne mais n'a pas modifié la vraie ligne de l'item

[Mehdi Chaaz]

Re-bonjour Tylert,

Voilà donc j'ai réussi à résoudre le problème en bidouillant sur le forum, et avec une petite modif voilà le code final qui marche ( jusqu'au moment) parfaitement comme je voulais.


Merci beaucoup pour ta disponibilité et collaboration.

à la prochaine et bonnes fêtes.


El Mehdi