[VBA-Excel] - Demander à l'utilisateur de choisir une cellule

Bonjour,

Je souhaite copier dans une ligne d'un fichier excel une ligne d'un deuxième fichier, mais j'ai besoin de l'intervention de l'utilisateur qui doit me dire sur quelle ligne aller chercher les données.

Pour cela, je souhaite lui demander de pointer sur une des cellule de la ligne de provenance. Une fois que je sais où aller chercher les données, je les recopie dans le fichier destination dans l'ordre voulu.

Quelqu'un aurait-il une solution pour demander à l'utilisateur de selectionner la cellule souhaitée ?

Merci pour vos future réponse.

MrYoYo.

Bonjour MrYoYo,

Tu peux utiliser le contrôle RefEdit dans les UserForms.
Dans ton code, tu fais apparaître au moment voulu ton UserForm dans lequel tu place un RefEdit.

Lorsque l'utilisateur clique sur le bouton de commande de ton Uf, tu mets derrière la 2ème partie de ton code (dépendant de la valeur de RefEdit).

P.S. pour ton transfert, tu peux éventuellement t'inspiré de ceci:

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16

Sub transfert()   x = ActiveCell.Row Dim iDerLigne As Variable iDerLigne = Range("a65536").End(xlUp).Row+1 Rows(x).Select   Selection.Cut Sheets("poubelle").Select Rows(iDerLigne).Select ActiveSheet.Paste cells(iDerLigne,"H") = Date Sheets("Projet").Select Rows(x).Delete Shift:=xlUp   End Sub

---

Cordialement,

Chewi

Bonjour

Regarde du coté de InputBox, pas la fonction VB comme msgbox mais celle fourni avec Excel, elle permet la sélection d'une plage ou d'une cellule

Starec

Merci à vous deux, j'ai opté pour la solution de Starec qui me semble la plus simple :

Code:

---

1 2 3 4 5 6 7

Sub zzzz() Dim plg As Range Set plg = Application.InputBox _ ("Sélectionner une cellule", , , , , , , 8) MaVariable= plg.Address End Sub

---

ça convient tout à fait à ce que je recherche.

Encore merci.

Tu avais ça ici
Une simple recherche sur le forum VBA ;)

Edit
Et ici :mouarf: