填充在VBA在工作表从VAB数据输入表单

Question

数据和几乎为0的知识，我已经创建了一个数据表，进入每日优惠券有：

1. MS Date and Time Picker
2. TextBox1为Amount（只验证了数值 - 做工精细）
3. OptionButton1为Cash
4. OptionButton2为Cheque
5. TextBox2的人（也许我可以把它变成一个ComboBox？）
6. TextBox3为Paid For（可以输入任意值）
7. ComboBox1名称为Sub Category（名单是在Worksheet2（名单） - 工作正常）
8. TextBox4为Remarks（可以输入任意值）
9. CommandButton1，将数据添加到Worksheet3（数据库）
10. CommandButton2以显示 '数据库' 工作表
11. CommandButton3关闭窗体（做工精细）

一个CommandButton也是在Sheet1（表格），以打开的形式（工作正常）。

我希望将数据输入到表单并填充该数据来Worksheet3（数据库）作为 Date在（B3），（C4），Paid For（D4），Sub Category（E4），Remarks（G4）， Amount（H4）。 （F4）VLOOKUP免费。

我也想在表格中有一个数据编辑选项，可能带有自动生成凭证编号和召回选项。

任何人可以帮我用适当的代码来做到这一点吗？

注意：我使用Office 2007创建，但也想用它在XP专业

Answer 1

关于你问题的第一部分，这取决于你是否想填充一个按钮的点击worksheet3或随着数据输入到表单中而动态变化。我假设前者是因为大多数表格都有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... 

你基本上是在值从每个文本框转移到各种细胞。我不确定你的问题的第二部分是什么意思，需要进一步澄清。

希望这是有道理的！