Je souhaiterais faire la somme (via une macro) de cellules
dont la valeur est du texte pour comptabiliser le nombre
de produits. Est-ce possible ?
EX :
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Jean-François Aubert
Salut Desgranges,
Sub chercheETcompte() Dim c As Range, cnt As Integer
rep = Application.InputBox("selectionnez un produit", "comptage")
For Each c In [zn] If c = rep Then cnt = cnt + 1 Next MsgBox rep & " : " & cnt End Sub
-- Amicalement
Jean-François Aubert {Vaudois de la Côte Lémanique}
"Desgranges" a écrit dans le message de news:000c01c347be$5ed03e90$
Bonjour,
Je souhaiterais faire la somme (via une macro) de cellules dont la valeur est du texte pour comptabiliser le nombre de produits. Est-ce possible ? EX :
Sub chercheETcompte()
Dim c As Range, cnt As Integer
rep = Application.InputBox("selectionnez un produit", "comptage")
For Each c In [zn]
If c = rep Then cnt = cnt + 1
Next
MsgBox rep & " : " & cnt
End Sub
--
Amicalement
Jean-François Aubert
{Vaudois de la Côte Lémanique}
"Desgranges" <wdesgranges@mail.insa-lyon.fr> a écrit dans le message de
news:000c01c347be$5ed03e90$a301280a@phx.gbl...
Bonjour,
Je souhaiterais faire la somme (via une macro) de cellules
dont la valeur est du texte pour comptabiliser le nombre
de produits. Est-ce possible ?
EX :
Sub chercheETcompte() Dim c As Range, cnt As Integer
rep = Application.InputBox("selectionnez un produit", "comptage")
For Each c In [zn] If c = rep Then cnt = cnt + 1 Next MsgBox rep & " : " & cnt End Sub
-- Amicalement
Jean-François Aubert {Vaudois de la Côte Lémanique}
"Desgranges" a écrit dans le message de news:000c01c347be$5ed03e90$
Bonjour,
Je souhaiterais faire la somme (via une macro) de cellules dont la valeur est du texte pour comptabiliser le nombre de produits. Est-ce possible ? EX :
re, oublié de dire qu'il faut bien entendu nommer la plage de produit : zn
-- Amicalement
Jean-François Aubert {Vaudois de la Côte Lémanique}
"Jean-François Aubert" <à a écrit dans le message de news:3f0edc93$
Salut Desgranges,
Sub chercheETcompte() Dim c As Range, cnt As Integer
rep = Application.InputBox("selectionnez un produit", "comptage")
For Each c In [zn] If c = rep Then cnt = cnt + 1 Next MsgBox rep & " : " & cnt End Sub
-- Amicalement
Jean-François Aubert {Vaudois de la Côte Lémanique}
"Desgranges" a écrit dans le message de news:000c01c347be$5ed03e90$
Bonjour,
Je souhaiterais faire la somme (via une macro) de cellules dont la valeur est du texte pour comptabiliser le nombre de produits. Est-ce possible ? EX :
re,
oublié de dire qu'il faut bien entendu nommer la plage de produit : zn
--
Amicalement
Jean-François Aubert
{Vaudois de la Côte Lémanique}
"Jean-François Aubert" <àOterjfaubert@bluewin.ch> a écrit dans le message de
news:3f0edc93$1_2@news.bluewin.ch...
Salut Desgranges,
Sub chercheETcompte()
Dim c As Range, cnt As Integer
rep = Application.InputBox("selectionnez un produit", "comptage")
For Each c In [zn]
If c = rep Then cnt = cnt + 1
Next
MsgBox rep & " : " & cnt
End Sub
--
Amicalement
Jean-François Aubert
{Vaudois de la Côte Lémanique}
"Desgranges" <wdesgranges@mail.insa-lyon.fr> a écrit dans le message de
news:000c01c347be$5ed03e90$a301280a@phx.gbl...
Bonjour,
Je souhaiterais faire la somme (via une macro) de cellules
dont la valeur est du texte pour comptabiliser le nombre
de produits. Est-ce possible ?
EX :
re, oublié de dire qu'il faut bien entendu nommer la plage de produit : zn
-- Amicalement
Jean-François Aubert {Vaudois de la Côte Lémanique}
"Jean-François Aubert" <à a écrit dans le message de news:3f0edc93$
Salut Desgranges,
Sub chercheETcompte() Dim c As Range, cnt As Integer
rep = Application.InputBox("selectionnez un produit", "comptage")
For Each c In [zn] If c = rep Then cnt = cnt + 1 Next MsgBox rep & " : " & cnt End Sub
-- Amicalement
Jean-François Aubert {Vaudois de la Côte Lémanique}
"Desgranges" a écrit dans le message de news:000c01c347be$5ed03e90$
Bonjour,
Je souhaiterais faire la somme (via une macro) de cellules dont la valeur est du texte pour comptabiliser le nombre de produits. Est-ce possible ? EX :