addition en tenant compte de la date et du format personnalisé

Bonjour à tous

Je vous remercie par avance de l'aide que vous voudrez bien m'apporter.

Je fais un fichier excel dans lequel je dois calculer le stock en fonction de cellules dont le format personnalisé 'kg" ou "loc" s'active avec une case à cocher et en fonction des dates. J'ai essayé SOMMEPROD mais ça ne fonctionne pas.

J'aimerais aussi faire une impression sur une page, même si la zone n'est pas contigüe ?

Je joins un fichier pour une meilleure compréhension et j'espère que ce sera suffisamment clair pour que vous puissiez m'aidez.
Merci

Bonjour,

Voici un début, tu devrais avoir le total de c18 à o18 en b18 en fonction du format

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

Sub Addition18() Dim c, som&, ad$, i As Byte c = Array(CheckBox1, CheckBox2, CheckBox3, CheckBox4, CheckBox5)   Application.ScreenUpdating = False For i = 0 To 13   If Cells(18, i + 3).NumberFormat = "#0 ""kg""" Then som = som + Cells(18, i + 3).Value End If   Next Range("B18").Value = som   End Sub

---

Bien lu et tester la réponse.
Super, ça répond parfaitement à ma question sur la ligne 18.

Merci pour cette aide,:ccool:
reste la ligne 17 avec l'addition avec les 2 critères de format et de date
et puis l'impression sur une seule page quand la zone d'impression n'est pas contigüe

Bonne journée
Merci d'avance.

Citation:

---

Envoyé par therese067117

Merci pour cette aide,:ccool:
reste la ligne 17 avec l'addition avec les 2 critères de format et de date
et puis l'impression sur une seule page quand la zone d'impression n'est pas contigüe

---

Merci de lire Les règles :http://club.developpez.com/regles/

1 seul sujet par fil ;)

cordialement,

Didier