Login
Registrati
Stai vedendo 5 articoli - dal 1 a 5 (di 5 totali)
-
Articoli
-
Salve gente,spero potete aiutarmi. Devo inserire la seguente formula tramite VBA=SUMIFS(I2:I35,A2:A35,">="&A4,A2:A35,"< ="&EOMONTH(A4,0))Come potete vedere ho office in inglese...La cosa non mi riesce perche' i Range sono variabili, quindi ho provato a scrivere una cosa del genere nel codice, ma ovviamente ho un errore:ActiveCell.FormulaR1C1 = "=SUMIFS(" & VRngS & ":" & VRngE & "," & DRngS & ":" DRngE & "," & "">="" & " & DRngS & "," & DRngS & ":" DRngE & "," & ""< ="" & "&EOMONTH(" & DRngS & ",0))"Ho provato anche ad usare questa istruzione,ActiveCell = WorksheetFunction.SumIfs(Range(VRngS, VRngE), Range(DRngS, DRngE), Range(DRngS, DRngE), "< =" & WorksheetFunction.EoMonth(EOM, 0)Come posso risolvere?Grazie in anticipo!
prova cosi, la funzione EOMONTH, non lo testata perche ho excel2007
Sub c()
Set primo = Range("i2:I35")
Set secondo = Range("A2:A35")
Range("a1").FormulaR1C1 = Application.WorksheetFunction.SumIfs(primo, secondo, ">=" & A4, secondo) ', "< =" & EoMonth(A4, 0))
End Sub
Qual è il punto di avere gusti diversi, se non mostrare che i cervelli lavorano diversamente, che pensiamo diversamente?( Alan Turing)
Grazie per la risposta,
ho provato e nn ci sono errori di debug, il problema e' che mi restituisce "0" come risultato
sostituisci la formula alla riga quattro cosi
Range("a1").FormulaR1C1 = Application.WorksheetFunction.SumIfs(secondo, primo, ">=" & Range("a4"))
Qual è il punto di avere gusti diversi, se non mostrare che i cervelli lavorano diversamente, che pensiamo diversamente?( Alan Turing)
Grazie mille, gentilissimo!
cosi' funziona, pero' nn ho capito perche' se cambio l'operatore da > a < e cambio cella da "A4" ad un altra, mi da "0", in pratica cosi:
ActiveCell.FormulaR1C1 = Application.WorksheetFunction.SumIfs(secondo, primo, "< =" & Range("A33"))