KutoolsforOffice — حل واحد، خمس أدوات قوية.تحقيق المزيد بجهد أقل.

كيف يمكن العثور على جميع الروابط (المراجع الخارجية) في Excel وسردها؟

المؤلفكيليتاريخ التعديل

في Excel، يمكنك الرجوع إلى محتويات خلايا موجودة في مصنف آخر بإنشاء مرجع خارجي. لكن عندما ترغب في سرد جميع الروابط الخاصة بمصنف ما، قد يبدو العثور على كل المراجع الخارجية (الروابط) وتحديدها أمرًا صعبًا. لحسن الحظ، تقدم لك هذه المقالة طريقة ذكية تساعدك على اكتشاف جميع الروابط في المصنف وسردها بسرعة فائقة.

العثور على جميع الروابط وسردها باستخدام أمر البحث

العثور على جميع الروابط وسردها باستخدام Kutools لـ Excel

العثور على جميع الروابط وسردها باستخدام ماكرو VB

سهم أزرق فقاعة جهة اليمينالعثور على جميع الروابط وسردها باستخدام أمر البحث

بما أن الروابط الخارجية تحتوي على قوس معقوف[، فيمكننا اكتشافها إذا تمكّنا من استخراج جميع علامات الأقواس المعقوفة من المصنف بأكمله.

1. انقرالصفحة الرئيسية > بحث وتحديد > بحثلفتح مربع حوارالبحث والاستبدال. ويمكنك أيضًا فتح مربع حوارالبحث والاستبدالبالضغط على مفاتيحCtrl + F.

2. في مربعالبحث عن:، أدخل الجزء الأيسر من القوس المعقوف "[".

أدخل الجزء الأيسر من القوس في مربع البحث عن

3. انقرخيارات، ثم في القائمةالمنسدلة، اخترورقة العملأوالمصنفالذي تريد البحث عن الروابط فيه. انظر لقطة الشاشة:

اختر ورقة العمل أو المصنف للعثور على الروابط منه

4. ثم انقر على زربحث الكل، وسيتم عرض جميع المراجع الخارجية فورًا في مربع حوارالبحث والاستبدال. اضغط علىCtrl + A لتحديد جميع خلايا الروابط كما هو موضح في لقطة الشاشة التالية:

تم سرد جميع المراجع الخارجية، اضغط Ctrl + A لتحديد جميع خلايا الروابط

يمكن للجزء الأيسر من علامة القوس المعقوف اكتشاف الروابط الخارجية في المصنف بأكمله. وإذا كنت ترغب في اكتشاف جميع أنواع الروابط—بما في ذلك الروابط الداخلية والخارجية—فما عليك سوى إدخال علامة التعجب "!" في مربعالبحث عن:

سهم أزرق فقاعة جهة اليمينالعثور على جميع الروابط وسردها باستخدام Kutools لـ Excel

مع أداةKutools لـ Excelالمميزةالعثور وكسر الروابط، يمكنك بسهولة تحديد جميع الروابط الخارجية في ورقة العمل النشطة، بل ويمكنك فصل الروابط المحددة وفقًا لاحتياجاتك!

Kutools لـ Excelيقدّم أكثر من 300 ميزة متقدمة لتبسيط المهام المعقدة، مما يعزز الإبداع والكفاءة.مدمج مع إمكانات الذكاء الاصطناعي، يقوم Kutools بأتمتة المهام بدقة، مما يجعل إدارة البيانات سهلة بلا جهد.معلومات تفصيلية عن Kutools لـ Excel...         نسخة تجريبية مجانية...

إذا كنت قد قمت بتثبيتKutools لـ Excel، فالرجاء اتباع الخطوات التالية:

1.فعّل ورقة العمل التي تريد العثور على الروابط فيها، ثم انقرKutools>رابط>العثور وكسر الروابط، انظر لقطة الشاشة:

انقر على ميزة البحث عن الروابط التالفة وكسرها من kutools

2. في مربع حوارالعثور وكسر الروابط، انقر على قائمةتصفيةالمنسدلة واخترجميع الروابط. سيتم عرض جميع الروابط في ورقة العمل النشطة، ويمكنك أيضًا الاطلاع على حالة كل رابط: حيث يشيرموافقإلى أن الرابط صالح، بينما تعني كلمةخطأأن الرابط تالف.

تم سرد جميع الروابط في مربع الحوار

ملاحظات:

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

2. إذا أردت فصل رابطٍ ما، فما عليك سوى تحديد الرابط من القائمة، ثم النقر علىكسر الرابط.

انقر لتنزيل Kutools لـ Excel وتجربته مجانًا الآن!

إذا كنت تريد معرفة المزيد عن هذه الميزة، فانقر علىالعثور وكسر الروابط.

سهم أزرق فقاعة جهة اليمينالعثور على جميع الروابط وسردها باستخدام ماكرو VB

يمكن للماكرو التالي المكتوب بلغة VBA أن يساعدنا في سرد جميع مصنفات مصدر الرابط في ورقة عمل جديدة ضمن المصنف الحالي.

1.اضغط مع الاستمرار على مفاتيحALT+F11، وستفتح نافذة Microsoft Visual Basic for Applications تلقائيًا.

2. انقرإدراج > وحدة نمطية، ثم الصق الماكرو التالي في نافذة الوحدة النمطية.

VBA: اعرض جميع الروابط في Excel.

Sub ListLinks()
    Dim xSheet As Worksheet
    Dim xRg As Range
    Dim xCell As Range
    Dim xCount As Long
    Dim xLinkArr() As String
    On Error Resume Next
    For Each xSheet In Worksheets
        Set xRg = xSheet.UsedRange.SpecialCells(xlCellTypeFormulas)
        If xRg Is Nothing Then GoTo LblNext
        For Each xCell In xRg
            If InStr(1, xCell.Formula, "[") > 0 Then
                xCount = xCount + 1
                ReDim Preserve xLinkArr(1 To 2, 1 To xCount)
                xLinkArr(1, xCount) = xCell.Address(, , , True)
                xLinkArr(2, xCount) = "'" & xCell.Formula
           End If
        Next
LblNext:
    Next
    If xCount > 0 Then
        Sheets.Add(Sheets(1)).Name = "Link Sheet"
        Range("A1").Resize(, 2).Value = Array("Location", "Reference")
        Range("A2").Resize(UBound(xLinkArr, 2), UBound(xLinkArr, 1)).Value = Application.Transpose(xLinkArr)
        Columns("A:B").AutoFit
    Else
        MsgBox "No links were found within the active workbook.", vbInformation, "KuTools for Excel"
    End If
End Sub

3. اضغط على مفتاحF5 لتشغيل هذا الماكرو. بعد ذلك، سيتم إنشاء ورقة عمل جديدة باسمورقة الروابط، وتسرد دفعة واحدة مواقع جميع الروابط وأسماء مصنفات مصدرها ومسارات حفظها. انظر لقطة الشاشة:

رمز VBA لسرد جميع الروابط في ورقة العمل

سهم أزرق فقاعة جهة اليمين العثور على جميع الروابط وسردها باستخدام Kutools لـ Excel

 

أفضل أدوات الإنتاجية لمكتبتك

🤖KUTOOLS AI مساعد: ثوّر تحليل البيانات استنادًا إلى:التنفيذ الذكي   |  إنشاء الكود|  إنشاء الصيغ المخصصة  |  تحليل البيانات وإنشاء المخططات البيانية|  استدعاء الوظائف المحسنة…
الميزات الشائعة:البحث، التمييز أو وضع علامة على المكررات   |  حذف الصفوف الفارغة   |  دمج الأعمدة أو الخلايا دون فقدان البيانات   |  التقريب بدون استخدام الصيغة...
بحث متقدم:VLookup متعدد المعايير  |  VLookup متعدد القيم  |   VLookup عبر أوراق متعددة   |   مطابقة غامضة....
قائمة منسدلة متقدمة:إنشاء قائمة منسدلة بسرعة   |  قائمة منسدلة تابعة   |  قائمة منسدلة متعددة الاختيار....
مدير الأعمدة:إضافة عدد محدد من الأعمدة|نقل الأعمدة|تبديل حالة ظهور الأعمدة المخفية|مقارنة النطاقات والأعمدة...
ميزات مميزة:التركيز على الشبكة   |  عرض التصميم   |شريط الصيغ المحسن   | مدير الدفتر والورقة   |  مكتبة الموارد(نص تلقائي)|  أداة اختيار التاريخ   |  تجميع ورقات العمل  |  تشفير/فك تشفير الخلايا   | إرسال رسائل البريد الإلكتروني حسب القائمة   |  مرشح متقدم   |   تصفية خاصة(تصفية الخلايا التي تحتوي على خط عريض/مائل/يتوسطه خط...) ...
أفضل 15 مجموعات الأدوات:12 أدواتالنصوص(إضافة نص،حذف الأحرف المحددة، ...)|   50+أنواعالمخططات البيانية(مخطط جانت، ...)|   40+ صيغعملية(حساب العمر بناءً على تاريخ الميلاد، ...)|   19 أدواتالإدراج(إدراج رمز QR،إدراج صورة من المسار، ...)|   12 أدواتالتحويل(تحويل إلى كلمات،تحويل العملة، ...)|   7 أدواتدمج وتقسيم(دمج متقدم للصفوف،تقسيم الخلايا، ...)|... وأكثر من ذلك
استخدم Kutools باللغة التي تفضلها – يدعم الإنجليزية والإسبانية والألمانية والفرنسية والصينية و40+ لغات أخرى!

عزِّز مهاراتك في Excel باستخدام Kutools لـ Excel، وعايش الكفاءة كما لم تفعل من قبل.يقدّم Kutools لـ Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية ووقت الحفظ.انقر هنا للحصول على الميزة التي تحتاجها أكثر من غيرها...

يجلب Office Tab واجهة ذات علامات تبويب إلى Office، ويجعل عملك أسهل بكثير

  • تمكّن من التحرير والقراءة باستخدام علامات التبويب في Word وExcel وPowerPoint، وPublisher وAccess وVisio وProject.
  • افتح وأنشئ مستندات متعددة في علامات تبويب جديدة داخل النافذة نفسها، بدلاً من فتح نوافذ جديدة.
  • يزيد إنتاجيتك بنسبة 50% ويوفّر لك مئات نقرات الفأرة كل يوم!

جميع الإضافات من Kutools في برنامج تثبيت واحد!

Kutools for Office حزمةٌ تحتوي على إضافاتٍ مخصصة لتطبيقات Excel وWord وOutlook وPowerPoint، إلى جانب Office Tab Pro، مما يجعلها الخيار المثالي للفِرق التي تعمل عبر تطبيقات Office.

ExcelWordOutlookTabsPowerPoint
  • حزمة شاملة واحدة— إضافات Excel وWord وOutlook وPowerPoint بالإضافة إلى Office Tab Pro
  • برنامج تثبيت واحد، ترخيص واحد— الإعداد خلال دقائق (جاهز لـ MSI)
  • يعمل بشكل أفضل معًا— إنتاجية ميسَّرة عبر تطبيقات Office
  • تجربة مجانية لمدة 30 يومًا بكامل الميزات— بدون تسجيل، بدون بطاقة ائتمان
  • أفضل قيمة— وفِّر مقارنةً بشراء الإضافات بشكل منفصل