Макроси для користувачів Excel 2016, Windows 7

0

Я створив в Excel 2016 форму користувача, яка містить декілька комбінованих полів, кілька текстових полів, дві радіо кнопки та кнопку подання. По-перше, як я можу отримати комбіновані поля для посилання на список, який я вже створив?

windows-7 macros microsoft-excel-2016

— Р. Конклін
джерело

0

Ви можете запустити подію, використовуючи обробник подій form_activate. Клацніть правою кнопкою миші вашу форму користувача у вікні проекту та натисніть "Переглянути код"

Вставте щось подібне у вікно коду:

Private Sub UserForm_Activate()
    ComboBox1.AddItem ("1")
    ComboBox1.AddItem ("2")
    ComboBox1.AddItem ("3")
End Sub

Це буде завантажувати елементи в комбо. Ви також можете змінити його на щось подібне:

Private Sub UserForm_Activate()
    ComboBox1.AddItem (range("'Sheet1'!A1").value)
    ComboBox1.AddItem (range("'Sheet1'!A2").value)
End Sub

якщо ваші елементи комбінованої скриньки десь знаходяться на листі Excel.

Після створення події Activate вам потрібно щось, що відкриє форму в першу чергу (що я впевнений, ви вже розібралися). Тож щось подібне:

Public Sub show_form()
    UserForm1.Show
End Sub

то ви б назвали подію show_form кнопкою або чимось на аркуші Excel.

Повний приклад

Ось повний приклад:

Створіть нову робочу книжку. Покладіть деякі дані в A1 і A2. Зберігайте назву аркуша за замовчуванням "Sheet1"

Натисніть Alt F11, щоб відкрити сторону VBA. натисніть кнопку Вставити> UserForm

З'являється UserForm1. Клацніть правою кнопкою миші та натисніть «Переглянути код». Вставте це:

Private Sub UserForm_Activate()
    ComboBox1.AddItem (Range("'Sheet1'!A1").Value)
    ComboBox1.AddItem (Range("'Sheet1'!A2").Value)
End Sub

Двічі клацніть на ThisWorkBook на дереві. Клацніть Вставити> Модуль. Вставте це:

Public Sub show_form()
    UserForm1.Show
End Sub

Ваше дерево повинно виглядати так:

Тепер у робочому зошиті excel додайте форму, як коробку. Клацніть правою кнопкою миші форму та натисніть Призначити макрос. Виберіть show_form.

Тепер спробуйте запустити. Клацніть форму, яку ви мали. Це повинно показувати форму. При натисканні на спадне меню у ньому повинні бути заповнені два елементи.

— Ерік Ф
джерело

Коментарі не для розширеного обговорення; ця розмова переміщена до чату .

— DavidPostill

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

— Ерік Ф

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