Excel VBA填充组合框与列表显示#####？

Question

我在工作表的一列中有一个时间列表（显示下午1:00），我试图将其加载到用户表单中：

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")