V
vincent
Guest
Bonjour,
en colonne A, lignes 1 à 13, j'ai les formules suivantes :
=SI(B1<>'';15;'')
...
=SI(B13<>'';15;'')
en colonne b j'ai des cellules vides et d'autres pleines.
la macro suivante :
ne plante que si et seulement si il y a une case vide dans la colonne b.
peut-être faudrait il remplacer les formules en a1:a13 par
=SI(B1<>'';15;VIDE), ou qqc du genre...
merci d'avance,
vincent
en colonne A, lignes 1 à 13, j'ai les formules suivantes :
=SI(B1<>'';15;'')
...
=SI(B13<>'';15;'')
en colonne b j'ai des cellules vides et d'autres pleines.
la macro suivante :
Code:
Sub Macro1()
somme = 0
For i = 1 To 13
somme = somme + ActiveSheet.Cells(i, 1).Value
Next i
ActiveSheet.Cells(14, 1).Value = somme
End Sub
peut-être faudrait il remplacer les formules en a1:a13 par
=SI(B1<>'';15;VIDE), ou qqc du genre...
merci d'avance,
vincent