Excel 宏使用活动单元格并将多个单元格复制到不同单元格中的另一张图纸

我正在尝试使用宏将信息从一张图纸复制到另一张图纸。我希望能够选择工作表a（如A10）中的一个单元格，并将其作为参考复制同一行中的单元格，如c10、d10和g10，然后将该信息粘贴到工作表B中的静态单元格中，如$a$6、a$7和$a$8。 浏览了留言板，但没有发现任何使用活动单元格和多个单元格的内容。 提前谢谢！

---

Adrian

可以使用以下示例这样的简单语句来完成任务：

Worksheets("Sheet A").Range("A10").Copy destination:=Worksheets("Sheet B").Range("$A$6:$A$8")

如果希望能够在工作表（“工作表a”）中选择一个单元格并将其复制到目标范围（如上所示），则可以创建一个子单元，如下所示：

Sub PasteSelection()
    Selection.Copy Destination:=Worksheets("Sheet B").Range("$A$6:$A$8")
End Sub

并使用ALT+F8快捷方式来调用它，例如，运行Excel VBA宏

---

希望这能有所帮助。

谢谢您的快速回复！我希望自动选择单元格（基于活动单元格），并防止每次复制特定单元格时进入范围。每次我将复制行中的相同单元格（列），并且对于每个新记录，该行将随工作表a更改，并且它将始终填充工作表B中的相同单元格，我将使用该工作表创建pdf发票，我建议你澄清你的问题并添加VBA代码：你可以使用宏记录器，然后我们就可以提供帮助。感谢和问候，Application.CutCopyMode=错误选择。复制工作表（“发票”）。选择范围（“A6”）。选择活动工作表。粘贴工作表（“表单响应1”）。选择范围（“D10”）。选择Application.CutCopyMode=错误选择。复制工作表（“发票”）。选择范围（“B6”）。选择活动页。粘贴结束子答案已提供给您，与原始问题中的单元格范围相关。您可以将其应用于任何其他单元格范围。为了澄清问题，我有一张包含客户数据的表格。我想选择一行（对应于一个客户），然后运行一个宏，该宏采用值形式A6，并填充表2（发票）、b11（名字），tehn自动采用表1中单元格c6中的值，并将其复制到表2、c12中，依此类推。希望这有帮助