bonjour le forum,
bonjour à tous,
j'ai besoin d'aide pour corriger ce code VBA qui me donne 0 en E219
comment l'étendre jusqu'a BD219?
merci d'avance pour votre aide.
bonjour et merci pour votre intérêt,
ce n'est pas tout à fait cela.
dans le tableau joint au premier post, j'aimerais que le code fasse le calcul par exemple de E3 à E218 si de D3 à D218 il est écrit "charg", résultat à mettre en E219.
en F219 la même chose avec les chiffres de F3 à f218 et ainsi de suite jusqu'à BD219.
Merci bcp.
Moutchec.
bonjour et merci à vous,
ça marche en effet avec sumif.
y aurat-il moyen svp de faire en sorte que quand il n'y a rien à calculer, les cellules de E219 à BD 219 restent vides ? (ne pas affciher "0").
encore merci.
cordialement.
Moutchec.
Soit vous masquez les valeurs zéro par MFC ou avec le format nombre personnalisé 0;; soit vous complétez le code :
Code:
Private Sub CommandButton1_Click()
[E219:BD219] = "=SUMIF($D3:$D218,""charg"",E3:E218)"
[E219:BD219] = [E219:BD219].Value
[E219:BD219].Replace 0, "", xlWhole
End Sub
Soit vous masquez les valeurs zéro par MFC ou avec le format nombre personnalisé 0;; soit vous complétez le code :
Code:
Private Sub CommandButton1_Click()
[E219:BD219] = "=SUMIF($D3:$D218,""charg"",E3:E218)"
[E219:BD219] = [E219:BD219].Value
[E219:BD219].Replace 0, "", xlWhole
End Sub