Un botón de giro se puede utilizar para incrementar un número en una celda. Para crear un botón de número en Excel VBA, ejecute los siguientes pasos.

  1. En la ficha Programador, haga clic en Insertar.

  2. En el grupo Controles ActiveX, haga clic en el botón Girar.

Create a spin button in Excel VBA

  1. Arrastre un botón de girar en su hoja de trabajo.

  2. Haga clic derecho en el botón de giro (asegúrese de que el modo de diseño se selecciona).

  3. Haga clic en Ver código.

View Code

Nota: se puede cambiar el nombre de un control haciendo clic derecho sobre el control (Asegúrese de haber seleccionado el modo de diseño) y luego hacer clic en Propiedades. Por ahora, vamos a dejar SpinButton1 como el nombre del botón de giro.

  1. Para vincular este botón giratorio a una celda, añadir la siguiente línea de código.

Range("C3").Value = SpinButton1.Value

  1. Se puede establecer un máximo y un mínimo añadiendo las siguientes líneas de código.

SpinButton1.Max = 100

SpinButton1.Min = 0

  1. Para cambiar el valor incremental, utilice la propiedad SmallChange.

SpinButton1.SmallChange = 2

  1. Haga clic en las flechas del botón de giro (asegúrese de que el modo de diseño no está seleccionada).

Resultado:

Spin Button

Nota: en lugar de cambiar las propiedades del botón de girar en tiempo de ejecución, también puede cambiar las propiedades en tiempo de diseño. Para lograr esto, haga clic derecho sobre el botón de giro (asegúrese de que el modo de diseño se selecciona) y haga clic en Propiedades.

Properties