Acumular la suma en una misma celda para varias celdas
publicado
SOY MUY NUEVO EN EXCEL Y NO SE COMO HACER QUE ME FUNCIONE ESTE MACRO EN MAS CELDA APARTE DE H3 EN LA QUE FUNCIONA PERFECTAMENTE, COMO POR EJEMPLO DESDE H3 HAST H20
Option Explicit
Dim valor As Long
Dim cantidadVeces As Integer
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$H$3" Then
cantidadVeces = cantidadVeces + 1
If cantidadVeces > 1 Then
Exit Sub
End If
valor = valor + Sheets("Entradas-salidas").Range("H3").Value
Sheets("Entradas-salidas").Range("H3").Value = valor
End If
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
valor = 0
cantidadVeces = 0
If Target.Address = "$H$3" Then
valor = Sheets("Entradas-salidas").Range("H3").Value
SOY MUY NUEVO EN EXCEL Y NO SE COMO HACER QUE ME FUNCIONE ESTE MACRO EN MAS CELDA APARTE DE H3 EN LA QUE FUNCIONA PERFECTAMENTE, COMO POR EJEMPLO DESDE H3 HAST H20
Option Explicit
Dim valor As Long
Dim cantidadVeces As Integer
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$H$3" Then
cantidadVeces = cantidadVeces + 1
If cantidadVeces > 1 Then
Exit Sub
End If
valor = valor + Sheets("Entradas-salidas").Range("H3").Value
Sheets("Entradas-salidas").Range("H3").Value = valor
End If
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
valor = 0
cantidadVeces = 0
If Target.Address = "$H$3" Then
valor = Sheets("Entradas-salidas").Range("H3").Value
End If
End Sub
Copia de Control-de-entradas-y-salidas.xls