executer une macro depuis une cellule

[FREESURF]

bonsoir le forum,

je suis a la recherche d'une solution me permettant d'appeler un userform en clikan sur n'importe quelle cellule de la collonne A d'une feuille nomée 'base'

 

[Marc_du_78]

Bonsoir FREESURF, le Forum,

Tu peus essayer cette macro :

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Application.Intersect(Target, Range('B1')) Is Nothing Then
Macro1
End If
End Sub

Attention je ne suis pas un pro des macros, celli a été copier sur ce forum, mais je ne possède pas le lien correspondant. Désolé

 

[Dan]

Bonsoir,

essaie ceci :

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Not Application.Intersect(Target, Range('A:A')) Is Nothing Then
UserForm1.Show
End If
End Sub

A mettre en VBA (ALT+F11) dans la feuille 'BASE'

Si pb n'hésite pas



Message édité par: Dan, à: 15/01/2006 22:23

 

[FREESURF]

bonsoir a tous,
merci Dan pour ta réponse si rapide.
Cette formule fonctionne à merveille.
A bientot