كيفية تغيير مسارات الارتباط التشعبي المتعددة مرة واحدة في Excel؟

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

قم بتغيير مسارات الارتباطات التشعبية المتعددة مرة واحدة في ورقة عمل برمز VBA

قم بتغيير مسارات الارتباطات التشعبية المتعددة مرة واحدة في ورقة عمل / مصنف / أوراق متعددة / تحديد بميزة مذهلة

قم بتغيير مسارات الارتباطات التشعبية المتعددة مرة واحدة في ورقة عمل برمز VBA

لنفترض أن لديك قائمة بيانات بنفس الارتباطات التشعبية كما هو موضح في لقطة الشاشة التالية ، وباستخدام رمز VBA ، يمكنك بسرعة استبدال مسار الملف القديم أو العنوان في ورقة العمل بآخر جديد.

1. اضغط باستمرار ALT + F11 مفاتيح ، ويفتح نافذة ميكروسوفت فيسوال باسيك للتطبيقات.

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

رمز VBA: قم بتغيير مسارات الارتباط التشعبي المتعددة مرة واحدة

Sub ReplaceHyperlinks()
'Updateby Extendoffice
Dim Ws As Worksheet
Dim xHyperlink As Hyperlink
Dim xOld As String, xNew As String
xTitleId = "KutoolsforExcel"
Set Ws = Application.ActiveSheet
xOld = Application.InputBox("Old text:", xTitleId, "", Type:=2)
xNew = Application.InputBox("New text:", xTitleId, "", Type:=2)
Application.ScreenUpdating = False
For Each xHyperlink In Ws.Hyperlinks
    xHyperlink.Address = Replace(xHyperlink.Address, xOld, xNew)
Next
Application.ScreenUpdating = True
End Sub

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

4. انقر OK، وينبثق مربع مطالبة آخر لتذكيرك بإدخال عنوان الارتباط التشعبي الجديد الذي تريد استخدامه.

5. ثم انقر فوق OK، تم استبدال جميع عناوين الارتباط التشعبي القديمة نفسها بالعنوان الجديد مرة واحدة. انظر لقطات الشاشة:

قم بتغيير مسارات الارتباطات التشعبية المتعددة مرة واحدة في ورقة عمل / مصنف / أوراق متعددة / تحديد بميزة مذهلة

إذا كنت تريد استبدال مسارات الارتباطات التشعبية من تحديد أو أوراق متعددة أو كتاب عمل حالي أو مصنفات متعددة ، كيف يمكنك أن تفعل؟ مع بحث واستبدال سمة من سمات كوتولس ل إكسيل، يمكنك التعامل بسرعة مع هذه المهمة.

بعد تثبيت كوتولس ل إكسيل، يرجى القيام بذلك على النحو التالي:

1. انقر كوتولس > قائمة الإختيارات، انظر لقطة الشاشة:

2. في فتح قائمة الإختيارات جزء، انقر فوق البحث واستبدال علامة التبويب، في بحث واستبدال جزء، انقر فوق استبدل علامة التبويب ، ثم قم بإجراء العمليات التالية:

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

3. ثم اضغط استبدال الكل زر ، تم تغيير مسارات الارتباط التشعبي القديمة إلى مسارات جديدة مرة واحدة ، انظر الصورة:

انقر لتنزيل Kutools for Excel مجانًا!

المزيد من المقالات ذات الصلة: