Discussion :

[morfy93]

Bonjour,

J'aimerai afficher les antécédents d'un résultat (imaginons 2+3=5, la fonction "repérer les antécédents" montre par des flèches partant du 2 et du 3 vers le 5, fonction qui existe déjà sur Excel), non pas figés indéfiniment comme le propose Excel mais qui apparaitraient lorsque l 'on cliquerait sur le résultat.

Je souhaiterai donc savoir si une, c'est possible, et si c'est le cas comment le faire. (Je suis une novice en VBA)

Merci par avance

[Jean-Philippe André]

salut morfy, bienvenue sur DVP
pour avoir l'équivalent d'une fonction graphique en vba, tu peux utiliser le macro recorder (outils>macro>macro recorder), mais je ne connais pas cette fonction "antécédents", donc pas d'idée à côté de ca...

[wilfried_42]

bonjour

Pour que cela fonctionne sur toutes les feuiles

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
    ActiveSheet.ClearArrows
    Selection.ShowPrecedents
End Sub

pour jpcheck

Menu Outil, Audit formule, Reperer les antecedents

[morfy93]

Cela marche très bien.

C'est parfaitement ce que je recherchais !

Merci beaucoup wilfried_42

[morfy93]

Le seul petit hic est que cette ligne de code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Selection.ShowPrecedents

fait qu'à chaque click de cellule se déclenche le fameux BEEP

[wilfried_42]

re:

cette ligne de code se declenche parce que dans l'exemple choisi, j'utilise l'interruption selection_change

tu peux utiliser par exemple l'interruption double click

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
cancel = true
End Sub

mais n'oublie pas la ligne en rouge

bonne soirée