كيفية تحويل مجموعة من عناوين URL النصية إلى روابط تشعبية نشطة في Excel؟
إذا كان لديك قائمة من عناوين URL التي هي نصوص عادية، فكيف يمكنك تفعيل هذه الروابط النصية لتصبح روابط تشعبية قابلة للنقر كما هو موضح في لقطة الشاشة التالية؟
تحويل مجموعة من عناوين URL النصية إلى روابط تشعبية نشطة باستخدام الصيغ
تحويل مجموعة من عناوين URL النصية إلى روابط تشعبية نشطة Kutools لـ Excel
تحويل مجموعة من عناوين URL النصية إلى روابط تشعبية نشطة باستخدام كود VBA
تحويل مجموعة من عناوين URL النصية إلى روابط تشعبية نشطة باستخدام الصيغ
النقر المزدوج على الخلية لتفعيل الروابط التشعبية واحدة تلو الأخرى سيضيع الكثير من الوقت، هنا يمكنني أن أقدم لك بعض الصيغ، يرجى القيام بما يلي:
أدخل هذه الصيغة: =HYPERLINK(A2, A2) في خلية فارغة حيث تريد إخراج النتيجة، ثم اسحب مقبض التعبئة لأسفل لتطبيق هذه الصيغة على الخلايا التي تريدها، وستتحول جميع عناوين URL النصية إلى روابط تشعبية نشطة، انظر لقطة الشاشة:
تحويل مجموعة من عناوين URL النصية إلى روابط تشعبية نشطة Kutools لـ Excel
هناك أداة عملية - Kutools لـ Excel، مع ميزتها تحويل الروابط التشعبية، يمكنك بسرعة تحويل مجموعة من عناوين URL النصية إلى روابط تشعبية قابلة للنقر واستخراج عناوين الروابط الحقيقية من سلسلة نصية تحتوي على روابط.
بعد تثبيت Kutools لـ Excel، يرجى القيام بما يلي:
1. حدد الخلايا التي تحتوي على عناوين URL النصية التي تريد تفعيلها.
2. ثم انقر فوق Kutools > ربط > تحويل الروابط التشعبية، انظر لقطة الشاشة:
3. في مربع الحوار تحويل الروابط التشعبية، حدد خيار تحويل محتوى الخلية إلى عناوين الروابط التشعبية تحت قسم نوع التحويل، ثم قم بتحديد تحويل نطاق المصدر إذا كنت تريد وضع العناوين الفعلية في النطاق الأصلي، انظر لقطة الشاشة:
4. ثم انقر فوق زر موافق، وستكون عناوين URL النصية قد تم تفعيلها فورًا، انظر لقطة الشاشة:
ملاحظة: إذا كنت تريد وضع النتيجة في خلية أخرى بدلاً من الخلية الأصلية، يرجى إلغاء تحديد تحويل نطاق المصدر، واختيار خلية حيث تحتاج إلى إخراج النتيجة من النطاق الناتج كما هو موضح في لقطة الشاشة التالية:
انقر لتنزيل Kutools لـ Excel والتجربة المجانية الآن!
تحويل مجموعة من عناوين URL النصية إلى روابط تشعبية نشطة باستخدام كود VBA
يمكن أن يساعدك الكود التالي VBA أيضًا في حل هذه المهمة، يرجى القيام بما يلي:
1. اضغط باستمرار على مفتاحي ALT + F11 لفتح نافذة Microsoft Visual Basic for Applications.
2. انقر فوق إدراج > وحدة، والصق الكود التالي في نافذة الوحدة.
كود VBA: تحويل مجموعة من عناوين URL النصية إلى روابط تشعبية نشطة:
Sub activateHyperlinks()
'Updateby Extendoffice
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each Rng In WorkRng
Application.ActiveSheet.Hyperlinks.Add Rng, Rng.Value
Next
End Sub
3. ثم اضغط على مفتاح F5 لتشغيل هذا الكود، وسيظهر مربع تنبيه لتذكيرك بتحديد الخلايا التي تريد تحويلها إلى روابط تشعبية قابلة للنقر، انظر لقطة الشاشة:
4. وبعد ذلك انقر فوق زر موافق، سيتم تحويل عناوين URL النصية إلى روابط تشعبية نشطة، انظر لقطة الشاشة:
أفضل أدوات الإنتاجية لمكتب العمل
عزز مهاراتك في 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 يومًا — بدون تسجيل، بدون بطاقة ائتمان
- قيمة رائعة — وفر مقارنة بشراء الإضافات بشكل منفرد