paulleandro

Enrique Bernal respondió: Sub Copia_Clasifica() Sheets("Hoja2").Select Cells.Select Application.CutCopyMode = False Selection.Copy Sheets("Hoja3").Select Cells.Select ActiveSheet.Paste Columns("A:E").Select Selection.Insert Shift:=xlToRight Range("I:I").Select Selection.Cut...

newmodel respondió: Te envío una propuesta... La macro primero ordena por Columna A y después hace las operaciones que indicas... Sub bdClasifica() Dim TotalReg As Long Dim i, x, r As Long Dim IdProd As String TotalReg = Range("a65500").End(xlUp).Row + 1 Range("A1:C" &...

Cadipas spain respondió: Lo he realizado con macros, si por algún motivo desconoces el tema y no sabes como utilizarlas, dímelo y te ayudo a insertarla en el fichero. Sub totaliza() ultimafila = "" If ultimafila = "" Then primerafila = 65500 Do While primerafila <> ""...

Anónimo respondió: Prueba con esta fórmula, mira que seguí tu esquema, es decir que después de lo que quieres que sume vos pones *, es decir, que si no pones * la fórmula no va a funcionar suma(indirecto("a"&fila(a13)&":a"&coincidir("*";$a13:$a$9000;0)+fila(a13)-1))...