Excel VBA填充組合框的列表顯示#####？

Question

我在工作表的一列中有一個時間列表（顯示1:00 PM），並且正在嘗試將其加載到用戶表單中：

Dim Converter() As String
ReDim Converter(LastRow)
For i = 0 To (LastRow)
    Converter(i) = Cells(i, 1).Text
Next i
JobStartSelect.List = Converter()

當我縮小到excel將更長的時間轉換為#####的程度時，我注意到即使列表框本身具有足夠的空間，我的組合框列表也會顯示#####。 有沒有什么辦法解決這一問題？

最好將其作為時間值完全加載到組合框中，這可能會解決此問題，因為我計划對其進行計算。 就目前而言，我正在使用文本填充組合框，然后分別加載值以進行計算。

Answer 1

嘗試

Converter(i) = Cells(i, 1).Value2

要么

Converter(i) = format(Cells(i, 1),"hh:mm:ss AM/PM")