Как заполнить поле со списком в пользовательской форме Word из CSV-файла
2/7/2019

Привет

У меня есть шаблон с поддержкой макросов Word (установлен Office 365) с пользовательской формой, содержащей несколько различных типов полей. Одно из полей представляет собой поле со списком для выбора автора, при нажатии кнопки "ОК" документ заполняется именем автора и другими данными, такими как адрес электронной почты, номер телефона и т.д. Источником поля со списком для извлечения имени автора, адреса электронной почты, номера телефона и т.д. Является таблица в другом документе Word, которая может храниться отдельно от шаблона.

То, что команда хочет знать, - это иметь источник для списка со списком и других деталей, заполняемых из csv-файла. Я потратил время на изучение этого вопроса, но не могу найти решение.

Любая помощь будет очень признательна. Заранее благодарю.

Ответы (5)

Guadalupe Swift III
2/7/2019

See the following pages of Greg Maxey's website : http://gregmaxey.mvps.org/Create_and_employ_a_UserForm.htm [http://gregmaxey.mvps.org/Create_and_employ_a_UserForm.htm] http://gregmaxey.mvps.org/Populate_UserForm_ListBox.htm [http://gregmaxey.mvps.org/Populate_UserForm_ListBox.htm] http://gregmaxey.mvps.org/Customize_Ribbon.htm [http://gregmaxey.mvps.org/Customize_Ribbon.htm] See the "Cascading Listboxes" section the following page of Greg Maxey's website: http://gregmaxey.mvps.org/word_tip_pages/populate_userForm_listbox_or_combobox.html [http://gregmaxey.mvps.org/word_tip_pages/populate_userForm_listbox_or_combobox.html]

Помогло 0 людям
Mr. Rhonda Langworth
2/7/2019

Вы можете использовать что-то вроде этого Dim fn Как строку, ff Как целое число, txt Как строку fn ="C:\keywords.txt " '< --- .путь к файлу txt txt = Пробел(fileLen(fn)) ff = Свободный файл Открыть fn Для двоичного файла Как #ff Получить #ff, , txt Закрыть #ff Затемнить myArray() В виде строки" Используйте функцию разделения для возврата одномерного массива с нулевым значением. myArray = Разделить(txt, vbCrLf)'Использовать.Метод списка для заполнения поля списка. listBox1.Список = Мой массив lbl_Exit: Выйти из вложенной

Помогло 0 людям
Kathryn Hickle
2/12/2019

Приношу извинения за задержку с ответом, я был в ежегодном отпуске. Я просмотрел предложения, однако не смог найти образец для csv-файлов. На следующей странице я вижу использование форматов файлов Word, Access и Excel (.xls, .xlsx и .xlsm) https://gregmaxey.com/word_tip_pages/populate_userForm_listbox_or_combobox.html Смогу посмотреть еще раз на следующей неделе. Большое спасибо.

Помогло 0 людям
Kathryn Hickle
2/12/2019

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

Помогло 0 людям
Kathryn Hickle
2/12/2019

Привет, Диана, мне удалось выкроить немного времени и протестировать ваш код. Удалось заполнить поле со списком - спасибо. Когда я нажимаю стрелку раскрывающегося списка, в одной строке отображается информация о каждом человеке. например, "Фред", "Фамилия Фреда","123 444 444","*** Адрес электронной почты удален в целях конфиденциальности ***" "Джейн", "Фамилия Джейн","123 444 445","*** Адрес электронной почты удален для конфиденциальности *** "Как мне использовать данные в массиве, чтобы кавычки не отображались, а последующая информация присваивалась разным столбцам в выпадающем списке? например, отображается: столбец Fred(0): столбец Fred(1): Столбец Fred Фамилия (2): (123) 444444 столбец(3): *** Адрес электронной почты удален для конфиденциальности *** Затем я могу взять значения в каждом столбце и соответствующим образом обновить документ. Большое спасибо

Помогло 0 людям

Похожие вопросы

611

Просмотров

3

Ответов

610

Просмотров

5

Ответов

610

Просмотров

2

Ответов