Merci tout plein, ca marche bien comme ceci, j'ai encore appris plein de ch oses :-)
Bonne journée à toi Steph
Le samedi 25 juillet 2015 03:36:55 UTC+2, isabelle a écrit :
bonjour steph,
essaie comme ça,
Sub JE_TESTE_2() Dim sSheet As String sSheet = "þuil1!" 'nom de l'onglet des données ActiveWorkbook.Names.Add Name:="b", RefersTo:=sSheet & Range("A1:B10" ).Address Range("E1") = [CountIf(Index(b, , 2), ">")] Range("E2") = [SumProduct((Index(b, , 1) = "A") * (Index(b, , 2)))] End Sub
isabelle
Le 2015-07-24 09:38, a écrit : > Bonjourno, > > Merci Daniel et Isa pour vos éclaircissements. > > Quand je me trouve dans l'idée de faire des calculs un peu plus compl exes sur des array sans boucler, je boucle un peu :-) > > Je n'ai pas encore réussi à faire fonctionner les solutions d'Isabe lle, je dois pêcher sur une bêtise. mais je liste, on ne sait jamais le co de si cela peut servir. > > Merci à vous deux, bon we > Steph
Bonjour Isa,
Merci tout plein, ca marche bien comme ceci, j'ai encore appris plein de ch oses :-)
Bonne journée à toi
Steph
Le samedi 25 juillet 2015 03:36:55 UTC+2, isabelle a écrit :
bonjour steph,
essaie comme ça,
Sub JE_TESTE_2()
Dim sSheet As String
sSheet = "=Feuil1!" 'nom de l'onglet des données
ActiveWorkbook.Names.Add Name:="b", RefersTo:=sSheet & Range("A1:B10" ).Address
Range("E1") = [CountIf(Index(b, , 2), ">=10")]
Range("E2") = [SumProduct((Index(b, , 1) = "A") * (Index(b, , 2)))]
End Sub
isabelle
Le 2015-07-24 09:38, stefdestroy@gmail.com a écrit :
> Bonjourno,
>
> Merci Daniel et Isa pour vos éclaircissements.
>
> Quand je me trouve dans l'idée de faire des calculs un peu plus compl exes sur des array sans boucler, je boucle un peu :-)
>
> Je n'ai pas encore réussi à faire fonctionner les solutions d'Isabe lle,
je dois pêcher sur une bêtise. mais je liste, on ne sait jamais le co de si cela
peut servir.
>
> Merci à vous deux, bon we
> Steph
Merci tout plein, ca marche bien comme ceci, j'ai encore appris plein de ch oses :-)
Bonne journée à toi Steph
Le samedi 25 juillet 2015 03:36:55 UTC+2, isabelle a écrit :
bonjour steph,
essaie comme ça,
Sub JE_TESTE_2() Dim sSheet As String sSheet = "þuil1!" 'nom de l'onglet des données ActiveWorkbook.Names.Add Name:="b", RefersTo:=sSheet & Range("A1:B10" ).Address Range("E1") = [CountIf(Index(b, , 2), ">")] Range("E2") = [SumProduct((Index(b, , 1) = "A") * (Index(b, , 2)))] End Sub
isabelle
Le 2015-07-24 09:38, a écrit : > Bonjourno, > > Merci Daniel et Isa pour vos éclaircissements. > > Quand je me trouve dans l'idée de faire des calculs un peu plus compl exes sur des array sans boucler, je boucle un peu :-) > > Je n'ai pas encore réussi à faire fonctionner les solutions d'Isabe lle, je dois pêcher sur une bêtise. mais je liste, on ne sait jamais le co de si cela peut servir. > > Merci à vous deux, bon we > Steph