使用按钮传输数据

Question

我正在创建一个Excel工作表来列出具有各种规格的声明。
我有一个包含不同问题的下拉值的工作表，但现在我想制作一个完整的列表，其中输入了所有规格。
我该怎么做？我想从工作表 4 中的字段 B4 - B6 - B8 - B10 - B12 - B14 - B16 - B18 获取信息，并将它们插入工作表 3 的下一个可用行中。
如何用一个简单的按钮完成此操作？首选或可能带有表单已更新的消息。

Answer 1

这就是

我所做的，它:)

Private Sub CommandButton1_Click()
Sheets("Liste").Activate
ActiveSheet.Range("A2").Select
ActiveCell.Offset(a2).Resize(1).EntireRow.Insert
Sheets("Liste").Range("A3").Value = Range("B4").Value
Sheets("Liste").Range("B3").Value = Range("B6").Value
Sheets("Liste").Range("C3").Value = Range("B8").Value
Sheets("Liste").Range("D3").Value = Range("B12").Value
Sheets("Liste").Range("E3").Value = Range("B14").Value
Sheets("Liste").Range("F3").Value = Range("B16").Value
Sheets("Liste").Range("G3").Value = Range("B18").Value
Sheets("Liste").Range("H3").Value = Range("B10").Value
Range("D4").Value = Range("B4").Value

Sheets("Forside").Activate
End Sub