Як зафіксувати положення аркуша для завжди видимого в книзі Excel?
Якщо в книзі кілька аркушів, під час перемикання на останній аркуш перший аркуш буде схований на панелі вкладки аркуша, як показано нижче. Тепер ви хочете зафіксувати позицію головного аркуша на завжди видимій, як ви можете з цим впоратися?
Зафіксуйте положення аркуша за допомогою VBA
Зафіксуйте положення аркуша за допомогою VBA
Тут я представляю два коди VBA для вас, щоб впоратися з цією роботою.
Перейти до аркуша
1. прес Alt + F11 клавіші, щоб увімкнути Microsoft Visual Basic для Windows.
2. клацання Insert > Модулі, потім скопіюйте та вставте код нижче в скрипт.
VBA: Перехід до головного аркуша
Sub GoToSheet()
'UpdatebyExtendoffice20180427
Sheets("Master").Activate
End Sub
примітки: У фрагменті коду Аркуші ("Майстер"). Активуйте, ви можете змінити Майстер до будь-якої назви аркуша, як вам потрібно.
3. Потім збережіть цей код і поверніться до книги, натисніть Розробник > Макрос.
4 В Macro діалогове вікно, виберіть кодове ім'я, яке ви зараз вставили, натисніть Опції, створити ярлик для запуску цього коду.
5. клацання OK і закрийте Macro діалог
Відтепер, коли ви натискаєте створений ярлик, головний аркуш активується незалежно від того, який аркуш ви використовуєте.
Тримайте аркуш завжди спереду
1. прес Alt + F11 клавіші, щоб увімкнути Microsoft Visual Basic для Windows.
2 Подвійне клацання ThisWorkbook від Проект-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% та зменшує сотні клацань миші для вас щодня!