Interface utilisateur selection/macro

Bonjour à tous,

Ma question semble difficile car j'ai recherché depuis un peu plus d'une heure sur des forums et je trouve pas de solutions à mon problème exactement.

Problématique : Interaction avec l'utilisateur pour séléctionner des cellules sans toucher en utilisant que la souris

Exemple :

J'ai un tableau
Je souhaite que l'utilisateur sélectionne la case A1, cliques ensuite sur un bouton pour l'attribuer à une fonction tel que selection de la colonne A

Soucis :

Lorsque l'utilisateur clique sur le bouton il déselectionne A1
Comment avoir une macro qui me donne la case séléctionner par l'utilisateur en ce moment?

Amicalement,

Alexandre

Bonjour alxdlx2704,

Beaucoup de sujets traitent des problèmes de sélections obligatoires.
Je te propose de regarder les événements et plus particulièrement "Worksheet_SelectionChange".

Exemple simple : empêcher de sélectionner une autre cellule que A1 :

Code:

---

1 2 3 4 5

Private Sub Worksheet_SelectionChange(ByVal Target As Range)   Range("A1").Select   End Sub

---

N'hésite pas à revenir vers moi ! :ccool:

Cordialement,
Kimy

Bonjour,

Juste une piste : vas voir avec les Target By Val des macros evenementielles Worksheet_Change et Worksheet_SelectionChange

tu trouveras je pense ton bonheur car Target récupère l'adresse de la (des) cellule(s) sélectionnée(s)


tu dis

A+

PS Pendant que je redigeais mon post je me suis fait doublé par Kimy_Ire, mais je vois qu'on eu la même idée :mrgreen:

Bonjour

Merci pour vos réponses rapides. Je veux pas contraindre mon utilisateur mais lui laisser tout open!
Process :

Il séléctione une cellule qui est importante

Il clique sur un bouton

Je récupère le nom de la cellule qu'il a séléctionné

Je pensais utiliser activeCell

Finalement,

J'ai trouvé ceci et cela devrait me suffire!

Code:

---

1 2 3 4 5 6 7 8

Sub claim_no() Dim Val As Variant     CelN = Left$(ActiveCell.Address(0, 0), (ActiveCell.Column < 270) + 2) & ActiveCell.row Cells(2, 2) = CelN   End Sub

---

Merci beaucoup pour vos réponses