كيفية تحويل ملفات xls متعددة إلى ملفات xlsx في إكسيل؟
لتحويل ملف xls Excel قديم إلى ملف xlsx جديد ، يمكنك تطبيق ميزة Save As في Excel ، ولكن إذا كانت هناك ملفات xls متعددة تحتاج إلى تحويل ، فكيف يمكن التعامل مع هذه المهمة بسرعة وسهولة؟
- قم بتحويل تنسيقات xls المتعددة إلى تنسيقات xlsx باستخدام وظيفة Save As واحدًا تلو الآخر
- قم بتحويل عدة تنسيقات xls إلى تنسيقات xlsx مرة واحدة باستخدام كود VBA
- قم بتحويل تنسيقات xls المتعددة إلى تنسيقات xlsx مرة واحدة باستخدام ميزة قوية
- تحويل مصنفات متعددة إلى ملفات PDF مرة واحدة
قم بتحويل تنسيقات xls المتعددة إلى تنسيقات xlsx باستخدام وظيفة Save As واحدًا تلو الآخر
يمكن أن تساعدك وظيفة "حفظ باسم" في Excel على تحويل تنسيق xls الخاص بالمصنف القديم إلى تنسيق xlsx جديد واحدًا تلو الآخر.
1. افتح المصنف الذي تريد تحويل تنسيقه.
2. انقر قم بتقديم > حفظ باسم، و حفظ باسم سيظهر مربع الحوار ، وحدد مجلدًا لوضع التنسيق الجديد للملف ، ثم انقر فوق حفظ كنوع القائمة المنسدلة للاختيار مصنف Excel، انظر لقطة الشاشة:
3. ثم اضغط حفظ زر لإغلاق مربع الحوار ، وقد تم تحويل تنسيق Excel هذا من xls إلى xlsx.
قم بتحويل عدة تنسيقات xls إلى تنسيقات xlsx مرة واحدة باستخدام كود VBA
إذا كنت ترغب في تحويل ملفات xls متعددة إلى ملفات xlsx مرة واحدة دون حفظ واحد تلو الآخر ، هنا ، سأتحدث عن رمز VBA من أجلك ، يرجى اتباع الخطوات التالية:
1. اضغط باستمرار على ALT + F11 مفاتيح لفتح ميكروسوفت فيسوال باسيك للتطبيقات نافذة.
2. انقر إدراج > وحدة، والصق الكود التالي في ملف وحدة نافذة او شباك.
كود فبا: تحويل تنسيقات xls متعددة إلى تنسيقات xlsx مرة واحدة
Sub ConvertToXlsx()
'Updateby Extendoffice
Dim strPath As String
Dim strFile As String
Dim xWbk As Workbook
Dim xSFD, xRFD As FileDialog
Dim xSPath As String
Dim xRPath As String
Set xSFD = Application.FileDialog(msoFileDialogFolderPicker)
With xSFD
.Title = "Please select the folder contains the xls files:"
.InitialFileName = "C:\"
End With
If xSFD.Show <> -1 Then Exit Sub
xSPath = xSFD.SelectedItems.Item(1)
Set xRFD = Application.FileDialog(msoFileDialogFolderPicker)
With xRFD
.Title = "Please select a folder for outputting the new files:"
.InitialFileName = "C:\"
End With
If xRFD.Show <> -1 Then Exit Sub
xRPath = xRFD.SelectedItems.Item(1) & "\"
strPath = xSPath & "\"
strFile = Dir(strPath & "*.xls")
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Do While strFile <> ""
If Right(strFile, 3) = "xls" Then
Set xWbk = Workbooks.Open(Filename:=strPath & strFile)
xWbk.SaveAs Filename:=xRPath & strFile & "x", _
FileFormat:=xlOpenXMLWorkbook
xWbk.Close SaveChanges:=False
End If
strFile = Dir
Loop
Application.DisplayAlerts = True
Application.ScreenUpdating = True
End Sub
3. ثم اضغط F5 مفتاح لتشغيل هذا الرمز ، وسيتم عرض نافذة ، يرجى تحديد مجلد يحتوي على ملفات xls التي تريد تحويلها ، انظر الصورة:
4. ثم اضغط OK، انبثقت نافذة أخرى ، يرجى تحديد مسار المجلد حيث تريد إخراج الملفات المحولة الجديدة ، انظر لقطة الشاشة:
5. وبعد ذلك ، clik OK، بعد الانتهاء من التحويل يمكنك الذهاب إلى المجلد المحدد لمعاينة النتيجة المحولة ، انظر لقطات الشاشة:
قم بتحويل تنسيقات xls المتعددة إلى تنسيقات xlsx مرة واحدة باستخدام ميزة قوية
مع هذا كوتولس ل إكسيلالصورة تنسيق تحويل الأداة المساعدة ، يمكنك تحويل تنسيقات xls متعددة إلى تنسيقات xlsx أو العكس بالعكس ، كما يمكنها مساعدتك في تحويل العديد من المصنفات إلى ملفات PDF في وقت واحد.
بعد تثبيت كوتولس ل إكسيل، يرجى القيام بذلك على النحو التالي:
1. انقر كوتولس بلس > مصنف > تنسيق تحويل، انظر لقطة الشاشة:
2. وسيظهر مربع برومت لتذكيرك بضرورة إغلاق المصنف الذي تريد تحويله. انظر لقطة الشاشة:
3. انقر OK، إذن ، في محول تنسيق الملف مربع الحوار ، حدد الخيارات التالية:
- تحت المبادرة من نوع التحويل القائمة المنسدلة ، حدد Excel 97-2003 إلى Excel 2007 أو أعلى;
- ثم اضغط أضف زر لإضافة ملفات xls التي تريد تحويلها ، يمكنك إضافة المصنفات من قرص الكمبيوتر أو OneDrive حسب حاجتك ؛
4. بعد إدخال ملفات xls ، لا يزال ملف محول تنسيق الملف مربع الحوار ، الرجاء الضغط زر لاختيار مسار مجلد واحد لإخراج الملفات المحولة ، ثم حدد بعض العمليات التي تحتاجها في أسفل مربع الحوار ، انظر لقطة الشاشة:
- إذا كانت المصنفات الموجودة في المجلدات الفرعية بحاجة إلى التحويل أيضًا ، فيرجى التحقق من قم بتضمين المجلدات الفرعية عند إضافة المجلدات خانة الاختيار
- إذا كنت تريد إزالة الملفات الأصلية بعد التحويل ، فيرجى التحقق من حذف ملفات المصدر بعد التحويل صندوق؛
- إذا كنت تريد الاحتفاظ بالتاريخ المعدل للملفات الأصلية ، فيرجى التحقق من احتفظ بالتاريخ المعدل للملفات الأصلية صندوق؛
- يمكن الاحتفاظ ببنية الدليل للملف عن طريق التحقق من يتم الاحتفاظ ببنية الدليل للملف عند التحويل صندوق؛
5. ثم اضغط OK لبدء التحويل ، بعد الانتهاء من التحويل ، يمكنك الانتقال إلى المجلد المحدد لمعاينة النتيجة المحولة. انظر لقطات الشاشة:
أفضل أدوات إنتاجية المكتب
عزز مهاراتك في Excel باستخدام Kutools for Excel، واختبر كفاءة لم يسبق لها مثيل. يقدم Kutools for Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية وتوفير الوقت. انقر هنا للحصول على الميزة التي تحتاجها أكثر...
يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير
- تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
- فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
- يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!