大输入框文本：如何显示超过6个工作簿的列表？

Question

已解决：问题是输入框的255个字符的最大字符数限制。

我使用此VBA文本选择其中一个打开的工作簿（并在之后将该数据复制到另一个工作簿）。当有超过6个工作簿打开时，此列表功能不起作用。 It works fine as long as there are less then 7 workbooks open:为什么？

For Each aWb In Application.Workbooks
    aCounter = aCounter + 1
    aListOfWbs = aListOfWbs & aCounter & " - " & aWb.Name & vbCrLf
    If aWb.Name = ActiveWorkbook.Name Then aSelect_default = aCounter
Next

aSelect_OG = Application.InputBox("Take data from workbook nr:" & _
            vbCrLf & _
            aListOfWbs & _
            vbCrLf, "2 tools, 1 record", 1) ', , "", Type:=2)