macro sur unr cellule

Marsh Posté le 08-09-2004 à 15:24:34

salut a tous

j'ai cherché mais sans succes...

j'ai une feuille de calcul et je voudrais que, lorsque je clic
sur une cellule, une marco s'execute...

ce que je ne veux pas c'est inserer une forme de type liste modifiable
ou bouton et lui associer une macro

est ce possible?

merci

Marsh Posté le 08-09-2004 à 15:24:34

Marsh Posté le 08-09-2004 à 16:09:24

Salut Frol,

Ce que tu décris est une procédure évènementielle.
Tu appelles VBA (Alt F11),
Si tu veux que le code s'éxécute pour une feuille en particulier, tu double-cliques sur cette feuille pour faire apparaître sa fenêtre de code. Ensuite, tu déroules la liste où apparaît "Général" pour sélectionner "WorkSheet", puis, dans l'autre liste, tu choisis "SelectionChange" pour obtenir ceci :

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

End Sub

Voici un exemple de code éxécuté lors de chaque sélection de la cellule B2 de la feuille :

Code :

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = "$B$2" Then
MsgBox "Coucou, je suis la cellule B2 !"
End If
End Sub

Si tu veux que le code s'éxécute pour l'ensemble du classeur, tu double-cliques sur l'objet "ThisWorkBook". Ensuite, tu déroules la liste où apparaît "Général" pour sélectionner "WorkBook", puis, dans l'autre liste, tu choisis "SheetSelectionChange" pour obtenir ça :

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)

End Sub

Autre exemple de code :

Code :

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
If Target.Address = "$B$2" Then
MsgBox "Salut, je suis la cellule B2 de la feuille " & Sh.Name
End If
End Sub

Dis-moi si cela fais avancer ton schmilblick.
A+
Horatio

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed

Name *

Email *

URL

Message *