从VAB数据输入表单填充工作表中的数据

Question

凭借VBA中几乎0的知识，我创建了一个数据表格，用于输入每日凭证：

1. MS Date and Time Picker
2. TextBox1代表Amount（仅对数值进行了验证 - 工作正常）
{li> OptionButton1 Cash {li> OptionButton2 Cheque
3. TextBox2获取人Paid To的名称（也许我可以将其更改为ComboBox？）
4. TextBox3代表Paid For（可以输入任何值）
{li> ComboBox1 Sub Category（列表在工作表2（列表）中 - 工作正常）
5. TextBox4代表Remarks（可以输入任何值）
6. CommandButton1将数据添加到Worksheet3（数据库）
7. CommandButton2显示“数据库”工作表
8. CommandButton3关闭表单（正常工作）

{1}}也在Sheet1（表格）中打开表格（工作正常）。

我想将数据输入表单并将此数据填充到Worksheet3（数据库）中 （B3）中的CommandButton，Date（C4），Paid To（D4），Paid For（E4），Sub Category（G4），{{1} （H4）。

（F4）对Remarks免费。

我还希望在表单中有一个数据编辑选项，该选项可能带有带调用选项的自动生成凭证编号。

任何人都可以帮我使用相应的代码来执行此操作吗？

注意：我正在使用Office 2007创建，但也希望在XP Professional中使用它

Answer 1

在问题的第一部分，这取决于您是想在单击按钮时填充工作表3还是在数据输入表单时动态填充工作表3。我假设前者，因为大多数表格都有OK按钮。如果是这种情况，那么你可以根据按钮点击编写一个子程序，举个简单的例子：

Private Sub Enter_Details_OK_Click()
  Sheets("worksheet3").Range("B3").Value = Calendar1.Value 
'Change Calendar1 to the value of your date/time object and change "worksheet3" to the actual name of your worksheet.
  Sheets("worksheet3").Range("C4").Value = TextBox2.Value
'...and so on...

您基本上是将每个文本框中的值传输到各个单元格中。我不确定你在问题的第二部分是什么意思，需要进一步澄清。

希望这是有道理的！