Sub SaveAsPDF()
Dim NewFN As Variant
NewFN = "C:\Users\Brock\Desktop\MPI\Financials\" & Range("b10").Value & ".pdf"
Dim ActiveWorksheet As Variant
ActiveWorksheet = "sheet1"
ActiveWorksheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=NewFN, _
Quality:=xlQualityStandard, IncludeDocProperties:=True, _
IgnorePrintAreas:=False, OpenAfterPublish:=False
End Sub
Ошибка 424 выскакивает каждый раз. Выделенная часть:
ActiveWorksheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=NewFN, _
Quality:=xlQualityStandard, IncludeDocProperties:=True, _
IgnorePrintAreas:=False, OpenAfterPublish:=False
Я не могу понять, в чем проблема для меня. Я изучаю VBA-кодирование по ходу дела, поэтому я не знаю, что много значат!