วิธีแยกการเชื่อมโยงหลายมิติจากภาพหลายภาพใน Excel
สมมติว่าคุณมีรายการรูปภาพในแผ่นงานและแต่ละภาพมีไฮเปอร์ลิงก์ตอนนี้คุณต้องการแยกที่อยู่ไฮเปอร์ลิงก์จริงจากรูปภาพเหล่านี้ไปยังเซลล์ถัดไปตามภาพหน้าจอต่อไปนี้ แน่นอนคุณสามารถคัดลอกที่อยู่ไฮเปอร์ลิงก์จากไฟล์ แก้ไขไฮเปอร์ลิงก์ ทีละกล่อง แต่จะใช้เวลานานหากมีการเชื่อมโยงหลายมิติที่จำเป็นในการแยก ในบทความนี้ฉันจะแนะนำวิธีการบางอย่างในการแก้ปัญหานี้อย่างรวดเร็วและง่ายดายใน Excel
แยกการเชื่อมโยงหลายมิติจากภาพหลายภาพด้วยรหัส VBA
แยกการเชื่อมโยงหลายมิติจากภาพหลายภาพด้วยรหัส VBA
รหัส VBA ต่อไปนี้สามารถช่วยคุณแยกที่อยู่จริงจากภาพไฮเปอร์ลิงก์หลายภาพพร้อมกันได้โปรดทำทีละขั้นตอน:
1. กด ALT + F11 ใน Excel เพื่อเปิดไฟล์ Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง
2. คลิก สิ่งที่ใส่เข้าไป > โมดูลและวางรหัสต่อไปนี้ในหน้าต่างโมดูล
รหัส VBA: ดึงที่อยู่จริงจากภาพที่เชื่อมโยงหลายมิติ
Sub ExtractHyperlinkFromPicture()
'updateby Extendoffice
Dim xSh As Shape
Dim xScreen As Boolean
xScreen = Application.ScreenUpdating
Application.ScreenUpdating = False
For Each xSh In ActiveSheet.Shapes
If xSh.Type = msoPicture Then
On Error Resume Next
Range(xSh.TopLeftCell.Address).Offset(0, 3).Value = xSh.Hyperlink.Address
On Error GoTo 0
End If
Next
Application.ScreenUpdating = xScreen
End Sub
3. จากนั้นกด F5 กุญแจสำคัญในการเรียกใช้รหัสนี้และที่อยู่ของไฮเปอร์ลิงก์ทั้งหมดได้ถูกแยกลงในเซลล์ที่เกี่ยวข้องข้างรูปภาพดูภาพหน้าจอ:
หมายเหตุ: รหัสนี้จะดึงข้อมูลที่อยู่จริงจากภาพทั้งหมดในแผ่นงานปัจจุบัน
สุดยอดเครื่องมือเพิ่มผลผลิตในสำนักงาน
เพิ่มพูนทักษะ Excel ของคุณด้วย Kutools สำหรับ Excel และสัมผัสประสิทธิภาพอย่างที่ไม่เคยมีมาก่อน Kutools สำหรับ Excel เสนอคุณสมบัติขั้นสูงมากกว่า 300 รายการเพื่อเพิ่มประสิทธิภาพและประหยัดเวลา คลิกที่นี่เพื่อรับคุณสมบัติที่คุณต้องการมากที่สุด...
แท็บ Office นำอินเทอร์เฟซแบบแท็บมาที่ Office และทำให้งานของคุณง่ายขึ้นมาก
- เปิดใช้งานการแก้ไขและอ่านแบบแท็บใน Word, Excel, PowerPoint, ผู้จัดพิมพ์, Access, Visio และโครงการ
- เปิดและสร้างเอกสารหลายรายการในแท็บใหม่ของหน้าต่างเดียวกันแทนที่จะเป็นในหน้าต่างใหม่
- เพิ่มประสิทธิภาพการทำงานของคุณ 50% และลดการคลิกเมาส์หลายร้อยครั้งให้คุณทุกวัน!
