Ouvrir un Userform remplis avec les données de la ligne
Résolu
Siryx
-
Siryx -
Siryx -
A voir également:
- Ouvrir un Userform remplis avec les données de la ligne
- Comment ouvrir un fichier epub ? - Guide
- Comment ouvrir un fichier bin ? - Guide
- Partage de photos en ligne - Guide
- Ouvrir avec - Guide
- Ouvrir un fichier .dat - Guide
2 réponses
Bonjour,
Un p’tit classeur avec 10/15 données anonymisées serait mieux pour régler le soucis
Allez dans https://www.cjoint.com/
Cliquez sur "PARCOURIR" pour sélectionner le classeur
Clic le bouton "CREER LE LIEN"
Clic droit quand le lien est créé "COPIER LE LIEN"
Sur le post Clic droit "Coller".
ou dans https://mon-partage.fr/
Un p’tit classeur avec 10/15 données anonymisées serait mieux pour régler le soucis
Allez dans https://www.cjoint.com/
Cliquez sur "PARCOURIR" pour sélectionner le classeur
Clic le bouton "CREER LE LIEN"
Clic droit quand le lien est créé "COPIER LE LIEN"
Sur le post Clic droit "Coller".
ou dans https://mon-partage.fr/
Siryx
https://www.cjoint.com/c/KGijmIpj2DM Voici le fichier, aucune donnée n'est sensible, c'est une version sandbox
Bonjour,
se mettre sur la feuille Registre.
Faire Alt F11 pour accéder à l'éditeur et mettre ce code:
se déclenche à la sélection de la ligne dans la colonne A
se mettre sur la feuille Registre.
Faire Alt F11 pour accéder à l'éditeur et mettre ce code:
Option Explicit Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Value = "" Then Exit Sub If Not Application.Intersect(Target, Range("A:A")) Is Nothing Then Registre.TextBox1.Value = Cells(Target.Row, 1) Registre.TextBox6.Value = Cells(Target.Row, 2) Registre.TextBox7.Value = Cells(Target.Row, 3) Registre.TextBox8.Value = Cells(Target.Row, 4) Registre.Show End If End Sub
se déclenche à la sélection de la ligne dans la colonne A