كيفية استيراد / نسخ البيانات من مصنف مغلق إلى المصنف الحالي؟
من السهل علينا نسخ البيانات من ورقة عمل مفتوحة ولصقها في مصنف مفتوح آخر ، ولكن هل سبق لك أن حاولت استيراد البيانات من مصنف مغلق إلى مصنف مفتوح؟ في هذه المقالة ، سأتحدث عن كيفية استيراد البيانات من مصنف مغلق.
استيراد البيانات من مصنف مغلق إلى المصنف الحالي برمز VBA
استيراد البيانات من مصنف مغلق إلى المصنف الحالي باستخدام Kutools for Excel
استيراد البيانات من مصنف مغلق إلى المصنف الحالي برمز VBA
قد تساعدك التعليمات البرمجية لـ VBA التالية في نسخ البيانات من مصنف دون فتحه إلى مصنف نشط مفتوح ، يرجى القيام بالخطوات التالية:
1. اضغط باستمرار على ALT + F11 مفاتيح ، ويفتح ميكروسوفت فيسوال باسيك للتطبيقات نافذة.
2. انقر إدراج > وحدة، والصق الكود التالي في ملف نافذة الوحدة.
كود فبا: استيراد البيانات من مصنف مغلق إلى المصنف الحالي
Sub ImportDatafromcloseworkbook()
'Updateby Extendoffice
Dim xWb As Workbook
Dim xAddWb As Workbook
Dim xRng1 As Range
Dim xRng2 As Range
Set xWb = Application.ActiveWorkbook
xTitleId = "KutoolsforExcel"
With Application.FileDialog(msoFileDialogOpen)
.Filters.Clear
.Filters.Add "Excel 2007-13", "*.xlsx; *.xlsm; *.xlsa"
.AllowMultiSelect = False
.Show
If .SelectedItems.Count > 0 Then
Application.Workbooks.Open .SelectedItems(1)
Set xAddWb = Application.ActiveWorkbook
Set xRng1 = Application.InputBox(prompt:="Select source range", Title:=xTitleId, Default:="A1", Type:=8)
xWb.Activate
Set xRng2 = Application.InputBox(prompt:="Select destination cell", Title:=xTitleId, Default:="A1", Type:=8)
xRng1.Copy xRng2
xRng2.CurrentRegion.EntireColumn.AutoFit
xAddWb.Close False
End If
End With
End Sub
3. ثم اضغط F5 مفتاح لتشغيل هذا الرمز ، وفي فتح الملف نافذة ، حدد المصنف الذي تريد استيراد بياناته ، انظر الصورة:
4. ثم اضغط اذهب الى زر، و كوتولسفورإكسيل ينبثق مربع الحوار لتذكيرك بتحديد نطاق من البيانات التي تريد استيرادها إلى مصنف آخر ، انظر لقطة الشاشة:
5. ثم انقر فوق OK الزر ، في مربع الحوار المنبثق ، حدد خلية تريد وضع البيانات فيها ، انظر لقطة الشاشة:
6. وانقر OK، تم استيراد البيانات الموجودة في المصنف المغلق إلى المصنف الحالي.
استيراد البيانات من مصنف مغلق إلى المصنف الحالي باستخدام Kutools for Excel
قد يكون رمز VBA صعبًا إلى حد ما بالنسبة للمبتدئين في برنامج Excel ، لذلك ، هنا ، أوصيك بأداة مفيدة-كوتولس ل إكسيل، بما لديها إدراج ملف في المؤشر يمكنك إدراج المحتوى الكامل لورقة العمل من مصنف مغلق بسرعة وسهولة.
كوتولس ل إكسيل : مع أكثر من 300 وظيفة إضافية مفيدة في Excel ، يمكنك تجربتها مجانًا دون قيود في أيام 30. |
بعد تثبيت كوتولس ل إكسيليرجى القيام بما يلي:
1. انقر كوتولس بلس > استيراد و تصدير > إدراج ملف في المؤشر، انظر لقطة الشاشة:

2. في إدراج ملف في المؤشر في مربع الحوار ، قم بالعمليات التالية:
(1.) انقر زر لتحديد خلية حيث تريد وضع البيانات المستوردة ؛
(2.) انقر زر لتحديد المصنف الذي تريد استيراد بياناته.
ملاحظة: القيمة فقط (بدون صيغ): إذا حددت هذا الخيار ، فسيتم استيراد القيمة فقط ، ولن يتم استيراد الصيغ.
لا تنقل التنسيق: سيؤدي تحديد هذا الخيار إلى استيراد البيانات إلى ورقة العمل بدون تنسيق.
3. ثم اضغط OK، إذا كان هناك أكثر من ورقة عمل واحدة في المصنف ، أ حدد ورقة عمل سيظهر مربع الحوار ، يرجى تحديد ورقة العمل التي تريد استيراد البيانات ، انظر الصورة:
4. ثم انقر فوق OK ، تم استيراد البيانات الموجودة في ورقة العمل المحددة إلى المصنف الحالي.
انقر لمعرفة المزيد من التفاصيل حول ميزة "إدراج ملف في المؤشر".
قم بتنزيل Kutools for Excel والإصدار التجريبي المجاني الآن!
عرض توضيحي: استيراد البيانات من مصنف مغلق إلى المصنف الحالي باستخدام Kutools for Excel
أفضل أدوات إنتاجية المكتب
Kutools for Excel يحل معظم مشاكلك ويزيد إنتاجيتك بنسبة 80٪
- إعادة استخدام: أدخل بسرعة الصيغ المعقدة والرسوم البيانية وأي شيء استخدمته من قبل ؛ تشفير الخلايا مع كلمة السر إنشاء قائمة بريدية وإرسال رسائل البريد الإلكتروني ...
- سوبر فورميولا بار (بسهولة تحرير أسطر متعددة من النص والصيغة) ؛ تخطيط القراءة (قراءة وتحرير أعداد كبيرة من الخلايا بسهولة) ؛ لصق في النطاق المصفى
- دمج الخلايا / الصفوف / الأعمدة دون فقدان البيانات ؛ تقسيم محتوى الخلايا ؛ ادمج الصفوف / الأعمدة المكررة... منع تكرار الخلايا؛ قارن النطاقات
- حدد مكرر أو فريد صفوف حدد صفوف فارغة (جميع الخلايا فارغة) ؛ البحث الفائق والبحث الغامض في العديد من المصنفات. تحديد عشوائي ...
- نسخة طبق الأصل خلايا متعددة بدون تغيير مرجع الصيغة ؛ إنشاء المراجع تلقائيًا إلى أوراق متعددة أدخل الرموز النقطية، مربعات الاختيار والمزيد ...
- استخراج النص، إضافة نص ، إزالة حسب الموضع ، إزالة الفضاء؛ إنشاء وطباعة المجاميع الفرعية لترحيل الصفحات ؛ التحويل بين محتوى الخلايا والتعليقات
- سوبر تصفية (حفظ وتطبيق مخططات التصفية على أوراق أخرى) ؛ فرز متقدم حسب الشهر / الأسبوع / اليوم ، التكرار والمزيد ؛ مرشح خاص بواسطة bold، italic ...
- اجمع بين المصنفات وأوراق العمل؛ دمج الجداول على أساس الأعمدة الرئيسية ؛ تقسيم البيانات إلى أوراق متعددة; تحويل دفعة xls و xlsx و PDF
- أكثر من 300 ميزة قوية. يدعم Office / Excel 2007-2021 و 365. يدعم جميع اللغات. سهولة النشر في مؤسستك أو مؤسستك. الميزات الكاملة نسخة تجريبية مجانية لمدة 30 يومًا. ضمان استرداد الأموال لمدة 60 يومًا.

يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير
- تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
- فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
- يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!









