Excel VBA自动填充和源是单元格的范围

我为我的数据定义了一个名称，所以当我将一个新的数据放到我的单元格中时，它也会包含在我的自动填充代码中

单元格的名称是ident 

=OFFSET(DataSource!$A:$A,1,0,COUNTA(DataSource!$A:$A)-1,1)

这是我的combobox自动填充代码 

 Private Sub UserForm_Initialize() UserForm1.Label1 = Date For Each blah In [ident] UserForm1.ComboBox4.AddItem blah Next blah End Sub

我得到一个错误，variables不定义和突出显示“等”

Chris Neilsen可能是对的。 你很可能在用户表单模块的顶部有Option Explicit ，这个模块需要被剥掉。 

 Private Sub UserForm_Initialize() Dim blah As Variant UserForm1.Label1 = Date For Each blah In [ident] UserForm1.ComboBox4.AddItem blah Next blah End Sub

以下是另外两种可以定义范围的方法：

For Each blah In [OFFSET(DataSource!$A:$A,1,0,COUNTA(DataSource!$A:$A)-1,1)]

For Each blah In Range("OFFSET(DataSource!$A:$A,1,0,COUNTA(DataSource!$A:$A)-1,1)")

Interesting Posts