+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة السي شارب C#.NET (http://vb4arb.com/vb/forumdisplay.php?fid=175)
+--- قسم : قسم اسئلة C#.NET (http://vb4arb.com/vb/forumdisplay.php?fid=176)
+--- الموضوع : [سؤال] ارجو المساعدة بتحويل ملف excel الىpdf (/showthread.php?tid=45558)
ارجو المساعدة بتحويل ملف excel الىpdf - alsaab120 - 22-02-23
السلام عليكم ورحمة الله وبركاته
بحثت وحاولت وجربت ولاكن لم اجد الحل
سؤالي هو طلب كود يقوم بتحويل اكسل الى pdf
ارجو من لديه الخبرة ان يساعدني في هذا الطلب
[attachment=28700]
[attachment=28699]
RE: ارجو المساعدة بتحويل ملف excel الىpdf - alsaab120 - 23-02-23
وجدت الحل والحمد لله في هذا الكود
كود :
Dim Excel
Dim ExcelDoc
'Opens the Excel file'
Excel = CreateObject("Excel.Application")
ExcelDoc = Excel.Workbooks.open("C:\Users\alsaa\Desktop\55555\www.xlsx")
'Creates the pdf file'
Excel.ActiveSheet.ExportAsFixedFormat(0, "C:\Users\alsaa\Desktop\55555\www.pdf", 0, 1, 0, , , 0)
'Closes the Excel file'
Excel.ActiveWorkbook.Close()
Excel.Application.Quit()