XL 2016 Recuperer les infos d'une feuille dans une Form

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

Don pépé

XLDnaute Occasionnel
Bien le bonjour😉

Voila je vous explique se que je voudrais faire.
J'ai une feuille avec des données client quand je selectionne une cellule de la ligne et que je clique su le boutton modifier je voudrais que ca m'ouvre l'userform voulue en mettant les infos au bon endroit pour pouvoir les modifier😵 mais je ne sais comment faire si quelqu'un a une idée je suis preneur.

Merci bien a vous 😉

Ps: je vous joint mon fichier😉
 

Pièces jointes

Bonjour.
Pourquoi ne mettriez vous pas une méthode en tête de l'UserForm :
VB:
Option Explicit
Private Plage As Range
Public Sub Afficher(ByVal R As Range)
Set Plage = R
Me.Show
End Sub
Et dans le module de la feuille :
VB:
Option Explicit
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
AjoutForm.Afficher Target
End Sub
 
Vous pouvez ajouter les instructions qui font ça, un peu sur ce modèle :
VB:
Public Sub Afficher(ByVal R As Range)
Dim T()
Set Plage = R
T = Plage.Resize(1, 15).Value
civilite = T(1, 1)
Nom.Value = T(1, 2)
etc.
Me.Show
End Sub
Et dans la Private Sub Ajouter_Click(), naturellement on fait l'inverse :
VB:
'insertion des valeurs sur la feuille
        Dim T(1 To 1, 1 To 15)
        T(1, 1) = civilite
        T(1, 2) = Nom.Value
        T(1, 3) = Prenom.Value
        T(1, 4) = Adresse.Value
        T(1, 5) = CodePostal.Value
        T(1, 6) = Ville.Value
        T(1, 7) = Telephone.Value
        T(1, 8) = Mail.Value
        T(1, 9) = electricite
        T(1, 10) = Du.Value
        T(1, 11) = Au.Value
        T(1, 12) = Adulte.Value
        T(1, 13) = Enfant.Value
        T(1, 14) = Animal.Value
        T(1, 15) = Emplacement.Value
        Plage.Resize(1, 15).Value = T
 
De répondre à une demande, bien sûr. Mais intervenir par quelque chose qui n'y répond en rien, ça…
J'ai eu beau revoir votre classeur, je n'y ai vu de dispositif permettant d'afficher dans un UserForm les infos contenues à partir d'une cellule sélectionnée dans la feuille. Relisez le poste #1.
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
7
Affichages
638
Réponses
3
Affichages
445
Retour