自动数据输入到另一张纸

时间:2017-04-14 08:55:03

标签: excel excel-vba vba

我需要为命令按钮编写代码"添加条目"这会将单元格中输入的数据添加到另一个工作表中的表格。|

该表格与图片中提到的标题相同。 enter image description here

我已经创建了添加数据条目的代码。谢谢!

1 个答案:

答案 0 :(得分:1)

 name = Range("D8").Value
  des = Range("D10").Value
  veh = Range("D12").Value
  start = Range("D14").Value
  finish = Range("D16").Value

  Sheets("Master Sheet").Select

  LR = Range("A" & Rows.Count).End(xlUp).Row

  Range("A" & LR).Offset(1, 0).Select

  i = ActiveCell.Row
  Cells(i, 1).Formula = start
  Cells(i, 2).Formula = finish
  Cells(i, 3).Formula = name
  Cells(i, 4).Formula = des
  Cells(i, 5).Formula = veh

每次都会在新行中添加条目。我假设您的工作表名称为主工作表,数据在哪里。您也可以根据自己的喜好命名标题。