Condividi:        

Somma celle non contigue

Vuoi potenziare i tuoi documenti Word? Non sai come si fa una macro in Excel? Devi creare una presentazione in PowerPoint?
Oppure sei passato a OpenOffice e non sei sicuro di come lavorare al meglio?

Moderatori: Anthony47, Flash30005

Somma celle non contigue

Postdi Ricky0185 » 20/03/23 18:52

Buonasera, Debbo integrare una macro trasferendoci il valore che sta nelle celle gialle che risulta dalla somma del valore che sta nella colonna E con quello della colonna G, stessa riga. In sostanza debbo reperire le istruzioni che mi facciano questa somma in tutte le celle gialle con riferimento alla cella che sta nella colonna A. Tante prove di cui anche l'ultima con esito negativo. La lista è molto più lunga e come evidenziato, alcune caselle delle colonne F e G sono vuote, ma vanno anch'esse considerate nel risultato della somma nella colonna H. Ecco il foglio
Immagine
Un Esempio: H26=E26+G26 e questo in automatico per tutte le celle gialle
ed ecco l'ultimo tentativo
Codice: Seleziona tutto
Dim C as Range
For Each C In Sheets("Foglio1").Range("a3:a250")
If cl.Value = "" Then GoTo 10
C.Offset(0, 1).End(xlDown).Offset(0, 6).Formula = _
 "=sum("+(C.Offset(0, 1).End(xlDown).Offset(0, 3)+";"+(C.Offset(0, 1).End(xlDown).Offset(0,5)+")"
End If
Next
10
Next

Mi scuso per il mancato utilizzo di DropBox, ma non carica i files.
Buona serata
R
Ricky0185
Utente Senior
 
Post: 257
Iscritto il: 10/12/19 20:38

Sponsor
 

Re: Somma celle non contigue

Postdi Anthony47 » 21/03/23 01:04

Non prendertela, ma a cercare di decodificare la richiesta mi si sono attorcigliati i neuroni...

Alla fine prendo per buono solo l'ultima frase
Un Esempio: H26=E26+G26 e questo in automatico per tutte le celle gialle


e quindi ti propongo:
Codice: Seleziona tutto
Dim C As Range
For Each C In Sheets("Foglio1").Range("a3:a250")
    If C.Value <> "" Then
        C.Offset(0, 4).End(xlDown).Offset(0, 3).FormulaR1C1 = "=RC[-3]+RC[-1]"
    End If
Next C
Usa l'indirizzamento R1C1, pensato apposta per gli indirizzi "relativi"

Prova, e se non fa quel che chiedevi mi sembrera' solo normale; ma non preoccuparti: scrivi daccapo quello che stai cercando di fare e ri-vedremo di ri-capire...
Avatar utente
Anthony47
Moderatore
 
Post: 19196
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: Somma celle non contigue

Postdi Ricky0185 » 21/03/23 08:44

È strano, ma è esattamente il primo tentativo che ho provato e mi dava come risultato il primo totale giusto e tutti gli altri con lo stesso valore del primo. Comunque grazie.
Ti saluto
R
Ricky0185
Utente Senior
 
Post: 257
Iscritto il: 10/12/19 20:38

Re: Somma celle non contigue

Postdi wallace&gromit » 21/03/23 09:56

Domanda da ignorante:
non era sufficiente riscrivere in ogni riga A la sigla, per esempio "Si", senza lasciare righe vuote, e poi fare un matr.somma.prodotto?
Office2016 + 2019 su win11
Avatar utente
wallace&gromit
Utente Senior
 
Post: 2174
Iscritto il: 16/01/12 14:21

Re: Somma celle non contigue

Postdi Ricky0185 » 22/03/23 08:45

Seeee, risposta da vero ignorante: matr.somma.prodotto che è? Credi di parlare con Anthony?
Bando alle battute, matr.somma.prodotto e persino le matrici sono per me aramaico, però se mi fai vedere cosa intendi sul foglio che ho postato te ne sarei grato e, quando ho tempo, incomincerei a studiarmele.
Ciao
Ricky0185
Utente Senior
 
Post: 257
Iscritto il: 10/12/19 20:38


Torna a Applicazioni Office Windows


Topic correlati a "Somma celle non contigue":


Chi c’è in linea

Visitano il forum: Gianca532011 e 53 ospiti