F
fredo
Guest
bonjour...
voila je regarde deux colonnes, si la valeur de la premiere est superieure à 0 alors je regarde la valeur de la deuxieme et si elle est inferierure a 0 alors j'increment mon compteur...
mais ça ne marche pas ...
why?????
Windows("indicateur_log(tests).xls").Activate
Range("AE2:AE20000").Select
Dim compt1
compt1 = 0
For Each c In Selection
If c.Value > 0 Then
If c.Offset(0, 1).Value < 0 Then
compt1 = compt1 + 1
End If
End If
Next c
voila je regarde deux colonnes, si la valeur de la premiere est superieure à 0 alors je regarde la valeur de la deuxieme et si elle est inferierure a 0 alors j'increment mon compteur...
mais ça ne marche pas ...
why?????
Windows("indicateur_log(tests).xls").Activate
Range("AE2:AE20000").Select
Dim compt1
compt1 = 0
For Each c In Selection
If c.Value > 0 Then
If c.Offset(0, 1).Value < 0 Then
compt1 = compt1 + 1
End If
End If
Next c