VBA Index MAtch Ошибка 1004 - PullRequest
0 голосов
/ 10 мая 2018

Можете ли вы помочь мне понять и решить, что не так со следующим кодом? Иногда это работает, но после одного или двух тестов я получаю сообщение об ошибке 1004 «Невозможно получить свойство Match класса WorksheetFunction».

Это vba в форме для поиска значения текстового поля1 (которое является сокращенным ISO-кодом соответствующего значения в поле со списком1) на основе значения, указанного в поле со списком1.

Private Sub ComboBox1_Change()

Me.TextBox1.Text = Application.WorksheetFunction.index(Sheets("Components").Range("D2:D45"), Application.WorksheetFunction.Match(Me.ComboBox1.Value, Sheets("Components").Range("C2:C45"), 0), 1)

End Sub

Моя форма имеет 2 поля со списком и 1 текстовое поле. Combobox3 имеет значение категории, второе, Combobox1, имеет зависимое значение, основанное на Combobox3 и listbox1 just vlookup для соответствующего сокращенного кода для значения в Combobox1 из компонентов Sheets.

Пример: ComboBox3: Банк / ComboBox1: NatWest / ListBox1: NW

Большое спасибо за любые ваши советы, предложения или помощь, и ваш вклад очень ценится.

...