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

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

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

เชื่อมโยงช่องทำเครื่องหมายกับเซลล์หลายเซลล์ด้วยสูตรทีละเซลล์

เชื่อมโยงช่องทำเครื่องหมายกับหลายเซลล์พร้อมกันด้วยรหัส VBA


ลูกศรสีฟ้าฟองขวา เชื่อมโยงช่องทำเครื่องหมายกับเซลล์หลายเซลล์ด้วยสูตรทีละเซลล์

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

1. หลังจากใส่ช่องทำเครื่องหมายในแผ่นงานของคุณแล้วหากต้องการเลือกช่องทำเครื่องหมายโปรดกด Ctrl จากนั้นคลิกช่องทำเครื่องหมายแรกที่คุณต้องการเชื่อมโยงไปยังเซลล์อื่น

2. จากนั้นในแถบสูตรพิมพ์เครื่องหมายเท่ากับ =จากนั้นคลิกเซลล์หนึ่งเซลล์ที่คุณต้องการเชื่อมโยงช่องทำเครื่องหมายเช่น B2 ดูภาพหน้าจอ:

doc-link-multiple-checkboxes-1

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

doc-link-multiple-checkboxes-2

4. ทำตามขั้นตอนข้างต้นซ้ำเพื่อเชื่อมโยงช่องทำเครื่องหมายอื่น ๆ ทีละช่อง


ลูกศรสีฟ้าฟองขวา เชื่อมโยงช่องทำเครื่องหมายกับหลายเซลล์พร้อมกันด้วยรหัส VBA

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

1. ไปที่แผ่นงานของคุณพร้อมกับรายการช่องทำเครื่องหมาย

2. กด ALT + F11 คีย์เพื่อเปิด หน้าต่าง Microsoft Visual Basic for Applications.

3. คลิก สิ่งที่ใส่เข้าไป > โมดูลและวางรหัสต่อไปนี้ในไฟล์ หน้าต่างโมดูล.

รหัส VBA: เชื่อมโยงช่องทำเครื่องหมายไปยังเซลล์หลายเซลล์พร้อมกัน

Sub LinkChecks()
'Update by Extendoffice
Dim xCB
Dim xCChar
i = 2
xCChar = "B"
For Each xCB In ActiveSheet.CheckBoxes
If xCB.Value = 1 Then
    Cells(i, xCChar).Value = True
Else
    Cells(i, xCChar).Value = False
End If
xCB.LinkedCell = Cells(i, xCChar).Address
i = i + 1
Next xCB
End Sub

4. จากนั้นกด F5 คีย์เพื่อเรียกใช้รหัสนี้ช่องทำเครื่องหมายทั้งหมดในแผ่นงานที่ใช้งานได้ถูกเชื่อมโยงกับเซลล์เมื่อคุณเลือกช่องทำเครื่องหมายเซลล์สัมพัทธ์จะแสดง TRUEถ้าคุณล้างกล่องกาเครื่องหมายเซลล์ที่เชื่อมโยงจะแสดงขึ้น FALSEดูภาพหน้าจอ:

doc-link-multiple-checkboxes-3

หมายเหตุ: ในโค้ดด้านบน i = 2, จำนวน 2 คือแถวเริ่มต้นของช่องทำเครื่องหมายและตัวอักษร B คือตำแหน่งคอลัมน์ที่คุณต้องการเชื่อมโยงช่องทำเครื่องหมาย คุณสามารถเปลี่ยนได้ตามความต้องการของคุณ


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

วิธีเลือกช่องทำเครื่องหมายทั้งหมดโดยใช้ช่องทำเครื่องหมายเดียวใน Excel

วิธีแทรกช่องทำเครื่องหมายหลายช่องใน Excel อย่างรวดเร็ว

วิธีลบช่องทำเครื่องหมายหลายช่องใน Excel อย่างรวดเร็ว


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

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
จัดเรียงความคิดเห็นโดย
ความคิดเห็น (16)
ยังไม่มีการให้คะแนน เป็นคนแรกที่ให้คะแนน!
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
ฉันมีเซลล์มากกว่า 40000 เซลล์ที่มีช่องทำเครื่องหมาย เมื่อฉันใช้รหัสนี้ การประมวลผลใช้เวลานานกว่า 5 วินาที ฉันกำหนดมาโครที่แตกต่างกันสำหรับเซลล์ต่างๆ แต่ฉันยังมีปัญหาอยู่ ฉันควรทำอย่างไร
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
สวัสดี ในโค้ด VBA ของคุณ: ช่องทำเครื่องหมายลิงก์ไปยังหลายเซลล์ในคราวเดียว รหัสได้รับการตั้งค่าให้ลิงก์เซลล์ด้านล่าง โค้ดจะเป็นอย่างไรหากฉันต้องการลิงก์เซลล์ทางด้านซ้ายของช่องแรก ขอบคุณ!
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
ฉันสามารถทำสิ่งนี้และตั้งโปรแกรมกล่องให้พูดอย่างอื่นที่ไม่ใช่จริงหรือเท็จได้ไหม
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
สวัสดี! โพสต์ที่ดีเกี่ยวกับ VBA... แต่ถ้ามี 3 คอลัมน์ที่มีช่องทำเครื่องหมายที่ต้องเชื่อมโยงในคอลัมน์อื่นอีกสามคอลัมน์ด้วยล่ะ สมมติว่าคอลัมน์ B, C และ D มีช่องทำเครื่องหมายและควรเชื่อมโยงกับคอลัมน์ H, I และ J ตามลำดับ
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
สวัสดี มีปัญหาเดียวกัน - คุณได้ค้นพบวิธีแก้ไขปัญหานี้หรือไม่? ขอบคุณ พอล
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
Hey,

ลองสิ่งนี้:

ลิงค์ย่อยกล่องกาเครื่องหมาย()
Dim chk เป็นช่องทำเครื่องหมาย
ติ่มซำตราบนานเท่านาน
lCol = 2 'จำนวนคอลัมน์ทางขวาสำหรับลิงค์

สำหรับแต่ละ chk ใน ActiveSheet.CheckBoxes
ด้วย chk
.LinkedCell = _
.TopLeftCell.Offset(0, lCol).Address
จบด้วย
ถัดไป chk

ย่อยสิ้นสุด



ถ้าคุณมี ตัวอย่างเช่น ช่องทำเครื่องหมายใน D,E,F เปลี่ยน "Icol" เป็น 1 เพื่อให้ลิงก์ไปยัง G,H และ I ตามลำดับ
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
ขอบคุณมาก
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
คุณช่วยฉันด้วยปัญหาเดียวกันนี้ได้ไหม
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
สวัสดี ฉันมีปัญหาเดียวกัน แต่ไม่ได้ผลสำหรับฉัน คุณช่วยกรุณาได้ไหม ขอบคุณ
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
ลิงค์ย่อยกล่องกาเครื่องหมาย()

Dim chk เป็นช่องทำเครื่องหมาย

ติ่มซำตราบนานเท่านาน

lCol = 1 'จำนวนคอลัมน์ทางขวาสำหรับลิงค์



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

ด้วย chk

.LinkedCell = _

.TopLeftCell.Offset(0, lCol).Address

จบด้วย

ถัดไป chk



ย่อยสิ้นสุด
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
ถ้าคุณมีแถวว่างใน ColumnA (ตามตัวอย่างของคุณ) ระหว่างช่องทำเครื่องหมายล่ะ การใช้โค้ดด้านบนจะทำให้เซลล์ที่ลิงก์ผิด หากมีแถวว่างเนื่องจากไม่ได้ข้ามเซลล์ดังกล่าว สนใจดูวิธีแก้ปัญหา
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
คุณพบวิธีแก้ปัญหานี้หรือไม่? ปัญหาเดียวกัน
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
เธรดที่ดีและใช้งานได้สำหรับฉัน
แต่ฉันต้องบันทึกข้อมูล TRUE/FALSE ลงในชีตอื่น VBA ใดที่จะบันทึกลงในชีตอื่นที่ไม่ใช่ชีตที่ใช้งานอยู่
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
สวัสดี
ปัทสกาจิเต. Возможно ли суммирование чисел в ячейках по установке флажка?

https://drive.google.com/file/d/1qmEnngPDdgWTISJETJ44IkxG-MABfqhh/view?usp=sharing[/img][/b][/u][/b

В ячейке F3 скрыто число 2 а в ячейке G3 скрыто число 0,3, можно ли сделать так чтоб при установки гатановки гаможно ли сделать так чтоб при установки гатановки гайке
Сумма вычислений только на строку в диапазоне F3-P3
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
ปัญหาของฉันคือ: ฉันกำลังสร้างรายการสิ่งที่ต้องทำด้วยนิสัยประจำวัน ฉันต้องการสร้างสถิติจากมันโดยใช้จริงและเท็จจากการทำเครื่องหมายในช่องที่เชื่อมโยงกับเซลล์ แต่ไม่ต้องการทำทีละรายการ แต่เมื่อฉันใช้รหัสไม่มีอะไรเกิดขึ้น
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
สวัสดี เกรเกอร์
รหัส VBA ทำงานได้ดีในสมุดงานของฉัน
คุณสามารถอัปโหลดไฟล์ของคุณที่นี่ เพื่อให้เราตรวจสอบว่าปัญหาอยู่ที่ใด
ขอขอบคุณ!
มีความคิดเห็นยังไม่มีการโพสต์ที่นี่
แสดงความคิดเห็นของคุณ
โพสต์ในฐานะแขก
×
ให้คะแนนโพสต์นี้:
0   ตัวอักษร
สถานที่แนะนำ