VBA для автозаполнения ComboBox из другой закрытой книги - PullRequest
0 голосов
/ 25 июня 2018

У меня проблема с написанием VBA для моего комбинированного списка в пользовательской форме. То, что я хочу сделать со своим списком, это ..

  1. Я хочу выбрать список своих предметов из другой закрытой рабочей книги. (Другая адрес рабочей книги = "E: \ AtirsPsyche \ BMark \ Data") (список Range = «C8: C) (Имя листа = Заказчик)
  2. Я хочу автозаполнение в моем Поле со списком.
  3. Я хочу, чтобы ComboBox отображал названия предметов в аплах список заказов, как я пишу начальное слово моего элемента в ComboBox.
  4. ComboBox должен показывать добавленные элементы в списке этой другой закрытой книги. Потому что этот список можно добавить.
  5. Я не хочу, чтобы ComboBox показывал пустой список. (т. е. если у меня есть 3 пункта в моем списке, и диапазон списка составляет 100 строки, это не должно показывать пустой список после 3 пунктов в моем списке) Здесь мой VBA

    Private Sub CommandButton1_Click () Dim Sh As Worksheet Установите sh = ThisWorkbook.Sheets ("Счет-фактура") sh.Range ("J14"). Значение = Me.ComboBox1.Value Конец Sub

    Private Sub Userform_Initialize () С GetObject ("E: \ AtirsPsyche \ BMark \ Data.xlsm") ComboBox1.List = .Sheets ("Sheet2"). Диапазон ("C8: C65536"). Значение . Закрыть 0 Конец с End Sub

Я получаю неизвестные ошибки и ошибки. Пожалуйста, пришлите мне VBA для этой пользовательской формы. У меня также есть командная кнопка в моей форме пользователя, которая собирается показать мой выбранный элемент в определенном столбце того же листа. Так что, если вы отправите мне VBA для этого, то это будет более ценно. (имя ячейки, в которой должно отображаться выбранное мной значение в поле со списком = "(E $ 7 $: G $ 7 $")) Заранее большое спасибо. С. Атир.

...