Note: The other languages of the website are Google-translated. Back to English
Увійти  \/ 
x
or
x
Реєстрація  \/ 
x

or

Як завжди плавати командну кнопку на аркуші в Excel?

У деяких випадках вам може знадобитися плаваюча кнопка команди (елементи керування ActiveX), щоб продовжувати рухатися з робочим аркушем незалежно від того, як ви прокручуєте аркуш вгору або вниз. Ця стаття покаже вам спосіб її досягнення.

Завжди плаваюча кнопка команди на аркуші з кодом VBA


Завжди плаваюча кнопка команди на аркуші з кодом VBA


Будь ласка, виконайте наступні дії, щоб кнопка команд завжди плавала на аркуші.

1. На аркуші, який містить командну кнопку ActiveX Controls, ви хочете, щоб вона була плаваючою, клацніть правою кнопкою миші вкладку аркуша, а потім клацніть Переглянути код з контекстного меню.

2. У спливаючому Microsoft Visual Basic для додатків вікно, скопіюйте та вставте наведений нижче код VBA у вікно коду.

Код VBA: Зробіть командну кнопку завжди плаваючою на аркуші

Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
        On Error GoTo 0
        With Cells(Windows(1).ScrollRow, Windows(1).ScrollColumn)
            CommandButton1.Top = .Top + 100
            CommandButton1.Left = .Left + 300
        End With
End Sub

примітки: у коді abovde CommandButton1 - це назва кнопки, яку потрібно завжди залишати видимою. Будь ласка, змініть це на свої потреби.

3 Потім натисніть кнопку інший + Q клавіші для виходу з Microsoft Visual Basic для додатків вікна.

Відтепер кнопка Command завжди буде плавати у верхній частині робочого аркуша з переміщенням активної клікнутої комірки, як показано на знімку екрана нижче.

примітки: Цей VBA працює лише для командних кнопок ActiveX Controld.


Статті по темі:


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

Kutools для Excel вирішує більшість ваших проблем і збільшує продуктивність на 80%

  • Повторне використання: Швидко вставте складні формули, діаграми і все, що ви використовували раніше; Шифрувати комірки з паролем; Створити список розсилки та надсилати електронні листи ...
  • Супер формула бар (легко редагувати кілька рядків тексту та формули); Макет читання (легко читати та редагувати велику кількість комірок); Вставте у відфільтрований діапазон...
  • Об’єднати клітинки / рядки / стовпці без втрати даних; Вміст розділених комірок; Об'єднати повторювані рядки / стовпці... Запобігання дублюючим клітинам; Порівняйте діапазони...
  • Виберіть Повторюваний або Унікальний Рядки; Виберіть Пусті рядки (усі клітинки порожні); Супер знахідка та нечітка знахідка у багатьох робочих зошитах; Випадковий вибір ...
  • Точна копія Кілька клітинок без зміни посилання на формулу; Автоматичне створення посилань на кілька аркушів; Вставте кулі, Прапорці та інше ...
  • Витяг тексту, Додати текст, Видалити за позицією, Видаліть пробіл; Створення та друк проміжних підсумків підкачки; Перетворення вмісту комірок та коментарів...
  • Супер фільтр (зберегти та застосувати схеми фільтрів до інших аркушів); Розширене сортування за місяцем / тижнем / днем, частотою та іншим; Спеціальний фільтр жирним, курсивом ...
  • Поєднайте робочі зошити та робочі аркуші; Об’єднати таблиці на основі ключових стовпців; Розділіть дані на кілька аркушів; Пакетне перетворення xls, xlsx та PDF...
  • Понад 300 потужних функцій. Підтримує Office / Excel 2007-2019 та 365. Підтримує всі мови. Простота розгортання на вашому підприємстві чи в організації. Повна функція 30-денної безкоштовної пробної версії. 60-денна гарантія повернення грошей.
вкладка kte 201905

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

  • Увімкніть редагування та читання на вкладках у Word, Excel, PowerPoint, Publisher, Access, Visio та Project.
  • Відкривайте та створюйте кілька документів на нових вкладках того самого вікна, а не в нових вікнах.
  • Збільшує вашу продуктивність на 50% та зменшує сотні клацань миші для вас щодня!
дно офісної таблиці
Say something here...
symbols left.
You are guest
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.
    mgouveia.eng · 1 years ago
    I think it should specify that the button has to be an ActiveX one to the code work. ^.^'
    • To post as a guest, your comment is unpublished.
      crystal · 1 years ago
      Hi,
      Thank you for your reminder.
  • To post as a guest, your comment is unpublished.
    Marco Gouveia · 1 years ago
    I think it should specify that the button has to be an ActiveX one to the code work. ^.^'
  • To post as a guest, your comment is unpublished.
    bla1 · 2 years ago
    Does not work :-(
    • To post as a guest, your comment is unpublished.
      crystal · 2 years ago
      Hi,
      When you scrolling down the worksheet, please click to change the active cell to the visible area to make it work. Thank you for your comment.
  • To post as a guest, your comment is unpublished.
    blackbeer944@gmail.com · 2 years ago
    see it, not working, i'm scrolling down and also command button down, i want to fix on the top of right side of sheet.
    • To post as a guest, your comment is unpublished.
      crystal · 2 years ago
      Hi,
      When you scrolling down the worksheet, please click to change the active cell to the visible area to make it work. Thank you for your comment.
  • To post as a guest, your comment is unpublished.
    blackbeer944@gmail.com · 2 years ago
    not working
  • To post as a guest, your comment is unpublished.
    SWARNABH · 3 years ago
    Thanks a lot ... It worked...
  • To post as a guest, your comment is unpublished.
    Bart Lefevere · 3 years ago
    Works fine for me. Thx
  • To post as a guest, your comment is unpublished.
    Abdulrahman · 3 years ago
    Thanks its good with cellselecting
  • To post as a guest, your comment is unpublished.
    Coop · 4 years ago
    Not good QA - check your name on the button. If this is what gets published for the Web community to see, what goes in behind the scenes with the code? :-)
  • To post as a guest, your comment is unpublished.
    Rohit · 4 years ago
    I was looking for the Command / Option that when i scroll down the Page the selected Text should be float along with it... How can do that ...
    Thank you : Indian Booklet
    • To post as a guest, your comment is unpublished.
      Qasim · 2 years ago
      Make a TextBox and then move it when selecting change


      Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
      TextBox1.Text = ActiveCell.Value
      With Cells(Windows(1).ScrollRow, Windows(1).ScrollColumn)
      TextBox1.Top = .Top + 100
      TextBox1.Left = .Left + 300
      End With
      End Sub