XL 2019 extraction de données vers le même formulaire sans userform

pat66

XLDnaute Impliqué
Bonjour,

j'ai créé un formulaire sans userform où je saisies des données qui sont envoyées dans un autre onglet avec la macro suivante :
Sub Ajoute()
Dim ligne As Integer
With Sheets("BDD")
ligne = .Range("A65536").End(xlUp).Row + 1
.Cells(ligne, 1) = Sheets("coordonnees").Cells(4, 2).Value
.Cells(ligne, 2) = Sheets("coordonnees").Cells(6, 3).Value
.Cells(ligne, 3) = Sheets("coordonnees").Cells(6, 7).Value
End With
'Sheets("coordonnees").Cells(4, 2).Value = ""
'Sheets("coordonnees").Cells(6, 3).Value = ""
'Sheets("coordonnees").Cells(6, 7).Value = ""
end sub

Ma question, est t'il possible de créer une fonction qui, à partir du moment ou je tape un nom présent dans la base de données, les différents renseignements de ce nom, se réaffichent dans ces mêmes cellules ?
si c'est impossible, que faut il faire ?

merci

Pat66
 

sylvanu

XLDnaute Barbatruc
Supporter XLD
Bonjour Pat,
Un petit fichier test serait le bienvenu.
Sinon vous aurez ce type de réponse :
Si votre base est correctement construite, vous pouvez rapatrier les données à partir d'un nom avec RechercheV. pour cela il faut que votre base première colonne soit le nom.
 

sylvanu

XLDnaute Barbatruc
Supporter XLD
Re,
Un essai en PJ. J'utilise Worksheet_Change qui est dans la feuille Coordonnées;
Quand on entre un nom les données sont rapatriées.
Si le nom n'existe pas les champs sont effacés.
Je n'ai pas dupliqué adresse et email pour madame puisque ce sont les mêmes, mais vous pouvez adapter très facilement la macro.
 

Pièces jointes

  • Classeur1 (1).xlsm
    25.2 KB · Affichages: 17

pat66

XLDnaute Impliqué
Merci Sylvanu, cela fonctionne très bien et c'est très astucieux,
cela dit il faut écrire le nom et le prénom dans le bon ordre, il y a t'il la possibilité de pouvoir écrire dans le désordre le nom et le prénom voire même utiliser la saisie intuitive ? sinon je devrais les séparer

merci
 
Dernière édition:

Discussions similaires

Statistiques des forums

Discussions
311 711
Messages
2 081 786
Membres
101 817
dernier inscrit
carvajal