วิธีแปลง URL ข้อความจำนวนมากเป็นไฮเปอร์ลิงก์ที่ใช้งานอยู่ใน Excel

หากคุณมีรายการที่อยู่ URL ซึ่งเป็นข้อความธรรมดาคุณจะเปิดใช้งาน URL ข้อความเหล่านี้ไปยังไฮเปอร์ลิงก์ที่คลิกได้ดังภาพต่อไปนี้ได้อย่างไร

แปลง URL ข้อความจำนวนมากให้เป็นไฮเปอร์ลิงก์ที่ใช้งานอยู่ด้วยสูตร

แปลง URL ข้อความจำนวนมากให้เป็นไฮเปอร์ลิงก์ที่ใช้งานอยู่ Kutools for Excel

แปลง URL ข้อความจำนวนมากให้เป็นไฮเปอร์ลิงก์ที่ใช้งานอยู่ด้วยรหัส VBA

แปลง URL ข้อความจำนวนมากให้เป็นไฮเปอร์ลิงก์ที่ใช้งานอยู่ด้วยสูตร

การดับเบิลคลิกที่เซลล์เพื่อเปิดใช้งานไฮเปอร์ลิงก์ทีละรายการจะเสียเวลามากที่นี่ฉันสามารถแนะนำสูตรบางอย่างให้คุณได้โปรดทำดังนี้:

ใส่สูตรนี้: = HYPERLINK (A2, A2) ลงในเซลล์ว่างที่คุณต้องการส่งออกผลลัพธ์จากนั้นลากที่จับเติมลงเพื่อใช้สูตรนี้กับเซลล์ที่คุณต้องการและ URL ข้อความทั้งหมดถูกแปลงเป็นไฮเปอร์ลิงก์ที่ใช้งานอยู่ดูภาพหน้าจอ:

แปลง URL ข้อความจำนวนมากให้เป็นไฮเปอร์ลิงก์ที่ใช้งานอยู่ Kutools for Excel

นี่คือเครื่องมือที่มีประโยชน์ -Kutools สำหรับ Excelเดียวกันกับที่ แปลงไฮเปอร์ลิงก์ คุณสามารถทำได้อย่างรวดเร็วทั้งสองอย่าง แปลง URL ข้อความจำนวนมากให้เป็นไฮเปอร์ลิงก์ที่คลิกได้ และ แยกที่อยู่ไฮเปอร์ลิงก์จริงจากสตริงข้อความไฮเปอร์ลิงก์.

หลังจากการติดตั้ง Kutools สำหรับ Excelโปรดทำตามนี้:

1. เลือกเซลล์ที่มี URL ข้อความที่คุณต้องการเปิดใช้งาน

2. จากนั้นคลิก Kutools > ลิงค์ > แปลงไฮเปอร์ลิงก์ดูภาพหน้าจอ:

3. ใน แปลงไฮเปอร์ลิงก์ ใหเลือก เนื้อหาของเซลล์แทนที่ที่อยู่ของไฮเปอร์ลิงก์ ภายใต้ ประเภทการแปลง จากนั้นตรวจสอบ แปลงแหล่งที่มา ช่วงหากคุณต้องการใส่ที่อยู่จริงในช่วงเดิมโปรดดูภาพหน้าจอ:

4. จากนั้นคลิก Ok และ URL ข้อความถูกเปิดใช้งานพร้อมกันดูภาพหน้าจอ:

หมายเหตุ: หากคุณต้องการใส่ผลลัพธ์ลงในเซลล์อื่นแทนเซลล์เดิมโปรดยกเลิกการเลือก แปลงแหล่งที่มา ช่วงและเลือกเซลล์ที่คุณต้องการส่งออกผลลัพธ์จากช่วงผลลัพธ์ตามภาพหน้าจอต่อไปนี้:

คลิกเพื่อดาวน์โหลด Kutools สำหรับ Excel และทดลองใช้ฟรีทันที!

แปลง URL ข้อความจำนวนมากให้เป็นไฮเปอร์ลิงก์ที่ใช้งานอยู่ด้วยรหัส VBA

โค้ด VBA ด้านล่างยังสามารถช่วยคุณแก้ปัญหานี้ได้โปรดทำตามนี้:

1. กด ALT + F11 คีย์เพื่อเปิด Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง

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. จากนั้นคลิก OK ปุ่ม URL ข้อความธรรมดาถูกแปลงเป็นไฮเปอร์ลิงก์ที่ใช้งานอยู่ดูภาพหน้าจอ: