Function somme_date(DateColonne As Range, cDate_debut As Date,
cDate_fin, cColSum As Range)
Dim somme_date_ As Double
For Each c In DateColonne
If IsDate(c) And Month(c) = Month(cDate_debut) And
IsNumeric(Cells(c.Row, cColSum.Column)) Then
somme_date_ = somme_date_ + Cells(c.Row, cColSum.Column)
End If
Next
somme_date = somme_date_
End Function
J'ai deux probleme
1 - lorsque j'arrive au 8ieme mois, la fonction ne s'exécute plus et il
n'y a pas de retour de valeur de la fonction
2- même si je met cDate_debut inférieur au 8ieme mois, la fonction
roule bien et l'incrémentation de somme_date_ se passe bien
sauf que le retour de la valeur dans ma cellule ne se produit pas
Avez-vous une idée de ce qui ce passe
Eddy a+
--
Ceci est une signature automatique de MesNews.
Site : http://www.mesnews.net
Tu peux faire référence à une adresse de cellule contenant tes dates critère dans la formule
Salutations!
"Eddy Maue" <eddymaue@@hotmail.com> a écrit dans le message de news: =somme_date($E$16:$E$65536;"1/3/2005";"31/11/2005";$R:$R)
Function somme_date(DateColonne As Range, cDate_debut As Date, cDate_fin, cColSum As Range) Dim somme_date_ As Double
For Each c In DateColonne If IsDate(c) And Month(c) = Month(cDate_debut) And IsNumeric(Cells(c.Row, cColSum.Column)) Then somme_date_ = somme_date_ + Cells(c.Row, cColSum.Column) End If Next somme_date = somme_date_
End Function
J'ai deux probleme
1 - lorsque j'arrive au 8ieme mois, la fonction ne s'exécute plus et il n'y a pas de retour de valeur de la fonction
2- même si je met cDate_debut inférieur au 8ieme mois, la fonction roule bien et l'incrémentation de somme_date_ se passe bien sauf que le retour de la valeur dans ma cellule ne se produit pas
Avez-vous une idée de ce qui ce passe
Eddy a+
-- Ceci est une signature automatique de MesNews. Site : http://www.mesnews.net
Tu peux faire référence à une adresse de cellule contenant tes dates critère dans la formule
Salutations!
"Eddy Maue" <eddymaue@@hotmail.com> a écrit dans le message de news: mn.0bac7d5c44a46c66.43997@hotmail.com...
=somme_date($E$16:$E$65536;"1/3/2005";"31/11/2005";$R:$R)
Function somme_date(DateColonne As Range, cDate_debut As Date,
cDate_fin, cColSum As Range)
Dim somme_date_ As Double
For Each c In DateColonne
If IsDate(c) And Month(c) = Month(cDate_debut) And
IsNumeric(Cells(c.Row, cColSum.Column)) Then
somme_date_ = somme_date_ + Cells(c.Row, cColSum.Column)
End If
Next
somme_date = somme_date_
End Function
J'ai deux probleme
1 - lorsque j'arrive au 8ieme mois, la fonction ne s'exécute plus et il
n'y a pas de retour de valeur de la fonction
2- même si je met cDate_debut inférieur au 8ieme mois, la fonction
roule bien et l'incrémentation de somme_date_ se passe bien
sauf que le retour de la valeur dans ma cellule ne se produit pas
Avez-vous une idée de ce qui ce passe
Eddy a+
--
Ceci est une signature automatique de MesNews.
Site : http://www.mesnews.net
Tu peux faire référence à une adresse de cellule contenant tes dates critère dans la formule
Salutations!
"Eddy Maue" <eddymaue@@hotmail.com> a écrit dans le message de news: =somme_date($E$16:$E$65536;"1/3/2005";"31/11/2005";$R:$R)
Function somme_date(DateColonne As Range, cDate_debut As Date, cDate_fin, cColSum As Range) Dim somme_date_ As Double
For Each c In DateColonne If IsDate(c) And Month(c) = Month(cDate_debut) And IsNumeric(Cells(c.Row, cColSum.Column)) Then somme_date_ = somme_date_ + Cells(c.Row, cColSum.Column) End If Next somme_date = somme_date_
End Function
J'ai deux probleme
1 - lorsque j'arrive au 8ieme mois, la fonction ne s'exécute plus et il n'y a pas de retour de valeur de la fonction
2- même si je met cDate_debut inférieur au 8ieme mois, la fonction roule bien et l'incrémentation de somme_date_ se passe bien sauf que le retour de la valeur dans ma cellule ne se produit pas
Avez-vous une idée de ce qui ce passe
Eddy a+
-- Ceci est une signature automatique de MesNews. Site : http://www.mesnews.net
Eddy Maue
sur deux cents colonne je veux faire la somme sur une colonne correspondante pour un mois
la colonne E représente les dates et ma colonne K représente le montant des ventes de chaque contrat les autres colonnes sont des renseignement sur les contrats
Ce qui fait que j'ai les mois sont séparés par des entêtes suivis de tous les contrats du mois
et ainsi de suite jusqu'en decembre 2005 Donc pour connaître le total de mes ventes/mois, solde/mois et autres cette fonction me serait d'utilité
mais voilà pour une raison que je ne comprends pas, au mois d'aoust la fonction cesse de rouler et de plus quelque soit la périonde recherché elle ne me retourne pas de valeurs
Il est possible que ce soit le For Each Next qui soit le problème.
je vais essayer avec Cells(i,nCol) et je te reviens si c'est négatif
Eddy Maue a+
-- Ceci est une signature automatique de MesNews. Site : http://www.mesnews.net
sur deux cents colonne je veux faire la somme sur une colonne
correspondante pour un mois
la colonne E représente les dates et ma colonne K représente le montant
des ventes de chaque contrat
les autres colonnes sont des renseignement sur les contrats
Ce qui fait que j'ai les mois sont séparés par des entêtes suivis de
tous les contrats du mois
et ainsi de suite jusqu'en decembre 2005
Donc pour connaître le total de mes ventes/mois, solde/mois et autres
cette fonction me serait d'utilité
mais voilà pour une raison que je ne comprends pas, au mois d'aoust la
fonction cesse de rouler et de plus quelque soit la périonde recherché
elle ne me retourne pas de valeurs
Il est possible que ce soit le For Each Next qui soit le problème.
je vais essayer avec Cells(i,nCol) et je te reviens si c'est négatif
Eddy Maue a+
--
Ceci est une signature automatique de MesNews.
Site : http://www.mesnews.net
sur deux cents colonne je veux faire la somme sur une colonne correspondante pour un mois
la colonne E représente les dates et ma colonne K représente le montant des ventes de chaque contrat les autres colonnes sont des renseignement sur les contrats
Ce qui fait que j'ai les mois sont séparés par des entêtes suivis de tous les contrats du mois
et ainsi de suite jusqu'en decembre 2005 Donc pour connaître le total de mes ventes/mois, solde/mois et autres cette fonction me serait d'utilité
mais voilà pour une raison que je ne comprends pas, au mois d'aoust la fonction cesse de rouler et de plus quelque soit la périonde recherché elle ne me retourne pas de valeurs
Il est possible que ce soit le For Each Next qui soit le problème.
je vais essayer avec Cells(i,nCol) et je te reviens si c'est négatif
Eddy Maue a+
-- Ceci est une signature automatique de MesNews. Site : http://www.mesnews.net
Eddy Maue
sur deux cents rangés je veux faire la somme sur une colonne correspondante pour un mois
la colonne E représente les dates et ma colonne K représente le montant des ventes de chaque contrat les autres colonnes sont des renseignement sur les contrats
Ce qui fait que j'ai les mois sont séparés par des entêtes suivis de tous les contrats du mois
et ainsi de suite jusqu'en decembre 2005 Donc pour connaître le total de mes ventes/mois, solde/mois et autres cette fonction me serait d'utilité
mais voilà pour une raison que je ne comprends pas, au mois d'aoust la fonction cesse de rouler et de plus quelque soit la périonde recherché elle ne me retourne pas de valeurs
Il est possible que ce soit le For Each Next qui soit le problème.
je vais essayer avec Cells(i,nCol) et je te reviens si c'est négatif
Eddy Maue a+
-- Ceci est une signature automatique de MesNews. Site : http://www.mesnews.net
-- Ceci est une signature automatique de MesNews. Site : http://www.mesnews.net
sur deux cents rangés je veux faire la somme sur une colonne
correspondante pour un mois
la colonne E représente les dates et ma colonne K représente le montant
des ventes de chaque contrat
les autres colonnes sont des renseignement sur les contrats
Ce qui fait que j'ai les mois sont séparés par des entêtes suivis de
tous les contrats du mois
et ainsi de suite jusqu'en decembre 2005
Donc pour connaître le total de mes ventes/mois, solde/mois et autres
cette fonction me serait d'utilité
mais voilà pour une raison que je ne comprends pas, au mois d'aoust la
fonction cesse de rouler et de plus quelque soit la périonde recherché
elle ne me retourne pas de valeurs
Il est possible que ce soit le For Each Next qui soit le problème.
je vais essayer avec Cells(i,nCol) et je te reviens si c'est négatif
Eddy Maue a+
--
Ceci est une signature automatique de MesNews.
Site : http://www.mesnews.net
--
Ceci est une signature automatique de MesNews.
Site : http://www.mesnews.net
sur deux cents rangés je veux faire la somme sur une colonne correspondante pour un mois
la colonne E représente les dates et ma colonne K représente le montant des ventes de chaque contrat les autres colonnes sont des renseignement sur les contrats
Ce qui fait que j'ai les mois sont séparés par des entêtes suivis de tous les contrats du mois
et ainsi de suite jusqu'en decembre 2005 Donc pour connaître le total de mes ventes/mois, solde/mois et autres cette fonction me serait d'utilité
mais voilà pour une raison que je ne comprends pas, au mois d'aoust la fonction cesse de rouler et de plus quelque soit la périonde recherché elle ne me retourne pas de valeurs
Il est possible que ce soit le For Each Next qui soit le problème.
je vais essayer avec Cells(i,nCol) et je te reviens si c'est négatif
Eddy Maue a+
-- Ceci est une signature automatique de MesNews. Site : http://www.mesnews.net
-- Ceci est une signature automatique de MesNews. Site : http://www.mesnews.net
