F
ficus3
Guest
Bonjour,
J'ai bcp d'onglets dans mon classeur. A chaque onglet correspond une "feuilxx" sous VB.
Dans chaque "Feuilxx" je cherche à écrire la même macro.
Comment faire pour ne pas écrire dans chaque feuille, les unes après les autres ?
Sinon, autre idée mais je trouve pas le code juste:
voici le bout de macro que je colle dans les "feuilxx" VB:
J'ai essayé de remplacer par
Avec plein de variante - Dim, ByVal, Range, String,...- je sais pas
Mon but ultime, serai d'avoir les valeurs ("C14") et ("C59") dans un module, pour pouvoir les faire évoluer d'un seul coup sur toutes mes onglets.
C'est peut etre pas très clair.
Merci pour votre aide !
J'ai bcp d'onglets dans mon classeur. A chaque onglet correspond une "feuilxx" sous VB.
Dans chaque "Feuilxx" je cherche à écrire la même macro.
Comment faire pour ne pas écrire dans chaque feuille, les unes après les autres ?
Sinon, autre idée mais je trouve pas le code juste:
voici le bout de macro que je colle dans les "feuilxx" VB:
Code:
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Not Intersect(Target, Range("C14")) Is Nothing Then
DestPQ
End If
If Not Intersect(Target, Range("C59")) Is Nothing Then
DestNC
End If
End Sub
Code:
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Dim zonePQ As Range
Dim zoneNC As Range
zonePQ = Range("C14")
zoneNC = Range("C59")
If Not Intersect(Target, zonePQ) Is Nothing Then
DestPQ
End If
If Not Intersect(Target, zoneNC) Is Nothing Then
DestNC
End If
End SubMon but ultime, serai d'avoir les valeurs ("C14") et ("C59") dans un module, pour pouvoir les faire évoluer d'un seul coup sur toutes mes onglets.
C'est peut etre pas très clair.
Merci pour votre aide !