Как да заключите позиция на лист за винаги видима в работната книга на Excel?
Ако има няколко листа в работна книга, когато превключите към последния лист, първият лист ще бъде скрит в лентата с раздели на листа, както е показано по-долу. Сега искате да заключите позицията на главния лист за винаги видима, как можете да се справите?
 |
 |
 |
Заключете позицията на листа с VBA
Заключете позицията на листа с VBA
Тук представям два VBA кода, за да се справите с тази работа.
Скочи до листа
1. Натиснете Alt + F11 клавиши за активиране на Microsoft Visual Basic за Windows.
2. кликване Поставете > Модули, след това копирайте и поставете кода по-долу в скрипта.
VBA: Преминете към основния лист
Sub GoToSheet()
'UpdatebyExtendoffice20180427
Sheets("Master").Activate
End SubЗабележка: В кодовия фрагмент на Листове ("Master"). Активиране, можете да промените Майстор към всяко име на лист, както ви е необходимо.
3. След това запазете този код и се върнете в работната книга, щракнете Софтуерен Инженер > Макроси.
4. В Макро изберете кодовото име, което сте въвели току-що, щракнете Настроики, създайте пряк път за изпълнение на този код.
5. кликване OK и затворете Макро диалогов прозорец.
От сега нататък, докато натискате прекия път, който сте създали, главният лист се активира, независимо от това, който лист използвате.
Дръжте чаршафа винаги отпред
1. Натиснете Alt + F11 клавиши за активиране на Microsoft Visual Basic за Windows.
2. Кликнете два пъти Тази работна книга от Проект-VBAProject прозорец и копирайте и поставете кода по-долу в скрипта.
VBA: Дръжте листа винаги отпред
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
'UpdatebyExtendoffice2018027
Dim xSheet As Worksheet
Application.EnableEvents = False
Set xSheet = Sheets("master")
If Sh.Name <> xSheet.Name Then
Sh.Move , xSheet
xSheet.Activate
Sh.Activate
End If
Application.EnableEvents = True
End Sub
3. Запазете кода и затворете прозореца на VBA. Отсега нататък, който и лист да щракнете, основният лист винаги остава в предната част на лентата с раздели.
 |
|
 |
Забележка: В горния код, „Господар“ е името на листа, което искате да запазите видимо, променете го според нуждите си.
Най-добрите инструменти за продуктивност в офиса
Усъвършенствайте уменията си за Excel с Kutools за Excel и изпитайте ефективност, както никога досега. Kutools за Excel предлага над 300 разширени функции за повишаване на производителността и спестяване на време. Щракнете тук, за да получите функцията, от която се нуждаете най-много...
Раздел Office Внася интерфейс с раздели в Office и прави работата ви много по-лесна
- Разрешете редактиране и четене с раздели в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
- Отваряйте и създавайте множество документи в нови раздели на един и същ прозорец, а не в нови прозорци.
- Увеличава вашата производителност с 50% и намалява стотици кликвания на мишката за вас всеки ден!
