2 macro dans exel
Résolu
Bonjour,
je voudrai savoir si il est possible ( et comment faire ) de mettre deux macros dans le même onglet d'une feuille exel ? je m'explique :
Dans l'onglet 1 (visualiser le code) je colle >>
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Intersect(Target, Range("A8:p8")) Is Nothing Then: Exit Sub
col = Target.Column
Cells(9, col) = Cells(9, col) + 1
End Sub
Le code fonctionne très bien et je voudrai ajouter un autre code de façon a incrémenter la cellule G6 quand le clic sur G5
Merci de votre aide.
je voudrai savoir si il est possible ( et comment faire ) de mettre deux macros dans le même onglet d'une feuille exel ? je m'explique :
Dans l'onglet 1 (visualiser le code) je colle >>
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Intersect(Target, Range("A8:p8")) Is Nothing Then: Exit Sub
col = Target.Column
Cells(9, col) = Cells(9, col) + 1
End Sub
Le code fonctionne très bien et je voudrai ajouter un autre code de façon a incrémenter la cellule G6 quand le clic sur G5
Merci de votre aide.
2 réponses
-
Bonjour,
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, Range("A8:P8")) Is Nothing Then
Cells(9, Target.Column) = Cells(9, Target.Column) + 1
ElseIf Target.Address = "$G$5" Then
Range("G6") = Range("G6") + 1
End If
End Sub
A+ -
Bjr
et un super merci pour la macro c'est 2peccables
A+ et bonne journée.
