Foros del web, para los que viven de bits

jorge1980 · 20-mar-2007, 12:19

Hola!..Necesito hacer un macro que sume valores almacenados en una columna y que por cada suma igual a 40 contabilice, es decir, si la suma de las primeras celdas es igual a 40 el valor colocado en una celda x es igual a 1, si la suma es igual a 80 el valor colocado dicha celda x es igual a 2 y asi sucesivamente.

Me entienden?... De no ser asi, haganmelo saber por favor.

Gracias!

judoka · 20-mar-2007, 12:58

¿ y es necesario que lo hagas con una macro?
te podria servir una columna adjunta con el acumulado y dependiendo de ese valor acumulado poner el valor correspondiente

jorge1980 · 20-mar-2007, 13:31

Hola Judoka!...pero como lo haria?...Puedes orientarme, nose mucho de excel.
Lo que quiero es esto:

A B
15
15
10 1
10
10
10
10 2
25
10
5 3

Me entiendes?...Aunque pienso que no fui muy claro en el primer post porque lo hacia acumulativo.

Gracias por todo!

judoka · 20-mar-2007, 14:50

revisa este ejemplo

http://alvarezbello.iespana.es/excel/suma_acumulada.xls

jorge1980 · 21-mar-2007, 11:05

Hola nuevamente!....jejejej. Lo que observe en el ejemplo del link que me recomendastes no es lo que busco amigo(a).

Te explico a continuacion tomando como ejemplo la hoja mostrada en el link recomendado.
Suponte que quiero sumar todos los valores mostrados en la columna B y por cada suma que sea igual o mayor a 40 en una celda C, justamente donde el valor sea igual o mayor a 40 se inicialice el contador.

For Example:

Suma: if (B2+B3)>=40 then Valor cera colocado en la celda C3 donde Valor sera contador=1
Suma: if (B4+B5)>=40 then Valor cera colocado en la celda C3 donde Valor sera contador=2 y asi sucesivamente.....you understand now?

thank very much!

JavierB · 22-mar-2007, 03:28

Hola jorge1980

He teclado algunas líneas de código, a ver si te sirven:

Código:

Sub Sumar()
    contador = 0
    total = 0
    Range("A1").Select ' empezar en celda A1
    ' recorrer las celdas hasta encontrar una vacía
    Do While ActiveCell <> Empty
        total = total + ActiveCell ' sumar el valor de la celda
        ' si la suma es igual o mayor a 40...
        If total >= 40 Then
            contador = contador + 1 ' incrementar contador
            ActiveCell.Offset(0, 1).Select ' desplazr a la derecha
            ActiveCell = contador ' escribir contador en la celda
            ActiveCell.Offset(0, -1).Select ' volver a la izquierda
            total = 0 ' inizializar variable total
        End If
        ActiveCell.Offset(1, 0).Select ' siguiente fila
    Loop
End Sub

Saludos,

jorge1980 · 23-mar-2007, 11:44

Gracias pana!!!!!!....No sabes cuanto te lo agradezco, pero puedes decirme donde aprendistes a crear macros..puedes recomendarme algunos llink de tutoriales.

Saludos, Jorge

20-mar-2007, 12:19	#1 (permalink)
jorge1980 Fecha de Ingreso: mayo-2005 Mensajes: 274	Macro Hola!..Necesito hacer un macro que sume valores almacenados en una columna y que por cada suma igual a 40 contabilice, es decir, si la suma de las primeras celdas es igual a 40 el valor colocado en una celda x es igual a 1, si la suma es igual a 80 el valor colocado dicha celda x es igual a 2 y asi sucesivamente. Me entienden?... De no ser asi, haganmelo saber por favor. Gracias!

20-mar-2007, 12:58	#2 (permalink)
judoka Fecha de Ingreso: enero-2004 Ubicación: viña del mar Mensajes: 176	Re: Macro ¿ y es necesario que lo hagas con una macro? te podria servir una columna adjunta con el acumulado y dependiendo de ese valor acumulado poner el valor correspondiente __________________ hay tres tipos de matemáticos, los que saben contar y los que no. Oscar

20-mar-2007, 13:31	#3 (permalink)
jorge1980 Fecha de Ingreso: mayo-2005 Mensajes: 274	Re: Macro Hola Judoka!...pero como lo haria?...Puedes orientarme, nose mucho de excel. Lo que quiero es esto: A B 15 15 10 1 10 10 10 10 2 25 10 5 3 Me entiendes?...Aunque pienso que no fui muy claro en el primer post porque lo hacia acumulativo. Gracias por todo! Última edición por jorge1980; 20-mar-2007 a las 13:33. Razón: Columnas no bien alineadas

20-mar-2007, 14:50	#4 (permalink)
judoka Fecha de Ingreso: enero-2004 Ubicación: viña del mar Mensajes: 176	Re: Macro revisa este ejemplo http://alvarezbello.iespana.es/excel/suma_acumulada.xls __________________ hay tres tipos de matemáticos, los que saben contar y los que no. Oscar

21-mar-2007, 11:05	#5 (permalink)
jorge1980 Fecha de Ingreso: mayo-2005 Mensajes: 274	Re: Macro Hola nuevamente!....jejejej. Lo que observe en el ejemplo del link que me recomendastes no es lo que busco amigo(a). Te explico a continuacion tomando como ejemplo la hoja mostrada en el link recomendado. Suponte que quiero sumar todos los valores mostrados en la columna B y por cada suma que sea igual o mayor a 40 en una celda C, justamente donde el valor sea igual o mayor a 40 se inicialice el contador. For Example: Suma: if (B2+B3)>=40 then Valor cera colocado en la celda C3 donde Valor sera contador=1 Suma: if (B4+B5)>=40 then Valor cera colocado en la celda C3 donde Valor sera contador=2 y asi sucesivamente.....you understand now? thank very much!

23-mar-2007, 11:44	#7 (permalink)
jorge1980 Fecha de Ingreso: mayo-2005 Mensajes: 274	Re: Macro Gracias pana!!!!!!....No sabes cuanto te lo agradezco, pero puedes decirme donde aprendistes a crear macros..puedes recomendarme algunos llink de tutoriales. Saludos, Jorge

Herramientas
Mostrar Versión Imprimible Enviar por Correo
Desplegado
Mode Lineal Cambiar a Modo Hibrido Cambiar a Modo Hilado