!!! Si(clique cells) then (Userform1.show) !!!

[fabrice]

Bonjour tout le monde

Je vois que tout le monde n'est pas encore lever ;=) Ca sent les RTTs !!!

Bon, je vous pose mon problème.

Je souhaiterai activer un Userform quand je clique sur la cellule A1 (par exmple). Pourriez vous m'aider à trouver la synthaxe???

Merci de votre aide
FAb

 

[daniel]

bonjour,

En te referencant a l'article dans le site suivant, tu devrais pouvoir resoudre ton probleme.
http://www.mrexcel.com/td0020.html

 

[daniel]

et meme mieux encore
http://www.cpearson.com/excel/events.htm

 

[fabrice]

Waou ca c'est du rapide!!!!!!!!
Je crois que tu viens de battre le record du monde de rapidité de réponse!!!

Je regarde ca et je te tiens au courant

FAb

 

[fabrice]

Juste une petite question, j'ai regarder le deuxième site.
Il ne semble pas qu'il parle d'activer un UF quand on clique sur une cell.
Est ce que je me trompe???

FAb

 

[eric]

Bonjour fabrice,

essaie ceci :

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
if target.address="$a$1" then userform1.show


End Sub

Bonne journée et week end de paques à tous

 

[fabrice]

Salut

merci de ta téponse mais il ne se passe rien. J'ai mis la formule dans le code de la page et rien.

As tu d'autres méthodes???

Merci
FAb

 

[Ti]

voilà un fichier d'exemple, c'est le B-A-BA de la macro événementielle.

 

[Jon]

un peu floklorique le sujet de ce fil de discussion, mais on ne peut pas lui reprocher de ne point être parlant


à droite de cette fenête quand vous composez ces messages se trouve la charte du forum ;-)

 

[fabrice]

Salut TI

ll est super ton fichier. Il me permet pour la première fois d'approcher cette betes evenementiellles.

Par contre, ton userform s'affiche quan tu entre le mot (userform1) par exemple dans n'importe quelle cellule. Comment fais tu pour l'afficher quand tu selectionne la cellule???

Merci de ta réponse.
FAb

 

[fabrice]

Salut

J'ai trouver pourquoi la formule d'eric ne marchait pas, je l'avais mise dans:
Private Sub Worksheet_change(ByVal Target As Range).

Désolé pour le dérangement.

FAb

PS: je ne comprend pas le message de Jon ?!?!?!

 

[Ti]

Fabrice, il te suffit de faire preuve d'un peu de curiosité et d'aller voir dans le code VBA. Après tout les exemples sont là pour ça.

Stéphane, tu ne te serais pas trompé de fil ?