从一个选项卡复制并根据单元格的匹配粘贴到另一个选项卡中的宏

Question

我正在尝试扩展工作表并需要帮助。

目前，我已设置以下宏，以便从一个工作表范围复制并粘贴到另一工作表：

Private Sub CommandButton1_Click()
Dim Rng1 As Range
Dim Rng2 As Range

Set Rng1 = Range("D12:G253")
Set Rng2 = Range("D12:G253")
Rng2.Value = Rng1.Value


Dim xlws1 As Worksheet
Dim xlws2 As Worksheet

Set xlws1 = Worksheets("Data")
Set Rng1 = xlws1.Range("d12:g253")

Set xlws2 = Worksheets("Final")
Set Rng2 = xlws2.Range("D12:g253")
Rng2.Value = Rng1.Value

但是，现在我希望粘贴的数据是动态的，并且不总是位于“ D12：G253”中，而是找到与第七行或第八行中的值相对应的四列。我在前三列中设置了说明，将保留这些内容，不需要复制它们，并且在前11行中具有标头，也无需更改。

我尝试关注这些帖子Post 1 Post 2，但由于我缺乏编码知识，因此无法完全关注。

请帮助我，以便我进行扩展。

Link to Google Docs example