Vba 宏中从A列到最后一列的自动填充公式

我正在尝试制作一个宏，它将获取B358到B362单元格中的公式，并将这些行自动填充到第2行中使用的最后一列

我是VBA的新手，通过搜索这样的论坛完全自学，但不幸的是，我没有找到我的解决方案

请帮帮我

编辑：

如果你需要看一些代码，我可以给你一个非常基本的例子

Sub Macro1()

    Range("B358:B362").Select
    Selection.AutoFill Destination:=Range("B358:AHQ362"), Type:=xlFillDefault
    Range("B358:AHQ362").Select
End Sub

---

在本例中，我需要自动填充目标为（B358:“在此插入第2行中使用的最后一列”362）

，这是针对您的情况提出的动态解决方案：

Sub Macro1()


Dim lastCol As Long
lastCol = Cells(2, Columns.Count).End(xlToLeft).Column

 Range("B358:B362").AutoFill Destination:=Range(Range("B358"), Cells(362, lastCol)), Type:=xlFillDefault

End Sub

---

改进代码总是更好更快。。。这也是这里提供支持的首选方式。因此，请显示您目前拥有的代码。你们有并没有试着用宏记录器做些什么？我的问题是我现在基本上什么都并没有。录制宏不会给我太多帮助，主要是因为我需要它是动态的。完成部分工作，我们会帮助您获得“动态”代码。因此，记录一些“静态”宏，显示您的代码，我们会给您一些提示。：）好的，所以我添加了一些代码，很抱歉它被弄乱了，我没有那样做太好了！请看下面的答案：）谢谢。我一直在仔细研究其他一些答案，但由于我不理解大部分的单个组件，所以我无法完全正确地得出答案。谢谢你的帮助