Somma celle con ciclo

Hai un problema con Excel?

Nuova discussione

Somma celle con ciclo
di alexps81 data: 07/11/2016 20:05:21
Scusate ma sto impazzendo davanti a una banalità.
Come faccio a creare un altro ciclo che mi permette di incrementare le celle di altre colonne?
Cioè così com'è scritto fa la somma ciclica da A1 a E1, da A2 a E2, da A3 a E3....e così via fino da A10 a E10. Ma se volessi improvvisamente aumentare il numero di colonne da sommare mica posso scrivere ".... + cells(i,6) + cells(i,7) + ...."
Immagino ci voglia un altro ciclo. Ma come si fa? Magari si inserisce un contatore?
Private Sub Worksheet_SelectionChange(ByVal Target As Range) For i = 1 To 10 Cells(i, 6) = Cells(i, 1) + Cells(i, 2) + Cells(i, 3) + Cells(i, 4) + Cells(i, 5) Next i End Sub
di patel data: 07/11/2016 20:20:36
Perché hai aperto una nuova discussione ? cosi senza spiegazioni nessuno ti risponderà
di alexps81 data: 07/11/2016 20:25:25
Ciao Patel, non ho capito la tua risposta. Cosa vuoi dire?
Forse non ho spiegato il mio problema?

Cioè vorrei fare in modo che le cella da sommare siano molte di più, e non posso scrivere nel codice "cells(i,6) + cells(i,7)" e così via per magari 20 o 50 celle.

di tanimon data: 07/11/2016 21:36:25
ciao,
cit. Ma se volessi improvvisamente aumentare il numero di colonne da sommare......

Improvvisamente?!?!?!?
A capocchia?!?!?!?!?
O con un criterio razionale?

in ogni caso, dovresti impostare una variabile per il numero di colonne e/o la condizione/evento
che lo modifica

se invece non ho capito male......... ed il numero di colonne è sempre 5,
o sempre lo stesso numero di colonne, adegua il codice che riporto qui sotto

ciao
Frank

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
For i = 1 To 10

'ovviamente il range oggetto della somma è fisso da colonna 1 a colonna 5

    Cells(i, 6) = Application.WorksheetFunction.Sum(Range(Cells(i, 1), Cells(i, 5)))
Next i

End Sub

di alexps81 data: 07/11/2016 23:39:28
Grazie, era proprio quello che cercavo

Vuoi Approfondire?