> ... macro que me acumule valores en una celda, de acuerdo a la pagina de microsoft y es imposible.
==> "aparentemente" quieres que un valor en una celda se "auto-acumule" sobre si mismo
(no se si "capte" bien lo que solicitas) pero... por lo pronto, prueba copiando las siguientes lineas:
=== en el modulo de codigo de "la hoja" y suponiendo que la celda "acumulante" fuera "A1" ===
Private Sub Worksheet_Change(ByVal Target As Range)
Static Anterior As Double
If Not Target = Range("a1") Then Exit Sub
On Error GoTo Fin
If Target <> 0 Then
Application.EnableEvents = False
Target = Target + Anterior
Anterior = Target
Else
Target.ClearContents
Anterior = 0
End If
Fin:
Application.EnableEvents = True
End Sub
Si se trata de algo diferente, ¿comentas mas datos?
_______
Saludos,
Héctor.
MS-MVP
Siendo A1 la celda donde se acumula y B1 la celda donde introduces el valor
a acumular
Dim Acumulador
Acumulador = Range("A1").Value
Acumulador = Acumulador + Range("B1").Value
Range("A1") = Acumulador
"gabriela" <molina...@hotmail.com> escribió en el mensaje
news:039a01c36b51$0d01a340$a501...@phx.gbl...
Yo necesitaba acumular las vesntas diarias en una celda de tal manera que
que al digitar el nuevo valor, el acunulado apareciera en una nueva celda,
pues se logro de la siguiente manera:
Ventas Diarias en C7, acunulado en D7.
Bueno en d7 se digito =c7+d7 esto da una referencia Circular en el mensaje
que aparece se selecciona CANCELAR, luego de esto vas al menu herramientas ,
Opciones y en la pestaña Calcular escojes numero màximo de iteraciones 1
Luego aceptar,
Espero te sirva.
cordialmente
Heriberto Martínez
gabriela <molina...@hotmail.com> escribió en el mensaje de noticias
039a01c36b51$0d01a340$a501...@phx.gbl...