rizzivittorio@virgilio.it
00domenica 19 giugno 2016 15:53
Salve, sono nuovo del Forum
solitamente lavoro con programmi cad
Uno di questi mi restituisce una distinta in Excel, nella quale si trovano diverse righe uguali dello stesso codice, con quantità pari a 1.
Avrei bisogno di una dritta per riuscire a trovare automaticamente lo stesso codice e sommarne la quantità.
grazie a chi mi può aiutare
federico460
00domenica 19 giugno 2016 16:15
Ciao
ti allego un file
non mio
vedi se la struttura è quella ( non i dati)
rizzivittorio@virgilio.it
00domenica 19 giugno 2016 20:38
si questo può servire
cercavo comunque qualche cosa che possa attivarsi con un comando, senza dover inserire sempre la formula.
comunque molte grazie per l'aiuto
alfrimpa
00domenica 19 giugno 2016 21:04
Allora Vittorio, non prima di aver salutato Federico, ti consiglio di allegare un tuo file di esempio con pochi dati e dove mostri il risultato desiderato.
rizzivittorio@virgilio.it
00lunedì 20 giugno 2016 21:16
salve a tutti
grazie per la vostra attenzione
allego un esempio della distinta che ricavo da un disegno cad 3d.
nel foglio 1 è inserita la distinta come esce dal generatore, nel foglio 2 ho applicato la funzione di Federico, che ringrazio ancora.
Si evince che su distinte estese, diventa un po' macchinoso cancellare le celle doppie. Cercavo un automatismo che contasse i codici uguali sommandone la quantità, eliminando le celle doppie.
Non sono molto pratico di Excel, non so nemmeno se questo si possa fare.
ringrazio comunque per aver preso in considerazione la cosa.
patel45
00martedì 21 giugno 2016 08:18
prova questa macro
Sub SumDelete()
J = 5 ' riga iniziale
b = Replace(Cells(J, 2).Value, " ", "")
Do While b <> ""
Do While Replace(Cells(J + 1, 2).Value, " ", "") = b
Cells(J + 1, 4).Value = Cells(J + 1, 4).Value + Cells(J, 4).Value
Rows(J).Delete
Loop
J = J + 1
b = Replace(Cells(J, 2).Value, " ", "")
Loop
End Sub