Description:
i have a simple excel macro. this is throwing 423 basic runtime error and not running.


>
Option VBASupport 1
Public Sub printplt1_click()
Dim pdf_template As Worksheet

 Set pdf_template = ActiveSheet
Dim wb As Workbook
Set wb = ActiveWorkbook
    Dim ws As Worksheet
 
If Dir(wb.Path & "\" & "export", vbDirectory) = "" Then
                        MkDir (wb.Path & "\" & "export")
                End If
  
  pdf_template.ExportAsFixedFormat Type:=xlTypePDF, _
                            Filename:=wb.Path & "\" & "export" & "\" & "pdf" & ".pdf", _
                            Quality:=xlQualityStandard, IncludeDocProperties:=True, _
                            IgnorePrintAreas:=False, OpenAfterPublish:=False

                
              
End Sub

Steps to Reproduce:
1. save this macro in a file and run macro.
2.
3.

Actual Results:
error message

Expected Results:
macro should export the sheet as a pdf file.


Reproducible: Always


User Profile Reset: No



Additional Info:
Version: 7.0.4.2
Build ID: dcf040e67528d9187c66b2379df5ea4407429775
CPU threads: 4; OS: Linux 5.4; UI render: default; VCL: gtk3
Locale: en-IN (en_IN); UI: en-US
Flatpak
Calc: threaded