Sujet Précédent Sujet Suivant

Modifier une ligne dans une feuille de clacul via userform vba

Résolu/Fermé
lanetmel Messages postés 200 Date d'inscription mercredi 24 août 2011 Statut Membre Dernière intervention 15 mars 2018 - 16 avril 2013 à 03:36
 Nouvelle - 21 mars 2014 à 20:56
Bonjour à tous

J'espère que vous allez bien..
J'ai une question pour vous. : Est-il possible via un userform de faire une recherche dans une feuille contenant déjà des données et de modifier cette ligne dans la feuille mais via un userform?

exemple : J'entre des données dans un userform, ensuite mes données se copient dans une feuille, est-il possible via un userform de faire une recherche, d'aller chercher les lignes correspondant à la recherche: dans une feuille (elles peuvent être plusieurs)
de les afficher dans mon userform d'en sélectionner une (ligne) (toujours via userform) de la modifier et de la re-copier dans la feuille de données?

Je sais pas si vous me suivez ?
Si oui pouvez-vous me donner un indice sur la méthode? je ferai des recherches par la suite mais là je sais pas si c'est possible.. j'ai rien trouvé en ce sens.. Peut-être n'aie-je pas chercher avec les bons mots clés..

merci à l'avance
Mélanie



A voir également:

3 réponses

Réponse 1 / 3
lanetmel Messages postés 200 Date d'inscription mercredi 24 août 2011 Statut Membre Dernière intervention 15 mars 2018 4
28 mai 2013 à 14:15
Voici la solution pour ceux que ça pourrait intéresser :

Private Sub Cmd_modifieretenregistrer_Click()
Dim lig As Integer

With Sheets("BABV") ' feuille ou sont mes infos d'avance
lig = .Columns("A").Find(What:=Tbox_bonachat, after:=Range("A2"), Lookat:=xlWhole).Row ' chercher dans la colonne a , mon élément de référence
.Cells(lig, "B") = Tbox_date ' va porter les infos sur la bonne ligne
.Cells(lig, "C") = Cbox_adressefournisseur
.Cells(lig, "D") = Tbox_détail
.Cells(lig, "E") = Tbox_daterequise
.Cells(lig, "F") = Cbox_termepaiement
.Cells(lig, "G") = Cbox_transport
.Cells(lig, "H") = CheckBox_fab
.Cells(lig, "I") = Cbox_adresselivraison
.Cells(lig, "J") = Label20
.Cells(lig, "L") = Tbox_description1
.Cells(lig, "M") = Tbox_quantité1
.Cells(lig, "N") = Tbox_prixmpmp1
.Cells(lig, "O") = Tbox_description2
.Cells(lig, "P") = Tbox_quantité2
.Cells(lig, "Q") = Tbox_prixmpmp2
.Cells(lig, "R") = Tbox_description3
.Cells(lig, "S") = Tbox_quantité3
.Cells(lig, "T") = Tbox_prixmpmp3
.Cells(lig, "U") = Tbox_description4
.Cells(lig, "V") = Tbox_quantité4
.Cells(lig, "W") = Tbox_prixmpmp4
.Cells(lig, "X") = Tbox_description5
.Cells(lig, "Y") = Tbox_quantité5
.Cells(lig, "Z") = Tbox_prixmpmp5
.Cells(lig, "AA") = Tbox_description6
.Cells(lig, "AB") = Tbox_quantité6
.Cells(lig, "AC") = Tbox_prixmpmp6
.Cells(lig, "AD") = Tbox_description7
.Cells(lig, "AE") = Tbox_quantité7
.Cells(lig, "AF") = Tbox_prixmpmp7
.Cells(lig, "AG") = CheckBox_cad
.Cells(lig, "AH") = CheckBox_usd
.Cells(lig, "AI") = Cbox_acheteur
.Cells(lig, "K") = Tbox_commentaires
End With
Unload Me
End Sub
3
Nouvelle
21 mars 2014 à 20:56
tu as raison mais comment effacer la ligne qui a été modifier car quand je modifie elle me crée une autre ligne avec les mêmes coordonnés + la modification apportée
Merci
0
Réponse 2 / 3
Papaschultz
16 avril 2013 à 22:53
Bonsoir,

Oui, oui, c'est possible et sans effort particulier :
http://www.youtube.com/watch?v=vRqW6vudhGE

Cordialement,

PS : dans google tapez "tuto remplacer excel"
0
Réponse 3 / 3
lanetmel Messages postés 200 Date d'inscription mercredi 24 août 2011 Statut Membre Dernière intervention 15 mars 2018 4
17 avril 2013 à 01:49
Bonjour Papaschultz

merci pour ton lien, seulement je cherchais quelque chose en Vba..
je continue mes recherches! encore merci

Mélanie
0

Discussions similaires

Que veut dire "correspondant occupé" lors d'un appel ?
veroaaa -
Jean -

8 réponses
Que peut faire 3fois/j un homme, mais qu'1fois/j une femme
Soter -
Raymond PENTIER -

1 réponse
Statut « en ligne » alors que non
GgBono -
Slickk -

1 réponse