Excel 自动创建工作簿并自动保存在新创建的文件夹中

我有一个Excel表格，我需要经常使用其他文件名和表格中更改的数据。我需要编写代码，创建一个文件夹，并将Excel文件与表单中更改的文本一起保存在其中。（文本位于另一个Excel文件中）

我所拥有的：

• 我有一个Excel文件，其中有一个姓名、数字和文本列表，我需要填写我的空表格
• 我有一个表格，我必须在里面写这些东西，现在是手动的

我知道如何在表单中获取数据，但我不知道如何更改数据，使其循环并保存

我知道如何保存Excel文件，但我不确定这是否是最好的方法，因为我不需要新保存表单中的任何宏

最终结果应该是所有Excel表单都保存在用户决定的路径或Excel宏文件所在的位置。Excel文件应位于与表单同名的文件夹中

请帮我想想如何实现这一点

---

我发现这段代码用于创建文件夹，但我不确定如何绑定它，因为它只保存具有相同名称的文件

Sub MakeFolders()
  Dim Rng As Range
  Dim maxRows, maxCols, r, c As Integer
  Set Rng = Selection
  maxRows = Rng.Rows.Count
  maxCols = Rng.Columns.Count
  For c = 1 To maxCols
    r = 1
    Do While r <= maxRows
      If Len(Dir(ActiveWorkbook.Path & "\" & Rng(r, c), vbDirectory)) = 0 Then
        MkDir (ActiveWorkbook.Path & "\" & Rng(r, c))
        On Error Resume Next
      End If
      r = r + 1
    Loop
  Next c
End Sub

Sub-MakeFolders（）
变暗Rng As范围
将maxRows、maxCols、r、c设置为整数
设置Rng=选择
maxRows=Rng.Rows.Count
maxCols=Rng.Columns.Count
对于c=1到maxCols
r=1
当r显示您的代码并解释您需要帮助解决的特定问题时，请执行。@AnsgarWiechers我没有代码，因为我不知道可以使用哪些函数。atm我的想法是，我用下拉列表和vlookup函数半自动完成它。但这仍然需要花费大量的时间来开始录制宏并从中改进。因此，这里既不是别人为你编写代码的地方，也不是你学习教程的替代品。我的主要问题是，我不知道如何循环使用不同的名称..好的，请编辑您的原始帖子，包括以下内容：显示您的代码并解释您需要帮助解决的特定问题。@AnsgarWiechers我没有代码，因为我不知道可以使用哪些函数。atm我的想法是，我用下拉列表和vlookup函数半自动完成它。但这仍然需要花费大量的时间来开始录制宏并从中改进。因此，这里既不是别人为你编写代码的地方，也不是你学习教程的替代品。我的主要问题是，我不知道如何循环使用不同的名称。好的，请编辑你的原始帖子，包括以下内容：