Appliquer conditions sur un intervalle de 3 lignes

Quelqu’un pourrait-il m’aider ? J’aimerais pouvoir appliquer des conditions s’appliquant à des valeurs sur un intervalle de 3 lignes. J’ai pu écrire ma condition sur la ligne 4 de la colonne B. Avec plusieurs cas où selon la valeur des cellules précédente le résultat sur la cellule B4 sera différente.

 Derlig = Range("B" & Rows.Count).End(xlUp).Row
    With ActiveSheet
        '.Range ("B2:B" & Derlig)
        'For i = 2 To Derlig
            Select Case .Cells(2, 2)
                Case "0"
                    Select Case .Cells(3, "B")
                        Case "0": .Cells(4, "B") = "OK"
                        Case "-", ":", Empty: .Cells(4, "B") = "Your total should be '0'"
                        Case Else: .Cells(4, "B") = "OK"
                    End Select
            End Select
        'Next i
    End With
End Sub

Mais comment écrire la même chose sur une dizaine de lignes et colonne de manière presque automatisée ?

Merci par avance pour votre aide.

Cdt,

EddyTone10

En pièce-jointe le fichier concerné.

Merci d'avance.

bonjour

ça se fait par une simple colonne de pointage

explique en français ce que tu veux faire (j'ai du mal à comprendre les macros )

jmd a écrit :

bonjour

ça se fait par une simple colonne de pointage

explique en français ce que tu veux faire (j'ai du mal à comprendre les macros )

On est 2, ça me console

L'exemple est il le bon par rapport au code VBA montré plus haut ?

patrick1957 a écrit :

jmd a écrit :

bonjour

ça se fait par une simple colonne de pointage

explique en français ce que tu veux faire (j'ai du mal à comprendre les macros )

On est 2, ça me console

L'exemple est il le bon par rapport au code VBA montré plus haut ?

Bonsoir,

Je suis désolé je me suis trompé dans le fichier à joindre.

Je viens de changer le fichier. Je pense que maintenant ça devrait être plus simple

jmd a écrit :

bonjour

ça se fait par une simple colonne de pointage

explique en français ce que tu veux faire (j'ai du mal à comprendre les macros )

Bonsoir Jmd

Effectivement le fichier joint n'était pas le bon fichier. je viens de le changer, je pense que ça devrait être plus claire.

Si non je suis à votre disposition pour réexpliquer. Merci beaucoup

re,

sauf erreur, tu mets là le fichier terminé...il faudrait le fichier AVANT les modifs

Je suivrai un peu mais je dois m'absenter

P.

re

j'ai mis 3 colonnes de pointage pour montrer un résultat sur ta colonne C

tout à droite

pointage 1 compte par groupe de 3

pointage 2 crée la phrase (je n'ai pas finalisé l'ensembles des SI imbriqués, à toi de finir)

en colonne D que j'ai crée

pointage 3 qui écrit la phrase une ligne sur 3

tu peux tirer ces 3 colonnes sur des milliers de lignes

solution simple, facile à comprendre et facile à modifier si nécessaire. Pas de VBA.

nota : la phrase n'est pas en C4 mais en D4. Ce léger décalage devrait être acceptable.

nota 2 : les colonnes de pointage à droite peuvent être masquées pour faire plus joli.