Forums Últimos mensajes - Powered by IBM
 
Tags Palabras claves

como hacer esto en excel

28/10/2009 - 22:28 por jorgealfredo | Informe spam
Ayuda Hacer una pregunta
Cordial saludo. tengo el siquiente inconveniente; en una hoja de excel
tengo en la distribución de un cuadro de ventas de la siquiente manera
en la colomunA texto en la columna B el codigo en columnas de la
c a la L el valor de la venta.
El inconveniente es el siquiente. Si el codigo de la columna B se
repite, de me pide que coloque en una sola fila los datos de ese
codigo y elimine el resto; entonces por ejemplo si el codigo 27
aparece 3 veces así
colmna A Colmna B columna C columna D columna E
columna F columna G
barrio1 27 30 100
barrio2 27
200 1000 20 5
casa1 27
- 20

me piden que el dato quede asi

colmna A ColmnaB columnaC columnaD columnaE
columnaF columna G
barrio1- barrio2- casa1 27 30
300 1000 20 25

En la columna A como se puede observar quedan concatenados los valores
del numero de veces como aparacen el codigo y debo sumar los valores
de las siquientes columnas y dejar un solo valor.

Como puedo realizar esto e excel.
Gracias Mil por las suqerencias
email Siga el debateRespuesta 1 respuestaRespuesta Tengo una respuesta
DRAGON AGE™: INQUISITION – Matadragones
 

Leer las respuestas

#1 Héctor Miguel
31/10/2009 - 04:28 | Informe spam
hola, jorge !

suponiendo que los datos inician en la fila 2, prueba con una macro +/- como la siguiente (en un modulo de codigo estandar)

Sub AcumulaCodigos()
Application.ScreenUpdating = False
Dim nFilas As Integer, Fila As Integer, x As Integer, _
n As Integer, Col As Byte, Celda As Range
nFilas = Range("b65536").End(xlUp).Row
For Fila = 2 To nFilas
x = Application.CountIf(Range("b:b"), Range("b" & Fila))
If x > 2 Then
For n = 2 To x
Set Celda = Range("b:b").Cells.Find(Range("b" & Fila), Range("b" & Fila), , , , xlNext)
Range("a" & Fila) = Range("a" & Fila) & ", " & Celda.Offset(, -1)
For Col = 3 To 12 ' columnas C a L
Cells(Fila, Col) = Cells(Fila, Col) + Celda.Offset(, Col - 2)
Next
Celda.EntireRow.Delete
nFilas = nFilas - 1
Next
End If
Next
Set Celda = Nothing
End Sub

saludos,
hector.

__ OP __
... en una hoja de excel tengo en la distribucion de un cuadro de ventas de la siquiente manera
en la colomunA texto en la columna B el codigo en columnas de la c a la L el valor de la venta.
El inconveniente es el siquiente. Si el codigo de la columna B se repite
de me pide que coloque en una sola fila los datos de ese codigo y elimine el resto
entonces por ejemplo si el codigo 27 aparece 3 veces asi
colmna A Colmna B columna C columna D columna E columna F columna G
barrio1 27 30 100
barrio2 27 200 1000 20 5
casa1 27 - 20
me piden que el dato quede asi
colmna A ColmnaB columnaC columnaD columnaE columnaF columna G
barrio1- barrio2- casa1 27 30 300 1000 20 25
En la columna A como se puede observar quedan concatenados los valores del numero de veces
como aparacen el codigo y debo sumar los valores de las siquientes columnas y dejar un solo valor.

Preguntas similares

 

Busqueda sugerida :