Jump to content

Macro sumatoria de datos que actualizan en tiempo real


od-lambda

Recommended Posts

Buenas:

Tengo un pequeño problema al poder establecer finalmente la siguiente macro a ver si podeis orientarme:

Sub VOLUMEN_VENTA_ACUMULADO()

Do

Dim Acumulador

Acumulador = Range("D20").Value

Acumulador = Acumulador + Range("B19").Value

Range("D20") = Acumulador

Loop

End Sub[/CODE]

-Su función principal es actualizar los datos constantes de un volumen de venta los cuales se van actualizando casi al seg o en un tiempo real.(Según vienen).

Mi idea principal es hacer una suma acumulativa de estos datos siempre y cuando se actualicen no como esta pequeña macro que actualiza en un bucle el mismo dato.

Por otro lado nose si existe la posibilidad de que nada más abrir la tabla se ejecute dicho macro

Ante todo muchas gracias por leer y vuestro tiempo.

Un saludo:kiwi-fruit:

Tabla.zip

Link to comment
Share on other sites

Hola denuevo od-lambda....

No habia visto que colgaste el archivo... Bueno... si he entendido lo que quieres... quiza esta macro te sirva

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

If Intersect(Target, Range("B2:B3")) Is Nothing Then Exit Sub

If [b1] <> "" Then [D2] = [D2].Value + [b1].Value: [b1] = ""

If [b2] <> "" Then [D3] = [D3].Value + [b2].Value: [b2] = ""

End Sub

Link to comment
Share on other sites

Archived

This topic is now archived and is closed to further replies.

Guest
This topic is now closed to further replies.
×
×
  • Create New...

Important Information

Privacy Policy