/ Бутон за въртене на VBA в Excel

Бутон за въртене на VBA на Excel

Бутон за завъртане може да се използва за увеличаване на число в клетка. За да създадете въртене бутона в Excel VBA, изпълнете следните стъпки.

1. В раздела Разработчик кликнете върху Вмъкване.

2. В групата ActiveX Controls щракнете върху Spin Button.

Създайте бутон за въртене в Excel VBA

3. Плъзнете бутона за завъртане на работния лист.

4. Щракнете с десния бутон върху бутона за завъртане (уверете се, че е избран режимът за проектиране).

5. Щракнете върху Преглед на кода.

Преглед на кода

Забележка: можете да промените името на контрола, като щракнете с десния бутон на мишката върху контрола (уверете се, че е избран режим на проектиране) и след това щракнете върху Properties (Свойства). Засега ще оставим SpinButton1 като името на бутона за въртене.

6. За да свържете този бутон за въртене към клетка, добавете следния код.

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

7. Можете да зададете максимален и минимален размер чрез добавяне на следните кодови линии.

SpinButton1.Max = 100
SpinButton1.Min = 0

8. За да промените нарастващата стойност, използвайте свойството SmallChange.

SpinButton1.SmallChange = 2

9. Щракнете върху стрелките на бутона за завъртане (уверете се, че режимът на проектиране не е избран).

Резултат:

Spin Button

Забележка: вместо да променяте свойствата на бутона за въртене по време на изпълнение, можете също да промените свойствата по време на проектиране. За да постигнете това, кликнете с десния бутон върху бутона за завъртане (уверете се, че е избран режим на проектиране) и кликнете върху свойствата.

Имоти

Също така се чете: