No se como sumar esto en VBA Excel

Tengo en un UserForm un textbox con un numero de vuelo asi: K85931

Al abrir otro UserForme (sin quitar el anterior) quiero que en el evento Initialize del segundo UserForm se cargue un textbox con ese mismo numero pero + 1

o sea que aparezca K85932

Este código no me funcionas, me da error:

Private Sub UserForm_Initialize()

Me.TextBox1.Value = UserForm1.TextBox1.Value + 1

End Sub

Supongo que sea por la letra K entonces necesito hacer una referencia al ultimo dígito, como hago eso?

Respuesta
1

Private Sub UserForm_Initialize()

Me.TextBox1 = Left(TextBox1.Value, 1) & (Mid(TextBox1.Value, 2, 10) + 1)

End Sub

Favor finalizar y puntuar!

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas