Textbox

Hola, tengo un inconveniente
Quisiera saber cual es el código para que un textbox me muestre el resultado del promedio de las últimos 3 datos ingresados.
Por ejemplo
a1 = 1
a2 = 2
a3 = 3
a4 = 4
a5 = 5
el promedio de los ultimos tres datos seria ((5+4+3)/3) =4
Lo que deseo es que en un textbox esta operación se haga automáticamente y me muestre este resultado.
Espero puedas colaborarme

1 Respuesta

Respuesta
1
Este sería el código, y te aparecería en un msgbox el resultado.
Sub Promedio()
k = Range("A" & Cells.Rows.Count).End(xlUp).Row
b = Application.WorksheetFunction.Average(Range("A" & k & ":A" & k - 2))
MsgBox "El valor Promedio de los tres últimos valores es " & b
End Sub

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas