Fonction personnalisée

Bonjour,

Je dois seulement commander les vestes qui n'ont pas été livrées. (complément de commande)

Dans mon exemple les cellules fond vert symbolisent la livraison.

J'ai utilisée la fonction nb.si.ens pour dénombrer les vestes par taille mais il faudrait que je puisse défalquer celles qui ont été livrées.

Est-ce que l'un d'entre-vous pourrait me donner une idée pour faire une fonction personnalisée afin d'obtenir le résultat attendu.

Quelques explications dans l'exemple joint.

Merci d'avance

ddetp

Bonjour,

et si tu rajoutais une colonne "livré" que tu prends en compte dans ton nb.si.ens ??

bonjour djidji,

Je suis bien d'accord mais je ne souhaite pas faire comme ça. Dans le cas concret il me faudrait une colonne livrée par article et je ne veux pas de ça.

C'est pourquoi je demandais de l'aide sur une fonction personnalisée.

Merci tout de même

ddetp

Bonjour,

Pour parer au plus pressé !

Function NBNONLIVRES(pliv As Range, t As Integer, clr As String)
    Dim n%, c As Range
    Application.Volatile
    For Each c In pliv.Cells
        If c.Offset(0, 1) = t And c.Offset(0, 2) = clr Then
            If c.Interior.ColorIndex = xlColorIndexNone Then n = n + 1
        End If
    Next c
    NBNONLIVRES = n
End Function

Cela pourra être en cas de besoin étoffé avec options pour plage taille et couleur non consécutive à la col. Nom et traiter aussi des données en ligne.

Cordialement

Ferrand

Bonjour Ferrand,

Juste ce que je voulais!

Je reste hermétique aux fonctions personnalisées, c'est une grosse lacune chez moi j'en suis conscient.

Je vais tenter de l'adapter au projet.

Encore merci.

ddetp