使用一个数据输入表格填充多个数据表

我有一段时间没有使用宏，而且我正在陷入一些简单的事情。使用一个数据输入表格填充多个数据表

我想使用一个数据输入表单填充多个数据表。例如，我有4家商店。我需要输入每日库存，销售额，存款等。每个商店在单独的工作表中都有自己的表格。我希望数据输入员能够选择商店＃和日期，然后输入库存，销售和每日存款，然后提交。一旦数据被提交，我希望它填写日期组织的适当的工作表上的适当的表。数据提交后，我希望数据输入框重置为空白，以便可以进行下一个输入。

任何在正确的方向转向将是最有帮助的

谢谢！

来源

2011-05-27 Fisher

下一次，请选择比“Excel宏问题”更具描述性的问题标题。我已经为你改变了它。 – 2011-05-27 14:40:41

转到VBAProject，右键单击 - >插入 - >用户窗体。创建一个用户表单 - 例如： enter image description here

您可以预先填充存储和库存组合框以使生活更轻松。要开始从您可以使用按钮放置在工作表上并连接其Click事件。您将最终得到类似于：

Public frmEntry As UserForm1 

Private Sub cmdAdd_Click() 

    If frmEntry Is Nothing Then 

     Set frmEntry = New UserForm1 

     Call PopulateStores() 
     Call PopulateInventory() 

    End If 

    frmEntry .Show Modal 

End Sub

在提交端 - 您需要处理提交按钮上的Click事件。

来源

2011-05-27 12:48:54 Juliusz

此链接将帮助您从您的数据输入：http://www.contextures.com/xluserform01.html

当用户完成在控件在窗体上输入数据（他点击例如“完成”按钮后），简单的写数据（如文本框）放到适当的工作表和单元格中。例如，将此代码添加到您的用户：

Private Sub btnFinish_Click() 
    Worksheets("Store1").Cells(2,3).Value2 = Me.TextBox1.Text 
End Sub

来源

2011-05-27 12:52:15 bouvierr

使用一个数据输入表格填充多个数据表

回答

相关问题