Совет. Другие языки - Google-Translated. Вы можете посетить English версия этой ссылки.
Войти
x
or
x
x
Регистрация
x

or

Как вставить плавающий стол или текстовое поле в рабочий лист Excel?

Если у вас есть таблица или текстовое поле с некоторыми важными данными, которые вы хотите всегда видеть на экране рабочего листа, даже если вы просматриваете лист вверх или вниз. Это может быть интересной задачей, эта статья, я представлю вам быстрый трюк, чтобы решить эту проблему.

Вставка плавающей таблицы в Excel с кодом VBA

Вставка плавающего текстового поля в Excel с кодом VBA


Максимальное или минимальное окно рабочего листа:

Чтобы максимизировать окно рабочего листа, вы можете освободить больше места для пользователей, в Excel, вы можете максимизировать окно рабочего листа, скрывая ленту, панель формул или строку состояния. Kutools for Excel's Рабочая зона может помочь вам скрыть ленту всего одним щелчком мыши. Скачайте бесплатную пробную версию Kutools для Excel прямо сейчас!

doc insert floating table 6


arrow синий правый пузырь Вставка плавающей таблицы в Excel с кодом VBA


Нет прямого способа вставить плавающую таблицу, поэтому вам нужно преобразовать данные таблицы в изображение, а затем применить код для ее завершения, пожалуйста, сделайте следующее:

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

doc insert floating table 1

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

doc insert floating table 2

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

Код VBA: Вставить плавающий стол в excel:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'Updateby Extendoffice 20161116
    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

Внимание: В этом коде Picure1 это имя изображения, которое вы создали, пожалуйста, измените его на свои нужды.

doc insert floating table 3

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


arrow синий правый пузырь Вставка плавающего текстового поля в Excel с кодом VBA

Чтобы вставить плавающее текстовое поле, здесь также используется код VBA для решения этой задачи.

1, Во-первых, вы должны вставить текстовое поле из разработчик вкладку нажмите разработчик > Вставить > Текстовое поле (элемент управления ActiveX), а затем нарисуйте текстовое поле и введите информацию в текстовое поле по мере необходимости. Смотрите скриншот:

doc insert floating table 4

2, Затем щелкните правой кнопкой мыши вкладку листа, содержащую текстовое поле, которое вы хотите постоянно видеть, и выберите Просмотреть код из контекстного меню и в открывшемся Microsoft Visual Basic для приложений окно, скопируйте и вставьте следующий код в пробел модуль:

Код VBA: Вставьте плавающее текстовое поле в Excel:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'Updateby Extendoffice 20161116
    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 insert floating table 5

3, Затем сохраните и закройте окно кода, теперь, когда вы просматриваете рабочий лист в любом месте, вставленное текстовое поле всегда хранится в верхнем правом углу рабочего листа.


  • Супер Формула Бар (легко редактировать несколько строк текста и формул); Макет чтения (легко читать и редактировать большое количество ячеек); Вставить в отфильтрованный диапазон...
  • Объединить ячейки / строки / столбцы и хранение данных; Содержание сплит-клеток; Объедините дублирующиеся строки и сумму / среднее... предотвратить повторяющиеся клетки; Сравнить диапазоны...
  • Выберите Дубликат или Уникальный Ряды; Выберите пустые строки (все ячейки пусты); Супер найти и нечеткая находка во многих рабочих тетрадях; Случайный выбор ...
  • Точная копия Несколько ячеек без изменения формулы ссылки; Автоматическое создание ссылок на несколько листов; Вставить пули, Флажки и многое другое ...
  • Любимые и быстро вставляемые формулы, Диапазоны, графики и рисунки; Шифрование ячеек с паролем; Создать список рассылки и отправлять электронные письма ...
  • Извлечение текстаДобавить текст, Удалить по позиции, Удалить пространство; Создание и печать промежуточных итогов подкачки; Преобразование содержимого ячеек и комментариев...
  • Суперфильтр (сохранить и применить схемы фильтров к другим листам); Расширенный поиск по месяцам / неделям / дням, частоте и более; Специальный фильтр жирным шрифтом, курсивом ...
  • Объединить рабочие тетради и рабочие листы; Объединение таблиц на основе ключевых столбцов; Разделить данные на несколько листов; Пакетное преобразование xls, xlsx и PDF...
  • Работает с Office 2007-2019 и 365 и поддерживает все языки. Это легко развернуть в вашей компании. Полнофункциональная 60-дневная бесплатная пробная версия.
вкладка kte 201905
  • Включить редактирование и чтение с вкладками в Word, Excel, PowerPoint, Издатель, Доступ, Visio и Проект.
  • Открывайте и создавайте несколько документов в новых вкладках одного и того же окна, а не в новых окнах.
  • Увеличивает вашу производительность на 50% и уменьшает сотни щелчков мышью для вас каждый день!
нижняя часть офиса
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Thomas Maier · 21 days ago
    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
  • To post as a guest, your comment is unpublished.
    Guest · 5 months ago
    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?
  • To post as a guest, your comment is unpublished.
    Rachelle Reamer · 1 years ago
    Thank you-this solved my problem very easily!