Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Excel selection ligne - userform

selection ligne - userform

3 réponses
Avatar
j
Bonjour,

J'ai une BDD qui comporte 20 colonnes et plusieurs centaines de lignes
Je souhaiterai que lorsque je clique sur le champ de la premiere colone "A"
d'une ligne j'ouvre un useform
qui reprend les 20 champs et pouvoir modifier le contenu certains sur le
useform et pour l'enregistrister dans la BDD

Si vous avez un plan que que puisse adapter je vous remercie

Mercie
A+
j@b
Signaler un problème avec ce contenu

3 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Jacky
Bonjour,
Si vous avez un plan que que puisse adapter je vous remercie


Ca pourrait ressembler à ceci
'----------------
Private Sub CommandButton1_Click()
For i = 1 To 20
ActiveSheet.Cells(ActiveCell.Row, i) = Me("textbox" & i)
Next
Unload UserForm1
End Sub
'----------------
Private Sub UserForm_Initialize()
For i = 1 To 20
Me("textbox" & i).Value = ActiveSheet.Cells(ActiveCell.Row, i)
Next
Frame1.Caption = "Modification " & ActiveSheet.Name & " Ligne " &
ActiveCell.Row & " en cours."
End Sub
'-----------------
Exemple simple ici
http://www.cijoint.fr/cjlink.php?file=cj200811/cijewDyq9e.xls

--
Salutations
JJ


"" a écrit dans le message de news:
49275fee$0$1893$
Bonjour,

J'ai une BDD qui comporte 20 colonnes et plusieurs centaines de lignes
Je souhaiterai que lorsque je clique sur le champ de la premiere colone
"A" d'une ligne j'ouvre un useform
qui reprend les 20 champs et pouvoir modifier le contenu certains sur le
useform et pour l'enregistrister dans la BDD

Si vous avez un plan que que puisse adapter je vous remercie

Mercie
A+





Avatar
Jacky
De rien, ce fût un plaisir.
;o((

--
Salutations
JJ


"Jacky" a écrit dans le message de news:

Bonjour,
Si vous avez un plan que que puisse adapter je vous remercie


Ca pourrait ressembler à ceci
'----------------
Private Sub CommandButton1_Click()
For i = 1 To 20
ActiveSheet.Cells(ActiveCell.Row, i) = Me("textbox" & i)
Next
Unload UserForm1
End Sub
'----------------
Private Sub UserForm_Initialize()
For i = 1 To 20
Me("textbox" & i).Value = ActiveSheet.Cells(ActiveCell.Row, i)
Next
Frame1.Caption = "Modification " & ActiveSheet.Name & " Ligne " &
ActiveCell.Row & " en cours."
End Sub
'-----------------
Exemple simple ici
http://www.cijoint.fr/cjlink.php?file=cj200811/cijewDyq9e.xls

--
Salutations
JJ


"" a écrit dans le message de news:
49275fee$0$1893$
Bonjour,

J'ai une BDD qui comporte 20 colonnes et plusieurs centaines de lignes
Je souhaiterai que lorsque je clique sur le champ de la premiere colone
"A" d'une ligne j'ouvre un useform
qui reprend les 20 champs et pouvoir modifier le contenu certains sur le
useform et pour l'enregistrister dans la BDD

Si vous avez un plan que que puisse adapter je vous remercie

Mercie
A+










Avatar
j
Genial super Merciiiiiiiiiiiiiiiiiiiiiiiiiiiiiiii


"Jacky" a écrit dans le message de news:
OzHf%
De rien, ce fût un plaisir.
;o((

--
Salutations
JJ


"Jacky" a écrit dans le message de news:

Bonjour,
Si vous avez un plan que que puisse adapter je vous remercie


Ca pourrait ressembler à ceci
'----------------
Private Sub CommandButton1_Click()
For i = 1 To 20
ActiveSheet.Cells(ActiveCell.Row, i) = Me("textbox" & i)
Next
Unload UserForm1
End Sub
'----------------
Private Sub UserForm_Initialize()
For i = 1 To 20
Me("textbox" & i).Value = ActiveSheet.Cells(ActiveCell.Row, i)
Next
Frame1.Caption = "Modification " & ActiveSheet.Name & " Ligne " &
ActiveCell.Row & " en cours."
End Sub
'-----------------
Exemple simple ici
http://www.cijoint.fr/cjlink.php?file=cj200811/cijewDyq9e.xls

--
Salutations
JJ


"" a écrit dans le message de news:
49275fee$0$1893$
Bonjour,

J'ai une BDD qui comporte 20 colonnes et plusieurs centaines de lignes
Je souhaiterai que lorsque je clique sur le champ de la premiere colone
"A" d'une ligne j'ouvre un useform
qui reprend les 20 champs et pouvoir modifier le contenu certains sur le
useform et pour l'enregistrister dans la BDD

Si vous avez un plan que que puisse adapter je vous remercie

Mercie
A+