Botón de número en userform

"Sebas" escribió en el mensaje news:

Buenos días.
He colocado en un userform un cuadro de texto y un botón de número
vinculados con la misma celda de la hoja. Cuando pulso el botón de número
¿cómo actualizo el contenido del cuadro de texto? El valor se actualiza en
la celda cuando cierro el formulario pero no cuando pulso el botón de
número.
Muchísimas gracias

El problema es que la celda se actualiza tan sólo al salir del botón de número.

La única forma de solucionarlo que he encontrado ha sido dejar vacía la propiedad ControlSource del botón de número y poniendo el siguiente código en el módulo del formulario:

Private Sub SpinButton1_SpinDown()
With Me.TextBox1
If .Value > 0 Then .Value = .Value - 1
End With
End Sub

Private Sub SpinButton1_SpinUp()
With Me.TextBox1
.Value = .Value + 1
End With
End Sub

Se supone que el botón de número se llama SpinButton1 y el cuadro de texto TextBox1. Si no fuera así, tendrías que modificar el código.
Un saludo.


Fernando Arroyo
MS MVP - Excel

Muchas gracias Fernando, intentaba no recurrir a la programación pero veo
que no hay más remedio.
Un saludo

"Fernando Arroyo" escribió en el mensaje
news:
"Sebas" escribió en el mensaje
news:

Buenos días.
He colocado en un userform un cuadro de texto y un botón de número
vinculados con la misma celda de la hoja. Cuando pulso el botón de número
¿cómo actualizo el contenido del cuadro de texto? El valor se actualiza en
la celda cuando cierro el formulario pero no cuando pulso el botón de
número.
Muchísimas gracias

El problema es que la celda se actualiza tan sólo al salir del botón de
número.

La única forma de solucionarlo que he encontrado ha sido dejar vacía la
propiedad ControlSource del botón de número y poniendo el siguiente código
en el módulo del formulario:

Private Sub SpinButton1_SpinDown()
With Me.TextBox1
If .Value > 0 Then .Value = .Value - 1
End With
End Sub

Private Sub SpinButton1_SpinUp()
With Me.TextBox1
.Value = .Value + 1
End With
End Sub

Se supone que el botón de número se llama SpinButton1 y el cuadro de texto
TextBox1. Si no fuera así, tendrías que modificar el código.
Un saludo.


Fernando Arroyo
MS MVP - Excel