Bonjour à tous,

Je cherche à moyen de faire fonctionner une macro sous conditions.

L'objectif est de faire en sorte que si la cellule (G1) est contenue dans plage de cellules située en colonne B (de B9 à la dernière ligne de la colonne B) alors elle exécute une macro (que j'ai déjà créé). Si la cellule (G1) n'est pas contenue dans la plage de cellules en colonne B, alors elle affichera 100% dans la cellule B3.

Je dois exécuter cette opération sur plus d'une centaines de feuilles d'où la pertinence d'utiliser une macro Excel afin de gagner en efficacité.

J'ai essayé le code suivant en faisant quelques recherches sur le sujet sans succès:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
 
Sub Test()
Dim dl As Long
Dim k As Integer
 
'Pour chaque feuille du classeur
For k = 6 To Sheets.Count
 
dl = Range("A" & Rows.Count).End(xlUp).Row
 
If Not Intersect(Range("G1"), Range("B9:B" & dl)) Is Nothing Then _
Range("B3").Select
ActiveCell.FormulaR1C1 = "100%"
 
Else
 
'(Code Macro déjà écrit mais assez long pour être copié ici)
 
End If
Next k
End Sub
Quelqu'un aurait-il une solution à me proposer?