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

วิธีข้ามเซลล์หรือคอลัมน์เมื่อแท็บใน Excel

ตามค่าเริ่มต้นการกดแป้น Tab ใน Excel จะย้ายจากเซลล์ไปยังเซลล์ถัดไปในแนวนอน สำหรับผู้ใช้ Excel บางรายพวกเขามักจะข้ามเซลล์เมื่อแท็บใน Excel ตัวอย่างเช่นเซลล์ A1 กำลังเลือกตอนนี้หลังจากกดปุ่ม Tab มันจะข้ามไปยังเซลล์ C1 โดยตรงโดยข้ามเซลล์ B1 และการกดปุ่ม Tab อีกครั้งจะข้ามเซลล์ D1 และย้ายไปที่ E1 ตามภาพด้านล่างที่แสดง จะบรรลุได้อย่างไร? วิธีการในบทความนี้สามารถช่วยคุณได้

ข้ามเซลล์หรือคอลัมน์เมื่อแท็บด้วยรหัส VBA

แท็บ Office เปิดใช้งานการแก้ไขและเรียกดูแบบแท็บใน Office และทำให้งานของคุณง่ายขึ้นมาก ...
Kutools สำหรับ Excel ช่วยแก้ปัญหาส่วนใหญ่ของคุณและเพิ่มผลผลิตของคุณได้ถึง 80%
  • ใช้ซ้ำอะไรก็ได้: เพิ่มสูตรที่ใช้มากที่สุดหรือซับซ้อนแผนภูมิและสิ่งอื่นใดในรายการโปรดของคุณและนำกลับมาใช้ใหม่ได้อย่างรวดเร็วในอนาคต
  • คุณสมบัติข้อความมากกว่า 20 รายการ: แยกหมายเลขจากสตริงข้อความ แยกหรือลบบางส่วนของข้อความ แปลงตัวเลขและสกุลเงินเป็นคำภาษาอังกฤษ
  • ผสานเครื่องมือ: สมุดงานและแผ่นงานหลายเล่มเป็นหนึ่งเดียว ผสานหลายเซลล์ / แถว / คอลัมน์โดยไม่สูญเสียข้อมูล รวมแถวและผลรวมที่ซ้ำกัน
  • แยกเครื่องมือ: แยกข้อมูลออกเป็นหลายแผ่นตามมูลค่า; สมุดงานหนึ่งเล่มเป็นไฟล์ Excel, PDF หรือ CSV หลายไฟล์ หนึ่งคอลัมน์ถึงหลายคอลัมน์
  • วางการข้าม แถวที่ซ่อน / กรอง; นับและผลรวม โดย Background Color; ส่งอีเมลส่วนบุคคลไปยังผู้รับหลายคนในกลุ่ม
  • ซุปเปอร์กรอง: สร้างโครงร่างตัวกรองขั้นสูงและใช้กับแผ่นงานใด ๆ ประเภท ตามสัปดาห์วันความถี่และอื่น ๆ กรอง by ตัวหนาสูตรคอมเม้น ...
  • คุณสมบัติที่ทรงพลังมากกว่า 300 รายการ ทำงานร่วมกับ Office 2007-2019 และ 365; รองรับทุกภาษา ใช้งานง่ายในองค์กรหรือองค์กรของคุณ

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


โปรดทำดังนี้เพื่อข้ามเซลล์หรือคอลัมน์เมื่อแท็บใน Excel โดยใช้รหัส VBA

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

2. ในการเปิด Microsoft Visual Basic สำหรับแอปพลิเคชัน โปรดคัดลอกและวางโค้ด VBA ด้านล่างลงในหน้าต่างรหัส

รหัส VBA: ข้ามเซลล์หรือคอลัมน์เมื่อแท็บใน Excel

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Static sRg As Range
    Dim ColumnOffset As Integer
    If Target.Count > 1 Then Exit Sub
    If Not Intersect(Target, Union([B:B], [D:D], [F:F])) Is Nothing Then
        With Target
        Application.EnableEvents = False
        If Not sRg Is Nothing Then
            If sRg.Column < .Column Then
                ColumnOffset = 1
            ElseIf .Column <> 1 Then
                ColumnOffset = -1
            End If
        Else
            ColumnOffset = 1
        End If
        .Offset(, ColumnOffset).Select
        Application.EnableEvents = True
        End With
    End If
    Set sRg = ActiveCell
End Sub

หมายเหตุ: ในรหัส [B: B], [D: D], [F: F] คือคอลัมน์ที่คุณจะข้ามเมื่อกดแป้น Tab คุณสามารถเปลี่ยนได้ตามต้องการและคุณสามารถเพิ่มคอลัมน์ใหม่ที่คุณต้องข้ามไปยังโค้ดได้

3 กด อื่น ๆ + Q ปุ่มเพื่อออกจากไฟล์ Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง

นับจากนี้เป็นต้นไปเมื่อแท็บใน 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
จัดเรียงความคิดเห็นโดย
ความคิดเห็น (7)
ยังไม่มีการให้คะแนน เป็นคนแรกที่ให้คะแนน!
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
รหัสใช้งานได้เฉพาะใน 2 แถวแรกในสเปรดชีต - เมื่อฉันวนรอบไปที่แถวที่ 3 แล้วเซลล์ "ข้าม" ที่กำหนดจะไม่ถูกข้ามอีกต่อไป - ดังนั้นโปรดปิดสิ่งนี้ โปรดแนะนำ มองหารหัสนี้ตลอดไป - ขอบคุณ
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
สวัสดี ลอนนี่ นาเกล
ฉันลองใช้รหัสและใช้งานได้กับทั้งแผ่นงาน คุณใช้ Excel เวอร์ชันใดอยู่
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
สวัสดี สิ่งนี้ใช้ได้กับสองคอลัมน์แรกของสเปรดชีตเท่านั้น (เช่น B:B และ D: D) จะใช้ไม่ได้กับคอลัมน์ที่สาม (เช่น H:H) หรือที่ตามมา ต้องเป็นข้อจำกัดใช่หรือไม่ มีวิธีใดบ้าง? - ฉันมี excel 2016
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
สวัสดีสตีฟ
ฉันได้ทดสอบโค้ดใน Excel 2016 และใช้งานได้ คุณต้องการแนบสำเนาของไฟล์ข้อมูลของคุณหรือไม่? ขออภัยในความไม่สะดวก.
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
ได้สิ ถ้าคุณสามารถให้ที่อยู่อีเมลที่จะส่งไปให้ฉันได้ไหม ของฉันคือ itginternet AT gmail คอม
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
ไม่เป็นไร ฉันตอบกลับอีเมลของคุณใน gmail แล้ว
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
คุณจะข้ามหลายคอลัมน์พร้อมกันโดยใช้สูตรนี้ได้อย่างไร คือฉันต้องการข้ามคอลัมน์ A, H และ M ไปยัง P
มีความคิดเห็นยังไม่มีการโพสต์ที่นี่
แสดงความคิดเห็นของคุณ
โพสต์ในฐานะแขก
×
ให้คะแนนโพสต์นี้:
0   ตัวอักษร
สถานที่แนะนำ