Бутон за завъртане може да се използва за увеличаване на число в клетка. За да създадете a бутон за центрофугиране в Excel VBA, изпълнете следните стъпки.
1. В раздела Разработчик щракнете върху Вмъкване.
2. В групата ActiveX Controls щракнете върху Бутон за завъртане.
3. Плъзнете бутона за завъртане на работния си лист.
4. Щракнете с десния бутон върху бутона за завъртане (уверете се, че е избран режим на проектиране).
5. Щракнете върху Преглед на кода.
Забележка: можете да промените името на контролата, като щракнете с десния бутон върху контролата (уверете се, че е избран режим на проектиране) и след това щракнете върху Свойства. Засега ще оставим SpinButton1 като име на бутона за завъртане.
6. За да свържете този бутон за завъртане с клетка, добавете следния код.
Диапазон ("C3"). Стойност = SpinButton1.Value
7. Можете да зададете максимум и минимум, като добавите следните кодови редове.
SpinButton 1. Макс = 100
SpinButton 1. Min = 0
8. За да промените допълнителната стойност, използвайте свойството SmallChange.
SpinButton 1. Малка промяна = 2
9. Щракнете върху стрелките на бутона за центрофугиране (уверете се, че режимът на проектиране е отменен).
Резултат:
Забележка: вместо да променяте свойствата на бутона за завъртане по време на изпълнение, можете също да промените свойствата по време на проектиране. За да постигнете това, щракнете с десния бутон върху бутона за завъртане (уверете се, че е избран режим на проектиране) и щракнете върху свойствата.