Vba 如何使用for循环使用Visual Basic填充组合框中的项

我需要一个for循环来使用visualbasic填充组合框中的连续值18-100。谢谢

你在说什么组合框？ 也许这对你有帮助

Const SEP As String = ","
Dim iIndex As Integer
Dim sList As String

sList = 18
For iIndex = 19 To 100
    sList = sList & SEP & iIndex
Next

Call Excel.ActiveCell.Validation.Add( _
    Type:=Excel.XlDVType.xlValidateList, _
    Formula1:=sList)

嗯，“variable”不是有效的内置VBA类型，

Variant

s不作为集合出现，除非您将其设置为。这不会编译。

dim n as integer
dim new as variable

for n=18 to 100
  new.additem n
next n