منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

السلام عليكم
ارجوا المساعده في اسناد مسار البرنامج App.Path
الى المتغير pdfName لضمان عدم حدوث أخطاء في حال نقل البرنامج الى جهاز اخر

dim pdfName as string

pdfName = " App.Path file.pdf"

Word_App.ActiveDocument.ExportAsFixedFormat OutputFileName:=pdfName, ExportFormat:= _
wdExportFormatPDF, OpenAfterExport:=False, OptimizeFor:=wdExportOptimizeForPrint, Range:=wdExportAllDocument, _
Item:=wdExportDocumentContent, IncludeDocProps:=True

pdfName = App.Path & "\file.pdf"

يعطيك العافيه أستاذ سامي
شاكر ومقدر