Как добавить ComboBox в Word, который позволяет свободно печатать и выбирать из нескольких вариантов?

342
Alexa

Я работаю над документом, в который мне нужно включить ActiveX ComboBox, который позволил бы пользователю выбирать несколько элементов из списка или добавлять свободный текст.

То, с чем я в настоящее время испытываю трудности, включает в себя несколько предметов. Когда я выбираю второй элемент, первый удаляется.

Во-вторых, с помощью следующего кода элементы появляются в списке примерно по 10 раз каждый. 

Private Sub Document_Open() With Me.ComboBox1 .AddItem "atrial fibrillation" .AddItem "carotid artery stenosis" .AddItem "cataracts" .AddItem "chronic kidney disease" .AddItem "chronic kidney disease, stage 3" .AddItem "COPD" .AddItem "coronary disease" .AddItem "diverticulosis" .AddItem "GERD" .AddItem "gout" .AddItem "hypertension" .AddItem "iron deficiency anemia" .AddItem "osteoarthritis" .AddItem "peripheral vascular disease" .AddItem "vitamin D deficiency" .ListIndex = 0 End With End Sub

Любая помощь?

0
Просто добавьте `.Clear` в ваш код перед первой строкой` .AddItem`. PeterT 6 лет назад 0

0 ответов на вопрос

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