كيف انقل ملف اكسيل به ارتباط تشعبي

[eng mero]

السلام عليكم..

انا عملت ملف اكسيل على الديسكتوب به جدول وبه حقل بيانات بها ارتباط تشعبي لصور في ملف على الهارد (دي)  .وانا حاليا اريد ان انسخ منه نسخة على هارد اخر .. ولكن عند النسخ يفقد الارتباط التشعبي بالصور ..هل ممكن يوجد حل وابقاء الارتباط بالصور  عند النسخ

[حسونة حسين]

وعليكم السلام ورحمة الله وبركاته 

ممكن ترفق ملف للعمل عليه 

[r3dx]

لنفترض أنك تريد نقل ملف Excel يحتوي على ارتباطات تشعبية (مراجع إلى خلايا في ملف آخر) إلى مكان آخر. في هذه الحالة، يجب أن تأخذ في الاعتبار اثنين من الأمور:

نقل الملف Excel نفسه: يمكنك ببساطة نسخ الملف ولصقه في المكان الجديد.

تحديث الارتباطات التشعبية: عند نقل الملف، قد يكون عناوين الخلايا المرتبطة قد تغيرت بسبب التحول إلى مسار جديد. لذا، يجب تحديث هذه الارتباطات التشعبية.

هناك بعض الطرق لتحديث الارتباطات التشعبية في ملف Excel:

طريقة 1: استخدام "تغيير مصدر الارتباط"
افتح الملف الجديد الذي تم نقله.
انتقل إلى علامة التبويب "بيانات" (Data) في شريط الأوامر.
اختر "تغيير مصدر الارتباط" (Edit Links).
ستظهر نافذة تعرض جميع الارتباطات التشعبية في الملف.
اختر الارتباط الذي تريد تحديثه واختر "تغيير مصدر" (Change Source).
حدد الملف الجديد الذي تم نقله واختر "موافق" (OK).

طريقة 2: استخدام برمجة VBA

يمكنك أيضًا استخدام VBA لتحديث الارتباطات التشعبية بشكل تلقائي. هذا مفيد إذا كنت ترغب في تنفيذ هذا الإجراء بشكل تلقائي عند فتح الملف.

Sub UpdateLinks()
Dim links As Variant Dim i As Integer
' Get all links in the workbook 
links = ThisWorkbook.LinkSources
' If there are links, update them
If Not IsEmpty(links) Then 
For i = 1 To UBound(links) ThisWorkbook.ChangeLink links(i), "C:\New\Path\To\Linked\File.xlsx", xlLinkTypeExcelLinks
Next i 
End If
End Sub