Recuperations de donnees dans textbox d'un usf pour modif

[sten83]

Bonjour a tous, j'ai parcouru plusieurs posts sans trouver mon bonheur.
J'ai crée un carnet d'adresses avec un usf pour la fiche un usf menu et un usf pour afficher les listes.
Le classeurs contients 26 feuilles soit une par lettre, toutes identiques.
Ce que j'aimerai c'est à partir due l'usf qui affiche les listes en doublecliquants sur un nom que toutes les infos s'affiche dans l'usf fiche pour modifier les infos.
Je joint le fichier car la je bloque.
Merci a vous tous.

 

[Dranreb]

Re : Recuperations de donnees dans textbox d'un usf pour modif

Bonjour.

Personnellement j'écrirais dans l'userform :

Option Explicit
Dim Cible As Range, VLgn()

Public Sub Afficher(ByVal Target As Range)
Dim C As Long
Set Cible = Target.EntireRow.Resize(, 9)
VLgn = Cible.Value
For C = 1 To 9
   Me("TextBox" & C).Text = VLgn(1, C)
   Next C
Me.Show
End Sub

Et dans ThisWorkbook :

Private Sub Workbook_SheetBeforeDoubleClick(ByVal Sh As Object, ByVal Target As Range, Cancel As Boolean)
If Sh.Name Like "[A-Z]" Then Cancel = True: ufFiche.Afficher Target
End Sub

Mais je n'adhérerais pas du tout au principe des 26 lettres et feuilles. Une seule, des ComboBox un peu partout dans un seul UserForm, on tape un début de nom, de prénom ou d'autre chose, c'est tout.

Cherchez ComboBoxLiées.

 

[sten83]

Re : Recuperations de donnees dans textbox d'un usf pour modif

Merci pour ta réponse rapide mais justement le but et d'avoir une feuille par lettre je sais c'est beaucoup mais on me demande de faire comme ça.
Donc si il y a d'autres solutions je suis preneur
Encore merci.

 

[sten83]

Re : Recuperations de donnees dans textbox d'un usf pour modif

Tout compte fait tu as raison pourquoi m'embeter avec 26 feuilles je vais suivre ton conseil.
Une feuille BD et un formulaire.
Merci, si j'ai des difficultés je posterai

 

[Staple1600]

Re : Recuperations de donnees dans textbox d'un usf pour modif

Bonjour à tous

sten83
[humour taquin du dimanche matin]

Tout compte fait tu as raison pourquoi m’embêter avec 26 feuilles

Bah, nous on croyait qu'il fallait respecter cette contrainte (qui finalement n'est pas si contraignante)

mais on me demande de faire comme ça.

[/humour taquin du dimanche matin]

 

[sten83]

Re : Recuperations de donnees dans textbox d'un usf pour modif

Non c’était pas vraiment une contrainte et finalement ça a l’avantage d’alléger le classeur.