Bonjour,
J'ai un tableau ( semaine ) contenant les résultats d'audit par zone d'entreprise appelée GAP. J'aimerais en extraire un tableau affichant le nombre d'audits OK ( marqué par O ) et d'audits NOK ( marqué par X ) par GAP.
Ma grille varie toute les semaines. Voici ma macro :
<code>
Sub Analyser()
Dim i, j, inj7ok, inj7tot
i = 6
j = 4
inj7ok = 0
inj7tot = 0
For i = 6 To 40
Do While (j < 40)
If ActiveWorkbook.Sheets("semaine").Cells(i, j).Value Then
If ActiveWorkbook.Sheets("semaine").Cells(i, j + 5).Value Then
inj7ok = inj7ok + 1
End If
inj7tot = inj7tot + 1
End If
j = j + 9
Loop
Next i
End Sub
</code>
Lorsque je lance la macro ça m'affiche l'erreur " incompatibilité de type " ... Je ne comprends pas d'où ça peut venir.
Mon fichier excel est là :
Merci d'avance !