使用VBA创建Excel表格并保存

我正在尝试使用VBA创建一个包含文本和组合框的excel表单，其中我在表单中输入的数据应保存在不同的工作表中。表单上应该有一个保存按钮，供用户单击，以便保存数据。那有可能吗。请帮助

这当然是可能的，您能更具体地说明您遇到问题的部位吗

事件的一般时间表如下：

创建用户表单并添加文本框、组合框和保存按钮。 A.要了解如何填充组合框，请查看以下资源：

在属性中为每个文本框、组合框和保存按钮指定一个名称，以便它们可以在代码中引用

向保存按钮事件添加代码。要执行此操作，请转到您的UserForm并双击Save按钮，这将使您看到单击该按钮时将执行的代码，您将添加如下内容：

Sheets（“示例”）.Range（“A1”）.Value=textbox.Value

---

要回答您的评论：

向组合框中添加数组时应该不会遇到任何问题，如下所示：

Private Sub UserForm_Initialize()
    ComboBox1.List = Array("One", "Two", "Three")
    ComboBox2.List = Array("Four", "Five", "Six")
    ComboBox3.List = Array("Seven", "Eight", "Nine")
End Sub

---

如果您遇到问题，请确保您的代码（在本例中为“ComboBox 1…等”）是指存在的ComboBox。

这是什么投票？谢谢：）以某种方式创建了一个表单：）但是我正在尝试通过数组列出combox值。在我的代码中，如果我给出多个数组，就会抛出一个错误。下面是我的代码。如果我取消对第三个数组的注释，它会说权限被拒绝。只接受前两个条目。我有10个组合框。Private Sub UserForm_Initialize（）scenariotype.List=Array（“Happyscenario”、“Alternative”、“Exception”）由.List=Array（“Savio”、“Suthasan”、“Shaji”）准备。Testtypeselection.List=Array（“Provisioning”、“Functional”、“Billing”、“Reports”）“TestingPhase1.List=Array（“UAT”、“Production”）”Status.List=Array（“Pass”“，”失败“，”正在进行“，”已阻止“，”NoRun“，”NotExecutable“）”scenariotype.AddItem“快乐场景“，”scenariotype.AddItem“替代方案“，”scenariotype.AddItem“异常”结束副标题，两件事：-在此处发布代码时使用代码块，当我在你之前的评论中复制并粘贴代码时，所有代码都在一行上，无法阅读。人们很乐意提供帮助，我也很乐意在这种情况下提供帮助，但如果代码易于阅读，那么就更容易了。-如果有人，在这个例子中是我，给出了一个回答，回答了你原来的问题，你应该接受这个答案，这样其他人就会看到问题已经得到了回答，这样我的声誉得分就会得到帮助。将确保将来添加相应的代码。非常感谢你的帮助。