この関数は、ActiveSheetをPDFとして保存し、(オプションで)PDFをメールに添付します(Outlookがインストールされていることが前提です)。 SubTest_Save_PDF()CallSend_PDF("SendEmail")EndSubFunctionSend_PDF(OptionalactionAsString="SaveOnly")AsBooleanDimThissheetAsString,ThisFileAsString,PathNameAsStrin...