R以用户输入的名称保存excel文件

因此，我在将文件从RStudio上传到Excel进行MATLAB处理时遇到了问题。 我以前遇到过公式未填充的问题，因此我编写了一个脚本来打开、保存和关闭Excel文件，然后可以很好地填充公式并将数值加载回RStudio。但是，我不知道如何打开多个.csv文件，这些文件的名称根据我们的示例ID而变化

以下是我试图打开多个文件的脚本：

Set objExcel = CreateObject("Excel.Application")
Set objWorkbook = objExcel.Workbooks.Open("C:\PCRdata\*.csv")
## Also tried Set objWorkbook = objExcel.Workbooks.Open("C:\PCRdata\"& "*.csv")
objExcel.Application.Visible = True
objExcel.ActiveWorkbook.Save
objExcel.ActiveWorkbook.Close
objExcel.Application.Quit
WScript.Echo "Your Excel Spreadsheet was Updated, Open these files in Matlab"
WScript.Quit

但是脚本不喜欢*调用所有文件，有没有其他方法可以这样做？或者是一种更好的方法，让RStudios产生可用于matlab的数据

MATLAB错误：

Error using netest/testingBrowseButton_Callback (line 63)
Cannot concatenate the table variables 'AKAP8L' and 'ARAF', because their types are double and cell.

Error while evaluating UIControl Callback

---

嗯，我在网站上做了一些挖掘，找到了另一篇文章，它使用脚本将xls更改为xslx，所以我只是将它从csv更改为csv。希望这能帮助其他有这个问题的人

Set app = CreateObject("Excel.Application")
app.Visible = False
app.DisplayAlerts = False
Set fso = CreateObject("Scripting.FileSystemObject")

For Each f In fso.GetFolder("C:\PCRdata").Files
  If LCase(fso.GetExtensionName(f)) = "csv" Then
    Set wb = app.Workbooks.Open(f.Path)

    wb.Save
    wb.Close True
  End if
Next

app.Quit
Set f = Nothing
Set app = Nothing
Set fso = Nothing
wScript.Quit