Note: The other languages of the website are Google-translated. Back to English
English English

วิธีการเชื่อมโยงหลายมิติปุ่มคำสั่งไปยังที่อยู่ URL ใน Excel

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

ไฮเปอร์ลิงก์ปุ่มคำสั่งไปยังที่อยู่ URL ด้วยรหัส VBA


ลูกศรสีฟ้าฟองขวา ไฮเปอร์ลิงก์ปุ่มคำสั่งไปยังที่อยู่ URL ด้วยรหัส VBA

หากต้องการไฮเปอร์ลิงก์ปุ่มคำสั่งโปรดทำตามขั้นตอนต่อไปนี้:

1. คลิก ผู้พัฒนา > สิ่งที่ใส่เข้าไป > ปุ่มคำสั่ง (ActiveX Control)จากนั้นวาดปุ่มตามภาพหน้าจอต่อไปนี้:

ปุ่มคำสั่ง doc hyperlink 1

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

ปุ่มคำสั่ง doc hyperlink 2

3. จากนั้นปิดกล่องโต้ตอบและคลิกขวาที่แท็บแผ่นงานซึ่งมีปุ่มคำสั่งแล้วเลือก ดูรหัส จากเมนูบริบทและในเปิด Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่างคัดลอกและวางรหัสต่อไปนี้ลงในโมดูลเปล่า:

รหัส VBA: เชื่อมโยงหลายมิติไปยังปุ่มคำสั่ง:

Private Sub CommandButton1_Click()
ActiveWorkbook.FollowHyperlink _
Address:=CommandButton1.Caption
End Sub

ปุ่มคำสั่ง doc hyperlink 3

หมายเหตุ: ในโค้ดด้านบน ปุ่มคำสั่ง1 เป็นชื่อของปุ่มคำสั่งที่สร้างขึ้นโปรดเปลี่ยนตามความต้องการของคุณ

4. จากนั้นบันทึกรหัสและออกจากไฟล์ โหมดการออกแบบตอนนี้เมื่อคุณคลิกปุ่มคำสั่งมันจะไปที่หน้าเว็บเฉพาะ

เคล็ดลับ: หากคำอธิบายภาพในปุ่มคำสั่งไม่ใช่ที่อยู่ URL จะเป็นเพียงสตริงข้อความตามภาพหน้าจอต่อไปนี้:

ปุ่มคำสั่ง doc hyperlink 4

คุณสามารถใช้รหัส VBA ด้านล่างเพื่อให้บรรลุ:

รหัส VBA: เชื่อมโยงหลายมิติไปยังปุ่มคำสั่ง:

Private Sub CommandButton1_Click()
ActiveWorkbook.FollowHyperlink _
Address:="https://www.extendoffice.com"
End Sub

ปุ่มคำสั่ง doc hyperlink 5

หมายเหตุ: ในโค้ดด้านบน ปุ่มคำสั่ง1 คือชื่อของปุ่มคำสั่งที่สร้างขึ้นและคุณควรแทนที่ที่อยู่เว็บไซต์ https://www.extendoffice.com ไปยังที่อยู่ URL ของคุณเอง


เครื่องมือเพิ่มประสิทธิภาพการทำงานในสำนักงานที่ดีที่สุด

Kutools สำหรับ Excel ช่วยแก้ปัญหาส่วนใหญ่ของคุณและเพิ่มผลผลิตของคุณได้ถึง 80%

  • นำมาใช้ใหม่: ใส่อย่างรวดเร็ว สูตรที่ซับซ้อนแผนภูมิ และสิ่งที่คุณเคยใช้มาก่อน เข้ารหัสเซลล์ ด้วยรหัสผ่าน; สร้างรายชื่อผู้รับจดหมาย และส่งอีเมล ...
  • ซุปเปอร์ฟอร์มูล่าบาร์ (แก้ไขข้อความและสูตรหลายบรรทัดได้อย่างง่ายดาย); การอ่านเค้าโครง (อ่านและแก้ไขเซลล์จำนวนมากได้อย่างง่ายดาย); วางลงในช่วงที่กรองแล้ว...
  • ผสานเซลล์ / แถว / คอลัมน์ โดยไม่สูญเสียข้อมูล แยกเนื้อหาของเซลล์ รวมแถว / คอลัมน์ที่ซ้ำกัน... ป้องกันเซลล์ซ้ำ; เปรียบเทียบช่วง...
  • เลือกซ้ำหรือไม่ซ้ำ แถว; เลือกแถวว่าง (เซลล์ทั้งหมดว่างเปล่า); Super Find และ Fuzzy Find ในสมุดงานจำนวนมาก สุ่มเลือก ...
  • สำเนาถูกต้อง หลายเซลล์โดยไม่เปลี่ยนการอ้างอิงสูตร สร้างการอ้างอิงอัตโนมัติ ถึงหลายแผ่น ใส่สัญลักษณ์แสดงหัวข้อย่อย, กล่องกาเครื่องหมายและอื่น ๆ ...
  • แยกข้อความ, เพิ่มข้อความ, ลบตามตำแหน่ง, ลบ Space; สร้างและพิมพ์ผลรวมย่อยของเพจ แปลงระหว่างเนื้อหาของเซลล์และความคิดเห็น...
  • ซุปเปอร์ฟิลเตอร์ (บันทึกและใช้โครงร่างตัวกรองกับแผ่นงานอื่น ๆ ); การเรียงลำดับขั้นสูง ตามเดือน / สัปดาห์ / วันความถี่และอื่น ๆ ตัวกรองพิเศษ โดยตัวหนาตัวเอียง ...
  • รวมสมุดงานและแผ่นงาน; ผสานตารางตามคอลัมน์สำคัญ แยกข้อมูลออกเป็นหลายแผ่น; Batch แปลง xls, xlsx และ PDF...
  • คุณสมบัติที่ทรงพลังมากกว่า 300 รายการ. รองรับ Office / Excel 2007-2019 และ 365 รองรับทุกภาษา ใช้งานง่ายในองค์กรหรือองค์กรของคุณ ทดลองใช้ฟรี 30 วันเต็ม รับประกันคืนเงิน 60 วัน
kte แท็บ 201905

แท็บ Office นำอินเทอร์เฟซแบบแท็บมาที่ Office และทำให้งานของคุณง่ายขึ้นมาก

  • เปิดใช้งานการแก้ไขและอ่านแบบแท็บใน Word, Excel, PowerPoint, ผู้จัดพิมพ์, Access, Visio และโครงการ
  • เปิดและสร้างเอกสารหลายรายการในแท็บใหม่ของหน้าต่างเดียวกันแทนที่จะเป็นในหน้าต่างใหม่
  • เพิ่มผลผลิตของคุณ 50% และลดการคลิกเมาส์หลายร้อยครั้งให้คุณทุกวัน!
ด้านล่าง officetab
จัดเรียงความคิดเห็นโดย
ความคิดเห็น (6)
ยังไม่มีการให้คะแนน เป็นคนแรกที่ให้คะแนน!
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
¿Cómo se podría hacer con un cuadro de texo? Es decir, que cualquier dirección web que se ponga en un cuadro de texto se puede abrir con un boton
กราเซีย
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
ขอบคุณ คุณช่วยแสดงวิธีเชื่อมโยง URL จากเซลล์บนชีตได้อย่างไร
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
Gracias me sirvió เต็ม
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
ขอบคุณมาก
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
Kan je dit ook gebruiken om met een druk van de knop naar bovenaan een sheet te gaan?
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
สวัสดีคุณเรเวอร์
หากต้องการคลิกปุ่มเพื่อไปยังด้านบนของเวิร์กชีต โปรดใช้รหัสด้านล่าง:
Private Sub CommandButton1_Click()
ActiveSheet.Range("A1").Select
End Sub

โปรดลอง หวังว่าจะช่วยคุณได้!
มีความคิดเห็นยังไม่มีการโพสต์ที่นี่
แสดงความคิดเห็นของคุณ
โพสต์ในฐานะแขก
×
ให้คะแนนโพสต์นี้:
0   ตัวอักษร
สถานที่แนะนำ