Pour les stars en vba.....

Recherche :

Dernière réponse
Sujet : Pour les stars en vba.....
faldorn	software et reseau, c un truc pour excel, et il y a pliein d'expliaction en dessous dans ce forum>>> me semblait donc plus simple et plus logique de poster ici....

Votre réponse

Nom d'utilisateur

Pour poster, vous devez être inscrit sur ce forum .... si ce n'est pas le cas, cliquez ici !

Le ton de votre message

Votre réponse

Smilies

Liste des smilies perso
Wiki smilies
Chercher un smiley

Options

Activer votre signature
Désactiver les smilies
Activer la notification par email du sujet

Aperçu

Vous avez perdu votre mot de passe ?

Vue Rapide de la discussion

faldorn

software et reseau, c un truc pour excel, et il y a pliein d'expliaction en dessous dans ce forum>>> me semblait donc plus simple et plus logique de poster ici....

faldorn

Sub test1009()
For i = 2 To Range("e65536" ).End(xlUp).Row
'trouve le max dans la plage
y = i
Do Until Cells(i, 5) <> Cells(i + 1, 5)
If Cells(i, 9).Value > maxi Then
maxi = Cells(i, 9).Value
ligne = Cells(i, 9).Row
End If
i = i + 1
Loop
'test dans la plage
For z = y To i
If Cells(z, 9) < (maxi - 0.5) Then
Cells(z, 9).Interior.ColorIndex = 4
Next z
maxi = 0
Next i
End Sub

est ce que kelkun voit une erreur la dessus (c pas de moi non plus :D:D:D et ca m'indique un runtime 13, pource ke ca veut dire :D:D:D))

faldorn

Et ouais, on m'a prpose une solution pas mal en vba, mais le probleme c ke je pige po grand chose au vba...., or le groupe de discussion ke m'a file ce truc n'est plus dispo, je sais pas pourquoi...

Vila le code :
Sub bo()
For i = 2 To Range("a65536" ).End(xlUp).Row
Do Until Cells(i, 1) <> Cells(i + 1, 1)
If Cells(i, 2).Value > maxi Then
maxi = Cells(i, 2).Value
ligne = Cells(i, 2).Row
End If
i = i + 1
Loop
Range("a" & ligne & ":B" & ligne).Interior.ColorIndex = 3
maxi = 0
Next i
End Sub

Mais j'y pige ke dalle, et il fait pas exactement ce que je veux.....

je voudrais pouvoir surligner les donnee de la colonne qui sont de 0.5 point inferieur a la valeur maximale Et mes calculs de comparaison ce font sur les colonne D et I....

Muchas gracias