beabianchini
XLDnaute Occasionnel
Bonjour,
J'ai une macro qui s'exécute lorsque je double clic sur une cellule en affichant des lignes.
Je souhaiterais la compléter, en lui disant que si je double clic sur cette même cellule alors que les lignes sont déjà afficher, il faudrait me les masquer...
Est-ce que quelqu'un pourrait m'aider?
voici le début du code (en fichier joint également à toutes fins utiles....)
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Not Application.Intersect(Target, Range("A4")) Is Nothing Then
'macro à mettre
Rows("4:10").Select
Selection.EntireRow.Hidden = False
Range("A5").Select
End If
End Sub
Encore merci beaucoup...
J'ai une macro qui s'exécute lorsque je double clic sur une cellule en affichant des lignes.
Je souhaiterais la compléter, en lui disant que si je double clic sur cette même cellule alors que les lignes sont déjà afficher, il faudrait me les masquer...
Est-ce que quelqu'un pourrait m'aider?
voici le début du code (en fichier joint également à toutes fins utiles....)
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Not Application.Intersect(Target, Range("A4")) Is Nothing Then
'macro à mettre
Rows("4:10").Select
Selection.EntireRow.Hidden = False
Range("A5").Select
End If
End Sub
Encore merci beaucoup...