Как винаги да плавате команден бутон на работен лист в Excel?
В някои случаи може да се нуждаете от плаващ команден бутон (ActiveX контроли), за да продължите да се движите с работния си лист, независимо как превъртате нагоре или надолу в работния лист. Тази статия ще ви покаже как да го постигнете.
Винаги плаващ команден бутон на работен лист с VBA код
Винаги плаващ команден бутон на работен лист с VBA код
Моля, направете следното, за да направите команден бутон винаги плаващ в работния лист.
1. В работния лист, който съдържа командния бутон на ActiveX Controls, който искате да бъде плаващ, щракнете с десния бутон върху раздела на листа и след това щракнете върху Преглед на кода от контекстното меню.
2. При изскачане Microsoft Visual Basic за приложения прозорец, копирайте и поставете кода на VBA по-долу в прозореца на кода.
VBA код: Направете команден бутон винаги плаващ в работния лист
Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
On Error GoTo 0
With Cells(Windows(1).ScrollRow, Windows(1).ScrollColumn)
CommandButton1.Top = .Top + 100
CommandButton1.Left = .Left + 300
End With
End Sub
Забележка: в кода по-горе CommandButton1 е името на бутона, който искате да поддържате винаги видим. Моля, променете го според вашите нужди.
3. След това натиснете Друг + Q клавиши за излизане от Microsoft Visual Basic за приложения прозорец.
Отсега нататък командният бутон винаги ще плава в горния център на работния лист с преместването на активната щракната клетка, както е показано на екранната снимка по-долу.
Забележка: Този VBA работи само за командните бутони за управление на ActiveX.
Свързани статии:
- Как да запишете и затворите активна работна книга без подкана от команден бутон в Excel?
- Как да актуализирате или вмъкнете (текуща) дата и час чрез команден бутон в Excel?
- Как да използвате команден бутон, за да промените определена стойност на клетка в Excel?
- Как да създадете команден бутон за копиране и поставяне на данни в Excel?
- Как да използвате командния бутон за запазване на активен работен лист като PDF файл в Excel?
- Как да вмъкна празен нов ред автоматично чрез команден бутон в Excel?
Най-добрите инструменти за продуктивност в офиса
Усъвършенствайте уменията си за Excel с Kutools за Excel и изпитайте ефективност, както никога досега. Kutools за Excel предлага над 300 разширени функции за повишаване на производителността и спестяване на време. Щракнете тук, за да получите функцията, от която се нуждаете най-много...
Раздел Office Внася интерфейс с раздели в Office и прави работата ви много по-лесна
- Разрешете редактиране и четене с раздели в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
- Отваряйте и създавайте множество документи в нови раздели на един и същ прозорец, а не в нови прозорци.
- Увеличава вашата производителност с 50% и намалява стотици кликвания на мишката за вас всеки ден!