移动由宏创建的文件

Question

我有一个宏文件，该宏文件在打开时会创建一个文件并将其保存在文件夹中。

我创建了另一个宏来打开上面的宏文件。

我的问题是将上述宏创建的文件移动到另一个文件夹。

请帮助。

下面是我的代码：

    Sub fcr_macro()

    Dim wb As Workbook
    Dim clname, compname As String
    clname = Range("D2").Value
    compname = Range("D3").Value
    Set wb = Workbooks.Open(filename)

    wb.Close
    End Sub

只提供一些描述：

代码行：

    Set wb = Workbooks.Open(filename) 

将打开一个包含宏的文件。并且此宏将在文件夹中创建文件。

我希望将上述宏创建的文件移至目标文件夹。我希望在上面的代码中完成此操作。

请注意：由于某些问题，无法更改在打开文件时运行的宏。

请您对此进行说明

谢谢