我想将一个excel文件保存到一个文件夹中,基于它的'Name'(一个名为变量的字符串),文件名基于'Name'和'AccountNumber'(一个命名变量,是数字)。
当我在文件名中使用'AccountNumber'变量时,我可以保存它,但是当我添加'Name'时我不断收到错误。我试过把它放在:Range(“Name”)或Range(“Name”)。Text(或.Value),Name,它的单元格位置(D3)等......但是没有运气!这是一个错误或它的工作原理,但文件名/文件夹名称中只有一个空格。它应该是。
Sub SavePDF()
Dim NewPath As String
NewPath = Application.ThisWorkbook.Path & "\PDF Outputs\Leads - PDF Outputs\" & "\" & Name
If Dir(NewPath) = "" Then MkDir NewPath
Sheets("Sheet1").Activate
ActiveSheet.ExportAsFixedFormat _
Type:=xlTypePDF, _
Filename:=NewPath & "\Report - " & Range("Name").Text & " " & Range("AccountNumber").Value & ".pdf", _
Quality:=xlQualityStandard, _
IncludeDocProperties:=True, _
IgnorePrintAreas:=False, _
OpenAfterPublish:=False
End Sub
基于这些错误,似乎问题是由变量是一个字符串引起的 - 如果它还没有认为是一个字符串,如何将其转换为字符串?或者如何告诉它将字符串变量添加到文件名中?
提前致谢!