Bonjour,
Je n'arrive pas à faire la dernière partie de mon travail d'informatique.

Pouvez vous m'aider ? Elle concerne les traitements VBA.

Le but de cette macro est de colorier en rouge les cellules de véhicules ayant plus de 15000kms. Je pense que le traitement doit plus ou moins ressembler à ça :

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
Sub Véhicules()
Dim Kmsaucompteur As Double
 
Kmsaucompteur = Application.WorksheetFunction.Max(Sheet10.Range("L2:L101"))   
 
       For ligne = 2 To 101               
               For colonne = 12 To 12               
 
             Next colonne               
 
Sheet4.Range(Chr(76) & ligne).Select                
 
ActiveCell.Value = Kmsaucompteur               
 
 If Kmsaucompteur > 15000 Then ActiveCell.Interior = RGB(255, 0, 0)
 
 Next ligne  
 
End Sub
Par après, serait-il possible de créer un tableau reprenant tous les véhicules coloriés en rouge ? Merci d'avance