Перейти до основного матеріалу

 Як завжди знаходитись у комірці А1 під час відкриття книги?

Як ми всі знаємо, коли ви відкриваєте книгу, вона відображатиме місце комірки, де ви зберегли та закрили її минулого разу. Як завжди можна відкривати книгу з кожним аркушем у певній комірці А1? У цій статті мова піде про деякі способи її вирішення.

Завжди відкривайте книгу з кожним аркушем у комірці А1, використовуючи код VBA

Завжди відкривайте книгу на певному аркуші та комірці A1 за допомогою коду VBA


стрілка синя права міхур Завжди відкривайте книгу з кожним аркушем у комірці А1, використовуючи код VBA

Наприклад, ви завжди хочете, щоб книга відкривалася в комірці А1 кожного аркуша, незалежно від того, де ви були в книзі, коли вона востаннє була закрита. Будь ласка, виконайте наступне:

1. Утримуйте клавішу ALT + F11 ключі, щоб відкрити Microsoft Visual Basic для додатків вікно. У лівій Проект-VBAProject на панелі, двічі клацніть ThisWorkbook щоб відкрити порожній модуль, а потім скопіюйте та вставте наступний код в модуль, див. знімок екрана:

Код VBA: Завжди відкривайте книгу з кожним аркушем у комірці A1:

Private Sub Workbook_SheetActivate(ByVal Wsh As Object)
'Updateby Extendoffice
On Error Resume Next
Wsh.Range("A1").Select
End Sub

doc завжди відкритий на А1 1

2. Потім закрийте цей код і натисніть філе > Зберегти як щоб зберегти книгу як Книга Excel з підтримкою макросів формат, див. знімок екрана:

doc завжди відкритий на А1 2

3. Відтепер, коли ви відкриєте цю книгу наступного разу, натисніть Увімкнути вміст для активації коду та перемикання між аркушами ви можете бачити, що кожен аркуш автоматично знаходиться в комірці А1.

doc завжди відкритий на А1 3


стрілка синя права міхур Завжди відкривайте книгу на певному аркуші та комірці A1 за допомогою коду VBA

Якщо вам просто потрібно кожного разу відкривати певний аркуш у комірці А1 під час запуску книги, наведений нижче код VBA може вам допомогти.

Наприклад, я завжди хочу перейти до Аркуша1 у комірці А1, коли відкриваю книгу.

1. Утримуйте клавішу ALT + F11 ключі, щоб відкрити Microsoft Visual Basic для додатків вікно. У лівій Проект-VBAProject на панелі, двічі клацніть ThisWorkbook щоб відкрити порожній модуль, а потім скопіюйте та вставте наступний код в модуль, див. знімок екрана:

Код VBA: Завжди відкривайте книгу з певним аркушем у комірці A1:

Private Sub Workbook_Open()
'Updateby Extendoffice
Application.Goto ThisWorkbook.Sheets("Sheet1").Range("A1"), True
End Sub

doc завжди відкритий на А1 4

примітки: У наведеному вище коді, Sheet1 та A1 - це робочий аркуш і посилання на комірку, до яких ви хочете перейти, відкриваючи книгу. Ви можете змінити їх відповідно до своїх потреб.

2. Потім закрийте цей код і натисніть філе > Зберегти як щоб зберегти книгу як Книга Excel з підтримкою макросів формат, відтепер, коли ви наступного разу відкриєте цю книгу, натисніть Увімкнути вміст для активації коду, і він автоматично перейде до Аркуша1 в комірці А1.

Найкращі інструменти продуктивності офісу

🤖 Kutools AI Aide: Революціонізуйте аналіз даних на основі: Інтелектуальне виконання   |  Згенерувати код  |  Створення спеціальних формул  |  Аналізуйте дані та створюйте діаграми  |  Викликати функції Kutools...
Популярні функції: Знайдіть, виділіть або визначте дублікати   |  Видалити порожні рядки   |  Об’єднайте стовпці або клітинки без втрати даних   |   Раунд без Формули ...
Супер пошук: VLookup за кількома критеріями    Багатозначний VLookup  |   VLookup на кількох аркушах   |   Нечіткий пошук ....
Розширений розкривний список: Швидке створення випадаючого списку   |  Залежний спадний список   |  Виберіть розкривний список, що вибирається ....
Менеджер колонок: Додайте конкретну кількість стовпців  |  Перемістити стовпці  |  Перемкнути статус видимості прихованих стовпців  |  Порівняйте діапазони та стовпці ...
Особливості: Фокус сітки   |  Перегляд дизайну   |   Велика панель формул    Диспетчер робочих книг і аркушів   |  Бібліотека ресурсів (автотекст)   |  Вибір дати   |  Об’єднайте робочі аркуші   |  Шифрування/розшифрування клітинок    Надсилайте листи за списком   |  Супер фільтр   |   Спеціальний фільтр (фільтр жирний/курсив/закреслений...) ...
Топ-15 наборів інструментів12 текст Tools (додати текст, Видалити символи, ...)   |   50 + Графік типи (діаграма Ганта, ...)   |   40+ Практичний Формули (Розрахуйте вік на основі дня народження, ...)   |   19 вставка Tools (Вставте QR-код, Вставити зображення зі шляху, ...)   |   12 Перетворення Tools (Числа до слів, Валютна конверсія, ...)   |   7 Злиття та розділення Tools (Розширені комбіновані ряди, Розділені клітини, ...)   |   ... і більше

Покращуйте свої навички Excel за допомогою Kutools для Excel і відчуйте ефективність, як ніколи раніше. Kutools для Excel пропонує понад 300 додаткових функцій для підвищення продуктивності та економії часу.  Натисніть тут, щоб отримати функцію, яка вам найбільше потрібна...

Опис


Вкладка Office Передає інтерфейс із вкладками в Office і значно полегшує вашу роботу

  • Увімкніть редагування та читання на вкладках у Word, Excel, PowerPoint, Publisher, Access, Visio та Project.
  • Відкривайте та створюйте кілька документів на нових вкладках того самого вікна, а не в нових вікнах.
  • Збільшує вашу продуктивність на 50% та зменшує сотні клацань миші для вас щодня!
Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations