在列中连接后续单元格 - excel vba

Question

有人可以帮助我解决使用VBA的下列问题吗？

我想连接单元格A7，A8，B8，A9并将其粘贴到A7。类似地连接A10，A11，A12，C12，A13，A14并粘贴到A10。连接A15，A16并粘贴到A15。保持A6相同并且A17与原始值相同。

任何帮助表示赞赏。谢谢。 worksheet sample

Answer 1

如何：

Sub ytrewq() 
    [A7] = [A7] & [A8] & [B8] & [A9] 
    [A10] = [A10] & [A11] & [A12] & [C12] * [A13] & [A14] 
    [A15] = [A15] & [A16] 
End Sub