Moderatori: Anthony47, Flash30005
URT = Range("A" & Rows.Count).End(xlUp).Row
ContaT = 0
For RR = 1 to URT
If Range("A" & RR).value = "AAA" then ContaT = ContaT + 1
Next RR
Msgbox ContaT
Evaluate("=SUMPRODUCT(--(RTipo=""AAA""),--(RModo=""AAA""))")
Anthony47 ha scritto:La WorksheetFunction.SumProduct si aspetta come argomenti degli intervalli, non delle formule; e in ogni caso avresti dovuto scrivere Range("RModo") e non RModo.
Non so quale e' la tua istruzione completa, prova a usareal posto di quanto hai pubblicato.
- Codice: Seleziona tutto
Evaluate("=SUMPRODUCT(--(RTipo=""AAA""),--(RModo=""AAA""))")
Ciao
Ma io ti ho detto che "WorksheetFunction.SumProduct si aspetta come argomenti degli intervalli, non delle formule"; per ulteriore chiarezza dico che se gli metti delle formule non funzionera'.No Anthony continuo ad avere risultati errati.... tornando alla mia formula iniziale set Rmodo= Range("MODO") quindi la formula sembra essere corretta... qualsiasi funzione inserisco al posto di supproduct infatti funziona benissimo...
Ad esempiofatemi un esempio qualsiasi che funzioni utilizzando però questa funzione:
WorksheetFunction.SumProduct
pippo=WorksheetFunction.SumProduct(Range("A1:A20"),Range("B1:B20"))
=Conta.più.se(A1:A100;"pippo";B1:B100;"")
Anthony47 ha scritto:Provato su 2010, una formula tipofa il calcolo correttamente.
- Codice: Seleziona tutto
=Conta.più.se(A1:A100;"pippo";B1:B100;"")
Ciao
Torna a Applicazioni Office Windows
Inserimento dati su tabella da codice a barre Autore: systemcrack |
Forum: Applicazioni Office Windows Risposte: 80 |
A cosa serve "le proprietà seguono il punto dati grafico"? Autore: wallace&gromit |
Forum: Applicazioni Office Windows Risposte: 5 |
cosa posso fare si resetta sempre il pc con questo errore Autore: mp420 |
Forum: Software Windows Risposte: 1 |
Visitano il forum: Nessuno e 92 ospiti