Ошибка ExportAsFixedFormat VBA, не знаю, почему

Question

Возникли проблемы с получением экспорта в pdf для работы, по какой-то причине он не работает, и я не уверен, почему? Все, что мне нужно, это документ для сохранения activeSheet в C: \ Users \ Documents, используя найденное значение, это ячейка N6.

Easy Enough ...

По крайней мере, я так думал. ..

Код:

Sub SaveActiveWorkbookAsPDF()

' Strings Variable
Dim fName As String
Dim saveLocation As String

' The Variables
fName = Range("N6").Value
saveLocation = "C:\Users\Documents\SDS QUOTATIONS\" & fName & "\"

' Save as PDF
.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
        "saveLocation"
        Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, _
        OpenAfterPublish:=False

End Sub

Есть мысли?

Спасибо за ваше время и помощь, TCS

Answer 1

Вам нужно будет удалить кавычки из saveLocation ...

Filename:=saveLocation

Кроме того, похоже, что вы пропустили имя пользователя в своем пути и по ошибке добавили backsla sh (\) в конце строки, присваиваемой saveLocation. Это должно быть примерно так ...

saveLocation = "C:\Users\<yourusername>\Documents\SDS QUOTATIONS\" & fName

Вы также можете использовать функцию Environ для получения имени пользователя ...

saveLocation = "C:\Users\" & Environ("username") & "\Documents\SDS QUOTATIONS\" & fName