No Totaliza

hola, ???

Porque este Codigo no me totaliza?

-> POR QUE es que estas 'seguro' que no esta 'totalizando' -???-

1) si estas 'parado' en la celda 'A1'... el codigo esta depositando los acumulados en la celda 'D27'
2) si estas 'parado' en la celda H37' el codigo esta sepositando los acumulados en la celda 'K63'

-> revisa la instruccion: -> ActiveCell.Range("D27").Value = Total

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.

__ el codigo expuesto __

Sub ForNext()
Dim i As Integer
Dim Total As Integer
Dim Valor As Integer
For i = 1 To 10
Valor = Val(InputBox("Introduzca un Número", "ForNext.Repite varias Instrucciones y Totaliza"))
Total = Total + Valor
ActiveCell.Range("D27").Value = Total
Next i
End Sub