[Formules Excel] piti probleme

Version imprimable

04/06/2007, 17h27
Commodore

[Formules Excel] piti probleme
Bonsoir à tous,

j'ai un petit probleme avec l'utilisation de WorksheetFunction...

la formule que je veux mettre en oeuvre est la suivante (dans une cellule)
Code:

1 2 =+SOMME.SI('Tab vendors'!$A:$A;datas!$D2098;'Tab vendors'!$C:$C)
j'ai essayé ceci mais ça ne prend pas:
Code:

1 2 range("C65000").value = Application.WorksheetFunction.SumIf('Tab vendors'!$A:$A;datas!$D2097;'Tab vendors'!$C:$C)
le but est de pouvoir inscrire le resultat d'une formule "en dur" dans la cellule... sans passer par un copier valeurs par dessus la formule...

n'hésitez pas a demander des précisions si vous pensez que je n'ai pas été clair

Psy

bonjour

Tu peux tester

Code:

1
2
3
4
5
6
7
8
9
10
Dim Plage As Range
Dim Critere As Variant
Dim somme_plage As Range
 
Set Plage = Worksheets("Tab vendors").Columns(1)
Critere = Worksheets("datas").Range("D2097").Value
Set somme_plage = Worksheets("Tab vendors").Columns(3)
 
Range("C65000").Value = _
    Application.WorksheetFunction.SumIf(Plage, Critere, somme_plage)

michel

05/06/2007, 13h48
Commodore

solution testée et approuvée !

merci :)