我在用户表单中为我的组合框写VBA时遇到问题 . 我的组合框要做的是......

  • 我想从另一个已关闭的工作簿中选择我的项目列表 . (另一个工作簿地址= "E:\AtirsPsyche\BMark\Data")(列表范围=“C8:C)(工作表名称=客户)

  • 我想在我的ComboBox中自动完成 .

  • 我希望ComboBox在aplhabatical顺序列表中显示项目名称,因为我在ComboBox中编写项目的起始单词 .

  • ComboBox应该在其他已关闭的工作簿列表中显示添加的项目 . 因为该列表是可添加的 .

  • 我不希望ComboBox显示空列表 . (例如,如果我的列表中有3个项目,列表范围是100行,则列表中的3个项目之后不应显示空列表)这里我的VBA是

Private Sub CommandButton1_Click()Dim sh As Worksheet Set sh = ThisWorkbook.Sheets(“Invoice”)sh.Range(“J14”) . Value = Me.ComboBox1.Value End Sub

Private Sub Userform_Initialize()使用GetObject(“E:\ AtirsPsyche \ BMark \ Data.xlsm”)ComboBox1.List = .Sheets(“Sheet2”) . Range(“C8:C65536”) . Value .Close 0 End With End Sub

我得到了未知的错误和错误 . 请将此用户表单的VBA发送给我 . 我的用户表单中也有命令按钮,它将在同一张表的某列中显示我选择的项目 . 因此,如果你也发送给我VBA,那么这将是更加appriciated . (我的组合框选择值应该出现的单元格名称=“(E $ 7 $:G $ 7 $”))非常感谢提前 . S. Atir .