Besoin d'aide programme VBA cellules - VB/VBA/VBS - Programmation
Marsh Posté le 08-06-2008 à 15:29:57
bonjour,
je ne sais pas ce que tu as appris mais je verai plus un truc comme ca
Sub cellules()
pp = 0
p = 0
nbl = Range("b5555" ).End(xlUp).Rows
For i = 1 To nbl
If cells(i + 1, 5) = "payée" Then
pp = pp + cells(i + 1, 4)
Else
p = p + cells(i + 1, 4)
End If
Next i
cells(9, 4) = p
cells(8, 4) = pp
End Sub
cela me semble plus dans l'optique vu la question 2 qui sen rapproche
sur ce bon wikend a tous
Marsh Posté le 08-06-2008 à 12:31:45
Bonjour,
j'ai un probleme concernant cet exo :
http://www.u-paris10.fr/adminsite/ [...] 8&LANGUE=0 (le dernier exercice avec le tableau excel)
On me demande:
Ecrire le programme qui calcule le montant total des facturs qui sont payées et le montant total des factures qui ne sont pas payées, puis affecte les resultats aux cellules D8 et D9.
Quelles formules employées ? (de la maniere la plus simple possible car je suis vrmt debutant :s)
Peut etre :
Sub cellules()
Cells(8, 4) = sum(Range("E3:E4,E7" ))
Cells(9, 4) = Sum(Range("E2,E5:E6" ))
End Sub
mais je suis vraiment pas sur..