复制所选列的第一个单元格并将其粘贴到其他所选单元格中

Question

我正在尝试这样做，但无法弄清楚。你能帮助我吗？我想复制选择的第一个单元格，并使用vba粘贴到所有其他选定的单元格中。

Answer 1

或者使用您的动态范围Selection这样的东西？

Sub e()
Selection.Value2 = Selection.Cells(1, 1).Value2
End Sub

Answer 2

这样的事情？

Range("A1:A6").Cells(1, 1).Copy
Range("A1:A6").PasteSpecial