Значение поля со списком Excel-VBA при загрузке формы

Question

У меня есть форма VBA, которая используется для ввода данных на листе. В настоящее время я кодирую форму так, чтобы она загружала любые данные, уже существующие в листе, обратно в форму.

Для простых текстовых строк он отлично работает.

например.

ReqSetup.ReqText = Application.Worksheets("Req Sheet").Range("F11").Value 

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

Ошибка 1. - Ошибка времени выполнения 380 - Недопустимое значение свойства.

ReqSetup.MinPerKgCB = Application.Worksheets("Req Sheet").Range("C27").Value 

Сбой 2.

Dim MinPerKg As Range 
    Set MinPerKg = Application.Worksheets("Req Sheet").Range("C27") 

    ReqSetup.MinPerKgCB = MinPerKg 

Я, очевидно, делать что-то действительно просто неправильно, но я не могу работать, что это такое !!

С уважением!

Answer 1

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

Тогда вы должны были бы сделать наоборот вашу попытку коды, то есть:

Worksheets("Req Sheet").Range("C27").Value = ReqSetup.MinPerKgCB.Value 

что вы бы лучше обернуть в проверке, что любое значение выпадающего фактически выбранное:

With ReqSetup.MinPerKgCB 
    If .ListIndex <> -1 Then Worksheets("Req Sheet").Range("C27").Value = .Value 
End With