تحويل ملفات pdf الي اكسيل بدون برامج بطريقه احترافيه

تحويل ملفات pdf الي اكسيل بدون برامج بطريقه احترافيه

تحويل ملفات pdf الي اكسيل بدون برامج بطريقه احترافيه في البدايه دعنا نتعرف علي ملفات pdf :هي صيغه ملفات طورتها شركه ادوبي عملاق صناعه و تطوير برامج الجرافيك لسهوله تبادل

اهميه ملفات pdf

المستندات و يمكن اعتبارها ملفات غير قابله للتعديل بشكل مباشر تشبه ملفات الصور عادةً تستخدم لإنشاء ملفات أو مستندات للقراءة فقط و يمكن

الاستفاده منها في الحفاظ علي الملفات بنفس التنسيقات و لا نحتاج الي برنامج الاوفيس لفتح ملف بي دي اف مهما كان شكل هذا الملف ان كان جداول

بيانات او فقرات نصيه

فكل هذه التسيقات ستفتح بصيغه واحده اشبه بالصوره لا يمكن التعديل عليها بهذه الصيغه مباشره

ملفات الاكسيل كغيرها من الملفات النصيه التي يسهل التعديل عليها

يدعم برنامج مايكروسوفت اكسيل بدايه من الاصدار 2010 حفظ ملفات الاوفيس الي صيغه pdf بدون الحاجه الي برامج

لكن لا يدعم عكس هذه العمليه حتي الان الا ان هناك العديد من المواقع و البرامج التي يمكن استخدامها لتحويل ملفات pdf الي صيغ نصيه يسهل

التعديل عليها الا ان معظه هذه البرامج و المواقع لا تدعم اللغه العربيه و البعض الاخر يعطي نتائج غير دقيقه  لذلك سنحاول في هذا المقال استعراض

طريقه الكود البرمجي

هذه الطريقه و هي لا تحتاج الي برامج و هي عباره عن كود موجود في ملف اكسيل يحول ملف pdf من صورته الغير قابله للتعديل الي ملف

نصي يسهل التعديل عليه

و مما لا شك فيه اصبحت صيغه ملفات pdf صيغه مهمه و نستخدمها بطريقه شبه يوميه في اعمالنا

الا اننا عند محاوله التعديل علي اي ملف بيدي اف نواجه العديد من المشاكل خصيصا اذا كان الملف يحتوي علي اللغه العربيه لان معظم برامج تحويل

ملفات البيدي اف لاتدعم اللغه العربيه و تحولها الي حروف غير مفهومه

و لكن اليوم نستعرض طريقه جديده تدعم اللغه العربيه في تحويل ملفات pdf و بدون برامج عن طريق كود موجود في ملف العمل المرفق يقوم

بتحويل اي ملف بي دي اف الي ورد ثم الي اكسيل بطريقه بسيطه و مع دعم اي لغه بشرط ان تكون مثبته علي نظام التشغيل ويندوز

طريقه التعامل مع ملف العمل

قم نفتح ملف العمل المرفق
نشط الماكرو

قم بعمل ملف جديد و ضع فيه ملف pdf المراد تحويله الي اكسيل

قم بعمل ملف جديد ليتم حفظ فيه ملفات الاكسيل المحوله من pdf

انسخ مسار الملفات و ضعها في شيت العمل و اضغط علي تحويل  ليتم تحويل الملفات من بي دي اف الي ورد ثم الي اكسيل

كيف يمكنني ان استخدم الكود

افتح ملف اكسيل جديد

قم بفتح محرر الاكواد من داخل الاكسيل عن طريق الضغط علي اسم الشيتClick right

ثم اختر view code

بعد فتح صفحه محرر الاكواد انتقل الي القائمه Insert

واختر module

قم بلصق الكود التالي الكود المستخدم في ملف العمل

Sub PDF_To_Excel()  Dim setting_sh As Worksheet  Set setting_sh = ThisWorkbook.Sheets("Setting")  Dim pdf_path As String  Dim excel_path As String  pdf_path = setting_sh.Range("E11").Value  excel_path = setting_sh.Range("E12").Value  Dim fso As New FileSystemObject  Dim fo As Folder  Dim f As File  Set fo = fso.GetFolder(pdf_path)  Dim wa As Object  Dim doc As Object  Dim wr As Object  Set wa = CreateObject("word.application")  'Dim wa As New Word.Application  wa.Visible = True  'Dim doc As Word.Document  Dim nwb As Workbook  Dim nsh As Worksheet  'Dim wr As Word.Range  For Each f In fo.Files      Set doc = wa.documents.Open(f.Path, False, Format:="PDF  Files")      Set wr = doc.Paragraphs(1).Range      wr.WholeStory        Set nwb = Workbooks.Add      Set nsh = nwb.Sheets(1)      wr.Copy          nsh.Paste      nwb.SaveAs (excel_path & "\" & Replace(f.Name, ".pdf",  ".xlsx"))         doc.Close False      nwb.Close False  Next  wa.Quit  MsgBox "Done"  End Sub  

 

 
 

يمكن ان يعجبك أيضا

 

 

شرح الكود

‘ تحديد الخليه التي بها مسار الملفات pdf

pdf_path = setting_sh.Range(“E11”).Value

‘ تحديد مسار حفظ الملفات النهائيه الناتجه بصيغه اكسيل

excel_path = setting_sh.Range(“E12”).Value

يمكنك تطوير و التعديل علي الكود السابق ليتناسب مع عملك مع ملاحظه ان هذا الكود يعمل علي بيئه ويندوز مع مايكروسوفت اوفيس و لا يعمل مع البرامج البديله للاوفيس

 

معلومات الشيت

شيت تحويل ملفات pdf الي اكسيل بدون برامج بطريقه احترافيه
رقم الاصدار 1
صيغة الملف ملف اكسيل مضغوط بصيغه RAR
الترخيص مجاني مفتوح المصدر قابل للتعديل
كلمه السر 123
حجم الملف 300
متطلبات التشغيل نظام تشغيل ويندز يفضل بنظام 32 حزمه تطبيقات الاوفيس علي الاقل اصدار 2010 بنظام 32

رابط تحميل مباشر

 


اترك تعليقاً

لن يتم نشر عنوان بريدك الإلكتروني. الحقول الإلزامية مشار إليها بـ *