| Funzione somma di
Enzo |
Cari ragazzi avrei un propblema di questo tipo
es. ho un elenco con dei valori da a1 a a30 in a32 ho la
funzione somma che mi somma i dati in questa fascia di elenco
ora sono riuscito con una istruzione a dire alla macro che se
trova fine elenco mi aggiunge nella cella successiva uin valore (es.
in questo caso a31) il problema sorge quando voglio che sempre
tra la fine dell'elenco e la cella ci siano due righe di differenza
riesco a trovare fine elenco inserire il nuovo valore e a
lasciare le due righe ma la funzione di somma in a 32 non si adegua
ma lascia sempre la somma dei valori precedente come si puo
ovviare a questa cosa?
|
|
| Più una di Cucchiaino |
Ciao enzo. questa è una delle
soluzioni:
Sub allungazona()
Dim u As Range
Set u = Range("A1").End(xlDown)
With u
.Offset(1).Resize(2).ClearContents
.Offset(3).FormulaR1C1 = _
"=SUM(R[-" & .Row + 2 & "]C:R[-3]C)"
End With
End Sub
| |
|
| Domanda per cucchianino di
Enzo |
Funziona - e ti ringrazio vorrei farti altre
due domande se volessi attuare la stessa cosa ma il risultato
porlo in in altra cella che non sia la colonna a mi spiego
meglio - somma da a1 a a8 salta due righe e poni il risultato in c11
e non a 11 la seconda e tornando alla prima soluzione se si
volesse fare la somma di due colonne? |