ค้นหาเว็บไซต์

วิธีเชื่อมโยงกล่องกาเครื่องหมายกับหลายเซลล์ใน Excel


เคล็ดลับด่วน
  • กล่องกาเครื่องหมายเพิ่มความโต้ตอบที่ดีให้กับ Excel แต่การเชื่อมโยงมากกว่าสองสามอันกับหลายเซลล์อาจทำให้เหนื่อยเล็กน้อย
  • ในการทำงานอัตโนมัติ คุณสามารถใช้ VBA ได้
  • VBA สามารถใช้เพื่อเชื่อมโยงหรือเพิ่มช่องทำเครื่องหมายจำนวนมากได้

กล่องกาเครื่องหมายเป็นเครื่องมือตอบสนองที่ยอดเยี่ยมใน Microsoft Excel และทำให้ทุกอย่างใช้งานได้ง่ายขึ้นมาก คุณอาจคุ้นเคยกับแนวคิดของการเชื่อมโยงกล่องกาเครื่องหมายเพียงหนึ่งกับเซลล์เดียว แต่ถ้าเราบอกคุณว่ามีวิธี (หลายวิธีจริง ๆ) ที่ทำให้กระบวนการทั้งหมดเร็วขึ้นล่ะ?

ในบทความนี้ เราจะแสดงวิธีการเชื่อมกล่องกาเครื่องหมายกับหลายเซลล์ใน Excel อย่างง่ายดาย

วิธีเชื่อมโยงกล่องกาเครื่องหมายกับหลายเซลล์ใน Excel

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

การเชื่อมโยงด้วยตนเองโดยการควบคุมฟอร์ม

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

ขั้นตอนที่ 1. คลิกที่แท็บ “นักพัฒนา (Developer)” ใน Excel แล้วคลิกปุ่ม “แทรก (Insert)” หากใช้ Microsoft 365 คุณสามารถแทรกกล่องกาเครื่องหมายได้โดยตรงจากแท็บ “แทรก (Insert)”

ขั้นตอนที่ 2. เลือก “ช่องเลือก” จากรายการแบบเลื่อนลง

ขั้นตอนที่ 3. การเชื่อมกล่องกับเซลล์ ให้ (กด Ctrl + คลิก) มัน

ขั้นตอนที่ 4. เมื่อเสร็จแล้ว พิมพ์ “= ” ลงในช่องสูตร จากนั้นคลิกที่เซลล์เพื่อลิงก์ กด “Enter” เมื่อเสร็จแล้ว

ขั้นตอนที่ 5. เซลล์ของคุณตอนนี้ควรแสดงค่าจริง/เท็จของช่องทำเครื่องหมายแล้ว

ช่องทำเครื่องหมายลิงก์จำนวนมาก

สำหรับเทคนิคที่เหลือ คุณจะต้องพึ่งพาด้านการเขียนโค้ดของ Excel, Visual Basic for Applications (VBA) หากคุณมีรายการช่องทำเครื่องหมายยาว ๆ นี่คือวิธีเชื่อมโยงพวกมันกับหลายเซลล์ที่อยู่ติดกันโดยอัตโนมัติ:

ขั้นตอนที่ 1. เปิดตัวแก้ไข VBA (Alt + F11) และเลือกแผ่นงานหรือสมุดงานของคุณในแผงด้านข้าง

ขั้นตอนที่ 2. คลิก “แทรก” ในเมนูด้านบน จากนั้นคลิก “โมดูล”

ขั้นตอนที่ 3. วางมาโครต่อไปนี้ลงในโมดูลใหม่:

ซับลิงก์ LinkCheckBoxes_ToOffset()

Dim chk As CheckBox

Dim lCol As Long

lCol=1

สำหรับแต่ละ chk ใน ActiveSheet.CheckBoxes

chk.LinkedCell=chk.TopLeftCell.Offset(0, lCol).Address

ตรวจสอบถัดไป

จบฟังก์ชัน

โปรดทราบว่าตัวเลข ICol สามารถปรับได้ โดย 0 หมายถึงเซลล์ใต้ช่องทำเครื่องหมาย และ 2 หมายถึงสองคอลัมน์ทางขวา

ขั้นตอนที่ 4. บันทึกโมดูลและสมุดงาน จากนั้นคลิกที่เซลล์ที่มีช่องทำเครื่องหมาย

ขั้นตอนที่ 5. กด (Alt + F8) เพื่อเรียกใช้งานโมดูล คลิก “Run” เพื่อเชื่อมทุกช่องทำเครื่องหมายกับเซลล์ทางขวาของมันทันที

ขั้นตอนที่ 6. จากนั้นกระบวนการควรเชื่อมโยงกล่องตรวจสอบทั้งหมดกับคอลัมน์ของเซลล์ที่สอดคล้องกัน

สร้างช่องทำเครื่องหมายจำนวนมาก

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

ขั้นตอนที่ 1. เปิด VBA และเพิ่มโมดูลใหม่ในลักษณะเดียวกับที่ทำด้านบน

ขั้นตอนที่ 2. ป้อนมาโครต่อไปนี้

ซับ BulkAddCheckboxes_LinkByRow()

ประกาศตัวแปร i เป็นชนิด Long

สำหรับ i=2 ถึง 300

กับ ActiveSheet.CheckBoxes.Add( _

เซลล์(i, "A").Left, _

เซลล์(i, "A").Top, _

72, 17.25)

.Value=xlOff

.LinkedCell="B " & i

การแสดงเงา 3 มิติ = เท็จ

จบด้วย

ต่อไปฉัน

จบฟังก์ชัน

ขั้นตอนที่ 3. สิ่งนี้จะสร้างแถวของกล่องกาเครื่องหมายและเซลล์ที่เชื่อมโยงกันจำนวน 300 แถว คุณสามารถเปลี่ยนจำนวนตามที่คุณต้องการได้ คุณยังสามารถเปลี่ยนคอลัมน์จาก A และ B เป็นคอลัมน์อื่นๆ ตามที่คุณเลือกได้โดยการปรับสคริปต์มาโคร

บทความที่เกี่ยวข้อง