ใน Excel ฉันมีคอลัมน์ลิงก์ที่แสดงข้อความแทนที่จะเป็นลิงก์จริง
ฉันต้องการลิงค์จริงๆมีวิธีในการแปลงทั้งคอลัมน์เป็นจำนวนมากเพื่อให้มีการแสดงลิงก์หรือไม่ ไม่เช่นนั้นฉันจะต้องคลิกที่แต่ละลิงก์เปิดในเบราว์เซอร์และคัดลอกและวางที่อยู่ ...
นอกจากนี้ฉันอยู่ใน Excel 2008 สำหรับ Mac ดังนั้นดูเหมือนว่าฉันไม่สามารถทำมาโคร ...
คำตอบ:
คำตอบสั้น ๆ :คุณไม่สามารถทำสิ่งนี้โดยอัตโนมัติโดยไม่ใช้ VBA
นี่คือคอมพิวเตอร์ที่ใช้ Windows 7 เพียงแทนที่ทางลัดด้วย Mac ที่เกี่ยวข้อง
นี่คือวิธีแก้ปัญหา VBA สำหรับผู้ที่สามารถใช้งานได้
สร้างโมดูล VBA ด้วยรหัสต่อไปนี้:
Public Function GetURL(c As Range) As String
On Error Resume Next
GetURL = c.Hyperlinks(1).Address
End Function
วิธีใช้ใส่สิ่งต่อไปนี้ลงในเซลล์ใดก็ได้:
=GetURL(A1)
โดยที่ A1 ประกอบด้วยไฮเปอร์ลิงก์
ฟังก์ชั่นที่ทำงาน:
นี่อาจฟังดูคล้ายกับวิธีเดรัจฉาน แต่มันเป็นวิธีที่ดีที่สุดที่ฉันคิดไว้ (ฉันค้นพบหน้านี้เมื่อฉันมีคำถามเดียวกันด้วยตัวเองชั่วโมงที่แล้ว ... คุณสามารถใช้เวลาทั้งวันในการดู แต่บางครั้งมันก็ง่ายกว่าที่จะทำและทำได้ด้วย)
1) คัดลอกและวางเฉพาะเซลล์ที่มีไฮเปอร์ลิงก์ไปยังสเปรดชีตใหม่
2) ส่งออกสเปรดชีตคลิก "เปลี่ยนประเภทไฟล์" เลือก "บันทึกเป็นประเภทไฟล์อื่น" และบันทึกเป็นหน้าเว็บ (หรือไฟล์ HTML)
3) เปิดหน้าเว็บในเบราว์เซอร์ของคุณและดูแหล่งที่มา
4) คัดลอกและวางต้นฉบับลงในโปรแกรมแก้ไขข้อความ
5) ใช้ฟังก์ชั่นค้นหา / แทนที่ตัวแก้ไขข้อความลบข้อความนำหน้าและต่อท้ายของแต่ละไฮเปอร์ลิงก์ (กล่าวอีกนัยหนึ่งให้แทนที่ข้อความที่กล่าวโดยไม่มีอะไรเลย: "") โปรดทราบว่าข้อความนี้ควรเหมือนกันสำหรับแต่ละไฮเปอร์ลิงก์
6) ตอนนี้คุณควรมีไฟล์ข้อความที่ไม่มีอะไรนอกจากไฮเปอร์ลิงก์ คัดลอกและวางตามต้องการกลับไปที่สเปรดชีตดั้งเดิมของคุณหรือใช้อย่างไรก็ตาม / ทุกที่ที่คุณต้องการ
แก้ไขแล้วเพื่อระบุว่าคุณสามารถส่งออกไปยังไฟล์แยกต่างหากที่เป็น HTM ได้ ปิดไฟล์และเปิดใหม่ใน Excel อีกครั้งและจะแก้ปัญหาได้ สูตร = ไฮเปอร์ลิงก์หายไปและลิงก์จะถูกแปลงเป็นลิงก์ปกติ วิธีนี้ช่วยฉันชั่วโมงและตายง่ายและฉันไม่ต้องจัดการกับสคริปต์หรือสูตรหรือ VBA หรือ Macros
ฉันใช้ mac และสิ่งนี้ใช้ได้กับฉัน: คอลัมน์ไฮไลต์ที่คุณต้องแปลงในเมนูแทรกให้เปิด "ไฮเปอร์ลิงก์" ลบข้อความใด ๆ ที่ปรากฏในกล่องแสดงผล มันจะพูดว่า "[เลือกหลายเซลล์]" ถ้าข้อความที่แสดงของคุณแตกต่างกันในแต่ละเซลล์ เมื่อคุณคลิกตกลงเฉพาะลิงก์จะปรากฏบนแผ่นงานของคุณ หากคุณต้องการแปลงแต่ละเซลล์แทนที่จะเป็นทั้งคอลัมน์ให้ไฮไลต์เซลล์ทั้งหมดที่คุณต้องการแปลงคลิกขวาเลือก "แก้ไขไฮเปอร์ลิงก์" และทำตามขั้นตอนเดียวกันเพื่อลบข้อความในกล่องแสดงผล
ฉันแน่ใจว่ามีกับ VBA แต่ในเวลาเฉลี่ยคลิกขวา H และคัดลอกและวางที่อยู่ลงในหน้าจอเพื่อแสดงกล่อง
ในปีที่ผ่านมาเนื่องจากมีคนถามคำถามนี้ Excel ได้เพิ่ม=GetURL(cell)ฟังก์ชั่นเพื่อให้คุณสามารถทำสิ่งนี้โดยไม่มี VBA ของคุณเอง