كيف يمكنني تحديد ونسخ جميع الروابط التشعبية من مستند Word؟

عند العمل مع مستند Word طويل يحتوي على العديد من الروابط التشعبية—سواء كانت تشير إلى مواقع ويب أو مستندات أو مواقع شبكة—قد تحتاج أحيانًا إلى نسخ جميع هذه الروابط لأغراض مثل التدقيق أو المشاركة أو تجميع المراجع أو نقل المحتوى. فليس فقط أن تحديد كل رابط يدويًا أمرٌ غير فعّال، بل قد يؤدي أيضًا إلى أخطاء أو حذف بعض الروابط دون قصد. لحسن الحظ، توجد طرق عملية متعددة تتيح لك استخراج ونسخ جميع الروابط التشعبية بسهولة، سواءً أردت عرض النص المرتبط مع عنوان الرابط أو فقط عناوين الروابط نفسها، مما يوفّر عليك وقتًا ثمينًا. ويستعرض هذا الدليل عدة طرق—باستخدام ميزات Word المدمجة، وكود VBA، وKutools for Word—لتمكينك من جمع الروابط التشعبية بكفاءة تامة وفقًا لمتطلباتك.

---

نسخ جميع الروابط التشعبية إلى مستند جديد باستخدام VBA

إذا كنت بحاجة إلى استخراج كلٍ من عرض النص والرابط لكل رابط تشعبي في مستند Word، فإن استخدام كود VBA يتيح لك تجميع جميع الروابط تلقائيًا في مستند جديد، مما يجعل التنظيم والمشاركة أسهل بكثير. ويُعد هذا الحل الأمثل عندما تحتاج إلى سجل منسق لجميع الروابط التشعبية أو عندما تريد مراجعة السياق المحيط بكل رابط بجانب الرابط الفعلي بسهولة—وهو مفيد بشكل خاص إذا كان مستندك يحتوي على مئات الروابط التشعبية داخل النص الأساسي أو الجداول.

1. افتح مستند Word الذي يحتوي على الروابط التشعبية، ثم اضغطAlt + F11 لفتح نافذةMicrosoft Visual Basic for Applications.
2. في نافذة VBA، انقر فوقإدراج>وحدة. انسخ والصق كود VBA التالي في نافذة الوحدة:

   Sub HyperlinksExtract()
   'Updateby20140214
       Dim oLink As Hyperlink
       Dim docCurrent As Document 'current document
       Dim docNew As Document 'new document
       Dim rngStory As StoryRanges
       Set docCurrent = ActiveDocument
       Set docNew = Documents.Add
       For Each oLink In docCurrent.Hyperlinks
           oLink.Range.Copy
           docNew.Activate
           Selection.Paste
           Selection.TypeParagraph
       Next
       
       Set docNew = Nothing
       Set docCurrent = Nothing
   End Sub
   

3. انقر فوق زرتشغيلأو اضغطF5 لتنفيذ كود VBA. سيُنشئ الكود تلقائيًا مستند Word جديدًا يحتوي على جميع الروابط التشعبية من المستند الأصلي. بعد ذلك، يمكنك حفظ هذا المستند الجديد أو تعديله حسب الحاجة.

   >>>

---

استخراج فقط عنوان الارتباط التشعبي (نص عادي) إلى مستند جديد باستخدام VBA

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

1. افتح مستند Word الخاص بك، ثم اضغطAlt + F11 لفتح محرر VBA.
2. انقر فوقإدراج>وحدة. انسخ والصق كود VBA التالي في الوحدة:

   Function GetAllHyperlinks()
   'Updateby20140214
       Dim docCurrent As Document
       Dim docNew As Document
       Dim oLink As Hyperlink
       Dim rng As Range
       Application.ScreenUpdating = False
       Set docCurrent = ActiveDocument
       Set docNew = Documents.Add
       For Each oLink In docCurrent.Hyperlinks
           Set rng = docNew.Range
           rng.Collapse
           rng.InsertParagraph
           rng.InsertAfter (oLink.Address)
       Next
       docNew.Activate
       Application.ScreenUpdating = True
       Application.ScreenRefresh
   End Function
   

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

   >>>

---

نسخ نسخ الارتباط التشعبي أو العناوين إلى الحافظة باستخدام Kutools for Word

Kutools for Word تقدّم ميزة بديهية تتيح لك نسخ جميع الروابط التشعبية أو العناوين فقط إلى الحافظة فورًا، مما يبسّط عمليةً قد تكون معقّدة أو متعددة الخطوات — أو حتى تعتمد على الكود! هذه الطريقة مثالية إذا كنت بحاجة إلى دمج الروابط بسرعة في رسائل البريد الإلكتروني، أو صفحات الويب، أو جداول البيانات، وهي مناسبة لجميع مستويات المستخدمين.

1. انتقل إلى علامة التبويبKUTOOLS PLUSفي شريط Word، ثم انقر فوقنسخ الارتباط التشعبي.

   

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

   

3. سيتم نسخ الروابط التشعبية أو العناوين المختارة إلى الحافظة. يمكنك الآن لصقها في أي مكان—مثل مستند جديد أو رسالة بريد إلكتروني أو متصفح—بمجرد الضغط علىCtrl + V.

---

---

عرض توضيحي: نسخ جميع الروابط التشعبية في مستند Word

---

---

مقالات ذات صلة:

• إدراج الروابط التشعبية وإزالتها وسردها لـ المستند الحالي في Word
• إدراج روابط تشعبية متعددة إلى مستند في Word
• إزالة جميع الروابط التشعبية في Word