كيفية البحث للحصول على ارتباط تشعبي نشط في Excel؟
في العمل اليومي باستخدام Excel، من الشائع استخدام دالة VLOOKUP للعثور وإرجاع القيم المرتبطة بالإدخالات المحددة في بياناتك. ومع ذلك، تظهر مشكلة شائعة عندما يعيد البحث ارتباطات تشعبية: بدلاً من الروابط النشطة القابلة للنقر، تحصل فقط على عناوين URL نصية بسيطة. على سبيل المثال، إذا كانت بيانات المصدر تحتوي على رابط موقع ويب مع ارتباط تشعبي مضمن، بعد VLOOKUP عادي، ستظهر النتيجة فقط كنص غير منسق، كما هو موضح أدناه.
في مثل هذه الحالات، التأكد من أن البحث يعيد ارتباطًا تشعبيًا نشطًا — يمكن النقر عليه ويُفتح في متصفحك — يحسن من قابلية الاستخدام، يوفر الوقت، وهو مهم لمجموعات البيانات التي تتضمن عناوين الويب، مسارات الملفات، أو أي موارد قابلة للنقر.
يقدم هذا البرنامج التعليمي حلولًا عملية متعددة لإعادة الارتباطات التشعبية النشطة من خلال عمليات البحث، مع تحليل سيناريوهاتها، أنواع البيانات المطبقة، والقيود المحتملة. ستتعلم أيضًا الاحتياطات الرئيسية، نصائح استكشاف الأخطاء وإصلاحها، والتوصيات لاختيار أفضل طريقة لتلبية احتياجات ورقة العمل الخاصة بك.
- البحث لإرجاع ارتباط تشعبي نشط باستخدام صيغة
- كود VBA – إرجاع وإدراج ارتباط تشعبي نشط عبر البحث (سيناريوهات متقدمة)
البحث لإرجاع ارتباط تشعبي نشط باستخدام صيغة
للبحث وإرجاع قيمة كرابط تشعبي نشط، يمكنك دمج الدالتين HYPERLINK و VLOOKUP. هذا الأسلوب بسيط ومناسب للبيانات المصدر حيث يتم تخزين الارتباطات التشعبية بشكل نظيف كعناوين URL نصية (مثل “https://www.example.com” أو مسارات ملفات الشبكة). سيجعل هذا القيمة المسترجعة قابلة للنقر في ورقة العمل الخاصة بك.
لنفترض أن لديك جدولًا بعمودين: أحدهما للقيمة المطلوبة (مثل اسم) والآخر لعنوان URL كنص عادي أو رابط تشعبي. لاسترداد الرابط التشعبي النشط المقابل بناءً على قيمة مدخلة من قبل المستخدم، اتبع الخطوات التالية:
1. أدخل الصيغة التالية في خلية فارغة حيث تريد عرض النتيجة:
=HYPERLINK(VLOOKUP(D2, $A$1:$B$8,2, FALSE))
2. اضغط على Enter لتأكيد. الآن تعرض الخلية الرابط التشعبي كرابط نشط وقابل للنقر، كما هو موضح أدناه:
ملاحظات حول المعلمات والاستخدام:
- D2: الخلية التي تحتوي على القيمة التي تريد البحث عنها.
- $A$1:$B$8: نطاق البيانات حيث يحتوي العمود الأول على قيم البحث والثاني يحتوي على الارتباطات التشعبية. استخدم المراجع المطلقة إذا كنت تخطط لنسخ الصيغة.
- 2: يشير إلى أن الارتباط التشعبي يقع في العمود الثاني من النطاق الخاص بك.
نصائح:
- إذا لم يتم العثور على القيمة المطلوبة، ستعيد الصيغة خطأ (#N/A). تحقق مرتين من أن قيم البحث لديك لها تطابق دقيق في نطاق الجدول.
- إذا كنت تريد أن يكون النص المعروض مختلفًا عن الرابط التشعبي الفعلي (على سبيل المثال، عرض اسم بدلاً من عنوان URL)، يمكنك إضافة معلمة اختيارية ثانية إلى HYPERLINK:
=HYPERLINK(VLOOKUP(D2,$A$1:$B$8,2,FALSE),D2)
يعرض قيمة D2 كنص الرابط. - يعمل هذا الأسلوب فقط عندما يتم تخزين الارتباطات التشعبية كعناوين URL أو مسارات ملفات قياسية. لا يستعيد الارتباطات التشعبية المضافة في Excel حيث يكون نص العرض وعنوان الرابط مختلفين، أو 'أسماء العرض الودية' دون وجود عنوان URL خام في الخلية.
القضايا الشائعة واستكشاف الأخطاء وإصلاحها:
- إذا لم يكن الناتج قابلًا للنقر، تأكد من أن بياناتك تحتوي على عنوان URL ويب صالح بالكامل (بما في ذلك "http://" أو "https://").
- إذا حصلت على نتائج غير صحيحة أو مفقودة، تحقق من نطاق البحث الخاص بك وتأكد من أن فهرس العمود يتطابق مع العمود الذي يحتوي على الارتباطات التشعبية.
- بالنسبة للملفات المحلية، تأكد من أن مسار الارتباط التشعبي الخاص بك يستخدم التنسيق المناسب (مثل "C:\Folder\file.xlsx").
المزايا: سهل الإعداد، يمكن سحب الصيغة لتطبيقها على عدة صفوف، الأفضل للجداول التي يتم فيها تخزين الارتباطات التشعبية كنصوص URI نصية.
القيود: لا يدعم استرداد نص العرض وعنوان الرابط بشكل منفصل إذا كانا مختلفين، ولا يتعرف على الارتباطات التشعبية المضافة يدويًا حيث يكون نص العرض فقط مرئيًا في الخلية.
كود VBA – إرجاع وإدراج ارتباط تشعبي نشط عبر البحث (سيناريوهات متقدمة)
إذا كنت بحاجة إلى البحث عن قيمة محددة في نطاق وإرجاع الرابط التشعبي النشط الأصلي الخاص بها — بما في ذلك نص العرض والرابط القابل للنقر نفسه — وليس مجرد عنوان URL بسيط، توفر VBA حلاً موثوقًا به. يقوم هذا الكود بالبحث عن القيمة المستهدفة في النطاق المحدد الخاص بك، وعندما يتم العثور على تطابق، فإنه ينسخ الرابط التشعبي الدقيق (النص + العنوان) إلى الخلية التي تحددها. هذا مفيد بشكل خاص عندما يكون نص العرض وعنوان الرابط مختلفين، أو عندما لا تستطيع الأساليب القائمة على الصيغة التقاط الرابط الفعلي.
هذه الطريقة مفيدة بشكل خاص عندما تشمل بياناتك 'أسماء العرض الودية' مع الارتباطات التشعبية الأساسية، أو الارتباطات التشعبية إلى ملفات أو مجلدات، أو تنسيقات ارتباط تشعبي غير قياسية. تمكنك VBA من نسخ كل من نص الرابط المرئي وعنوان الرابط الأساسي، أو إعادة إدراج ارتباط تشعبي في موقع جديد باستخدام نتيجة البحث.
احتياطات: تأكد من تمكين ماكرو في بيئة Excel الخاصة بك. دائمًا احفظ نسخة احتياطية من مصنفك قبل تشغيل البرامج النصية VBA، خاصة إذا كنت تعمل على بيانات مهمة.
المزايا: تتعامل مع الحالات المعقدة — مثل الارتباطات التشعبية المضافة في الخلايا والفصل بين نص العرض وعنوان الرابط. تسمح لك بمعالجة دفعات من الارتباطات التشعبية أو تخصيص النتائج.
القيود: تتطلب معرفة أساسية بـ VBA، وغير مدعومة في جميع بيئات Excel المقيدة أو المستندة إلى الويب.
1. افتح محرر VBA بالنقر فوق Developer > Visual Basic. في النافذة الجديدة التي تم فتحها، انقر فوق Insert > Module، والصق الكود التالي في الوحدة:
Sub LookupAndInsertHyperlink()
Dim LookupValue As String
Dim LookupRange As Range
Dim ResultCell As Range
Dim cell As Range
Dim hyperlinkFound As Boolean
Dim linkAddress As String
Dim linkText As String
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set LookupRange = Application.InputBox("Select the lookup range (must include display text/cell and hyperlink)", xTitleId, Selection.Address, Type:=8)
Set ResultCell = Application.InputBox("Select the cell to output the hyperlink", xTitleId, "", Type:=8)
LookupValue = Application.InputBox("Enter the value to lookup", xTitleId, "", Type:=2)
hyperlinkFound = False
For Each cell In LookupRange
If cell.Value = LookupValue Then
If cell.Hyperlinks.Count > 0 Then
linkAddress = cell.Hyperlinks(1).Address
linkText = cell.Value
ResultCell.Hyperlinks.Add Anchor:=ResultCell, Address:=linkAddress, TextToDisplay:=linkText
hyperlinkFound = True
Exit For
End If
End If
Next
If Not hyperlinkFound Then
ResultCell.Value = "No matching hyperlink found"
End If
End Sub
2. لتشغيل البرنامج النصي، مع فتح مصنفك، اضغط على Alt + F8، حدد LookupAndInsertHyperlink، وانقر فوق Run.
3. في مربعات الحوار التي تظهر:
- حدد نطاق بيانات البحث الخاص بك (بما في ذلك كل من القيم وارتباطاتهم التشعبية).
- اختر الخلية المستهدفة لرابط الإخراج التشعبي.
- أدخل قيمة البحث التي تريد البحث عنها. ستقوم الماكرو بالعثور على القيمة المتطابقة، استخراج الرابط التشعبي الخاص بها (حتى لو كان نص العرض مختلفًا عن الرابط الأساسي) وإدراجه كرابط تشعبي نشط في الموقع الذي اخترته.
نصائح عملية وإشعارات الأخطاء:
- إذا لم يتم العثور على القيمة أو لم يكن هناك ارتباط تشعبي موجود في الخلية، سيرشد الهدف إلى “لم يتم العثور على ارتباط تشعبي مطابق.”
- إذا كنت تريد معالجة عمليات البحث المتعددة مرة واحدة، فكر في توسيع كود VBA أو تشغيل البرنامج النصي عدة مرات حسب الحاجة.
- هذا البرنامج النصي فعال حتى عندما لا يكون الرابط التشعبي مجرد سلسلة URL في الخلية، وسيقوم أيضًا بنسخ كل من العنوان ونص العرض.
اقتراحات استكشاف الأخطاء وإصلاحها:
- تحقق من أن نطاق الإدخال الخاص بك يتضمن العمود الذي يحتوي على الارتباطات التشعبية الفعلية.
- إذا لم يعمل الماكرو VBA، تحقق من تمكين الماكرو في إعدادات Excel الخاصة بك.
- إذا ظهر “لم يتم العثور على ارتباط تشعبي مطابق”، تحقق مرتين من أن قيمة البحث الخاصة بك صحيحة وأن الارتباطات التشعبية المقابلة موجودة في تلك الصف.
- احرص دائمًا على حفظ مصنفك قبل تشغيل الماكرو في حالة الحاجة إلى التراجع عن التغييرات.
ملخص:
- استخدم طريقة الصيغة للارتباطات التشعبية القائمة على النصوص وللبحث السريع.
- استخدم طريقة VBA لاحتياجات أكثر تقدمًا - مثل استعادة الارتباطات التشعبية المضافة يدويًا، استرداد كل من نص العرض ورابط العنوان، أو تطبيق النتائج عبر النطاقات ديناميكيًا.
أفضل أدوات الإنتاجية لمكتب العمل
عزز مهاراتك في 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.





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