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

Як вставити плаваючу таблицю або текстове поле в аркуш Excel?

Якщо у вас є таблиця або текстове поле з деякими важливими даними, які ви хочете завжди бути видимими на екрані аркуша, навіть коли ви прокручуєте аркуш вгору або вниз. Це може бути цікавим завданням, у цій статті я запропоную швидкий трюк для його вирішення.

Вставте плаваючу таблицю в Excel із кодом VBA

Вставте плаваюче текстове поле в Excel із кодом VBA


стрілка синя права міхур Вставте плаваючу таблицю в Excel із кодом VBA

Ви не можете прямо вставити плаваючу таблицю, тому вам потрібно перетворити дані таблиці в зображення, а потім застосувати код, щоб закінчити його, будь-ласка, зробіть так:

1. Виберіть таблицю даних, яку потрібно залишити видимою, а потім натисніть Скопіювати > Копіювати як зображення під Головна вкладку, див. знімок екрана:

doc вставка плаваючий стіл 1

2. В вискочив Копіювати малюнок діалогове вікно, виберіть Як показано на екрані від Зовнішній вигляд розділ, і виберіть Картинка під сформований розділ, клацніть OK щоб закрити діалогове вікно, а потім клацніть клітинку, щоб вивести зображення, нарешті натисніть Ctrl + V щоб вставити це зображення, див. знімок екрана:

doc вставка плаваючий стіл 2

3. Після перетворення таблиці на зображення, клацніть правою кнопкою миші вкладку аркуша, яка містить зображення таблиці, яке потрібно залишити видимим, і Переглянути код з контекстного меню та у відкритому вікні Microsoft Visual Basic для програм вікно, скопіюйте та вставте наступний код у порожній модуль:

Код VBA: Вставте плаваючу таблицю в Excel:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'Updateby Extendoffice
    Application.ScreenUpdating = False
    If Target.Cells.Count > 1 Then Exit Sub
        With ActiveSheet.Shapes("Picture1")
            .Top = ActiveWindow.VisibleRange.Top + 5
            .Left = ActiveWindow.VisibleRange.Left + ActiveWindow.VisibleRange.Width - .Width - 45
        End With
    Application.ScreenUpdating = False
End Sub

примітки: У цьому коді Малюнок 1 це назва зображення, яку ви створили, будь ласка, змініть її відповідно до своїх потреб.

doc вставка плаваючий стіл 3

4. Потім збережіть і закрийте вікно коду, тепер, коли ви прокручуєте аркуш і клацаєте клітинку, зображення таблиці завжди зберігається у верхньому правому куті аркуша.


стрілка синя права міхур Вставте плаваюче текстове поле в Excel із кодом VBA

Щоб вставити плаваюче текстове поле, ось також код VBA для вирішення цього завдання.

1. Спочатку слід вставити текстове поле з Розробник вкладка, клацніть Розробник > Insert > Текстове поле (елемент керування ActiveX), а потім намалюйте текстове поле та введіть інформацію в текстове поле, як вам потрібно. Дивіться знімок екрана:

doc вставка плаваючий стіл 4

2. Потім клацніть правою кнопкою миші вкладку аркуша, яка містить текстове поле, яке потрібно залишити видимим, і виберіть Переглянути код з контекстного меню та у відкритому вікні Microsoft Visual Basic для додатків вікно, скопіюйте та вставте наступний код у порожнє Модулі:

Код VBA: Вставка плаваючого текстового поля в Excel:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'Updateby Extendoffice
    Application.ScreenUpdating = False
    With ActiveWindow.VisibleRange
        TextBox1.Top = .Top + 5
        TextBox1.Left = .Left + .Width - TextBox1.Width - 45
    End With
    Application.ScreenUpdating = True
End Sub

примітки: У цьому коді TextBox1 це назва текстового поля, яке ви вставили, будь ласка, змініть його відповідно до своїх потреб.

doc вставка плаваючий стіл 5

3. Потім збережіть і закрийте вікно коду, тепер, коли ви прокручуєте аркуш у будь-яке місце, вставлене текстове поле завжди зберігається у верхньому правому куті аркуша.


Збільшити або згорнути вікно робочого аркуша

Щоб максимізувати вікно робочого аркуша, щоб звільнити більше місця для користувачів, у Excel можна максимізувати вікно робочого аркуша, приховавши стрічку, рядок формул або рядок стану. Kutools для Excel's Робоча зона може допомогти вам сховати стрічку лише одним клацанням миші. Завантажте та безкоштовно пробуйте Kutools для Excel зараз!

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

🤖 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 (8)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Hola, buenos días.

Mi pregunta es cómo mantener siempre visible la imagen flotante aun cuando me desplace en distintas filas o columnas de la hoja.

Saludos y gracias por compartir tus conocimientos.
This comment was minimized by the moderator on the site
The names are the same but for some reason I am still coming across runtime error 424 object required?
This comment was minimized by the moderator on the site
Hi,
Somewhere between steps 2 and 3 on "Insert Floating Table In Excel With VBA Code" I missed how to name the picture I just copy and pasted.

Tom
This comment was minimized by the moderator on the site
Top left corner next to the box you input the formula
This comment was minimized by the moderator on the site
Same has happened to me too, how do you know the name of the picture file?
This comment was minimized by the moderator on the site
Hello, Peter,
To know the name of the picture, you just need to select the picture, and then view the name from the Name Box in the top left corner.
This comment was minimized by the moderator on the site
If I re-size the window, the picture floats too far into the middle. How do I make the picture float to the same margin from the screen no matter what size window I have?
This comment was minimized by the moderator on the site
Thank you-this solved my problem very easily!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations