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

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

สมมติว่าคุณต้องตั้งค่าลำดับแท็บสำหรับเซลล์ที่คุณกำหนด เช่น กดแป้น Tab เพื่อย้ายจากเซลล์ B5 ไปยัง C6 จาก C6 ไปที่ D7 จาก D7 เป็น E8 จากนั้นให้กลับไปที่ B5 เมื่อออกจากเซลล์ E8 ในเวิร์กชีต ดังภาพหน้าจอด้านล่างที่แสดง จะบรรลุเป้าหมายได้อย่างไร? บทความนี้มีวิธีการ VBA สำหรับคุณ

ตั้งค่าลำดับแท็บของเซลล์หรือเซลล์ที่ปลดล็อคด้วยรหัส VBA


ตั้งค่าลำดับแท็บของเซลล์หรือเซลล์ที่ปลดล็อคด้วยรหัส VBA


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

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

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

รหัส VBA: ตั้งค่าลำดับแท็บของเซลล์หรือเซลล์ที่ปลดล็อค

Private Sub Worksheet_Change(ByVal Target As Range)
    Dim tabArray As Variant
    Dim i As Long
    tabArray = Array("B5", "C6", "D7", "E8")
    Application.ScreenUpdating = False
    For i = LBound(tabArray) To UBound(tabArray)
        If tabArray(i) = Target.Address(0, 0) Then
            If i = UBound(tabArray) Then
                Me.Range(tabArray(LBound(tabArray))).Select
            Else
                Me.Range(tabArray(i + 1)).Select
            End If
        End If
    Next i
    Application.ScreenUpdating = True
End Sub

หมายเหตุ:

1) ในรหัส B5, C6, D7, E8 คือลำดับของเซลล์อินพุตและคุณต้องใช้อักษรตัวพิมพ์ใหญ่ของที่อยู่เซลล์ คุณสามารถเปลี่ยนแปลงได้ตามความต้องการของคุณ
2) สำหรับแผ่นงานที่ได้รับการป้องกันเซลล์อินพุตจะต้องถูกปลดล็อก

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

จากนี้เป็นต้นไปหลังจากป้อนข้อมูลใน B5 เคอร์เซอร์จะไปที่ C6 โดยกดปุ่ม Tab หรือ Enter จากนั้นไปที่ D7 เมื่อออกจาก C6 จากนั้นย้ายไปที่ D7, E8 ในแผ่นงานปัจจุบัน


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


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

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
จัดเรียงความคิดเห็นโดย
ความคิดเห็น (14)
ยังไม่มีการให้คะแนน เป็นคนแรกที่ให้คะแนน!
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
สามารถใช้เพื่อบังคับแท็บไปยังเซลล์ที่ปลดล็อกถัดไปในเวิร์กชีตได้หรือไม่ ตัวอย่างเช่น ฉันต้องการให้โอเปอเรเตอร์ป้อน (สแกน) ข้อมูลลงในเซลล์ A15 จากนั้นจึงควรแท็บไปที่ C15 ตามด้วย E15 ตามด้วย G15 (ซึ่งเป็นจุดสิ้นสุดของแถว) จากนั้นกลับไปที่เซลล์แรกในเซลล์ถัดไป แถว A16 แล้วทำซ้ำตามลำดับ ฉันต้องบังคับรูปแบบนี้เนื่องจากโอเปอเรเตอร์บางตัวใช้สแกนเนอร์ที่ตั้งโปรแกรมให้แท็บ และตัวอื่นๆ ถูกตั้งโปรแกรมให้ป้อน ขอบคุณ!!
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
เป็นไปได้ไหมที่จะใช้รหัสเดียวกันนี้เพื่อบังคับแท็บข้ามแต่ละแถวไปยังแต่ละเซลล์ที่ไม่มีการป้องกัน ฉันต้องการแท็บโดยเริ่มที่เซลล์ A15 จากนั้นจึงย้ายไปยังเซลล์ที่ไม่ได้รับการป้องกันถัดไป (C15) ตามด้วย E15 ตามด้วย G15 เมื่อมาถึงจุดนี้ ฉันต้องแท็บไปที่ A16 และทำซ้ำขั้นตอนที่เหลือของแบบฟอร์ม เหตุผลที่ฉันต้องการสิ่งนี้เพราะว่าข้อมูลถูกป้อนโดยเครื่องสแกนบาร์โค้ด และบางส่วนถูกตั้งโปรแกรมไว้ที่แท็บ และส่วนอื่นๆ ให้ป้อน ขอบคุณสำหรับความช่วยเหลือของคุณเกี่ยวกับเรื่องนี้ Spinaz
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
สวัสดีและขอขอบคุณสำหรับรหัส VBA เพื่อตั้งค่าลำดับแท็บในแผ่นงานที่ได้รับการป้องกัน โดยที่ป้ายชื่อตัวควบคุมฟอร์มและกล่องดรอปดาวน์ตัวควบคุมฟอร์มถูกปลดล็อก และผู้ใช้สามารถแท็บผ่านและกรอกข้อมูลในป้ายชื่อ และเมื่อแท็บไปที่ รายการดรอปดาวน์เลือกจำนวนรายการที่คำแนะนำมอบให้ และฉันได้ดำเนินการกับรหัสของคุณแล้ว ตอนแรกฉันทำได้แค่แท็บผ่านตัวควบคุมฟอร์มป้ายกำกับแต่ละอัน ตอนนี้บางครั้งฉันก็กดรายการดรอปดาวน์ ฉันจะสนุกกับการบรรยายเกี่ยวกับวิธีการ tro do tis
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
ด้วยลำดับที่คุณระบุไว้ excel ทำได้โดยไม่ต้องใช้รหัส VBA ทำให้พวกเขาถอยหลังแล้วคุณได้บางสิ่งบางอย่าง
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
ขั้นแรกให้เลือกเซลล์ที่คุณต้องการให้ไม่มีการป้องกัน

เมื่อคุณปกป้องแผ่นงานของคุณ มันจะกำหนดลำดับแท็บโดยอัตโนมัติตามเซลล์ที่ไม่ได้รับการปกป้องของคุณ มันจะแท็บไปข้างหน้าจากซ้ายไปขวาและบนลงล่าง; Shift+Tab ย้อนกลับจากขวาไปซ้าย และจากล่างขึ้นบน
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
อีวานที่รัก
ขอบคุณสำหรับการแบ่งปัน
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
ขอบคุณสำหรับรหัสในการป้อนคำสั่งซื้อ ฉันกำลังทำงานกับสเปรดชีตเพื่อป้อนข้อมูลบาร์โค้ด และฉันต้องการขยายได้ถึง 300 เซลล์ และโปรแกรมอนุญาตให้ฉันป้อนได้เพียง 142 เซลล์เท่านั้น มีวิธีเพิ่มให้ถึง 300 ไหมครับ



ขอบคุณ
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
สวัสดีจีนน์
ขอบคุณสำหรับความคิดเห็นของคุณ
แต่โค้ดนี้ปรับให้เหมาะกับความต้องการของคุณไม่ได้ ขอโทษสำหรับเรื่องนั้น.
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
ไม่มีฉัน funcionó, lo coloqué en la hoja de trabajo, debe haber algún error, ฉัน podrían ayudar, necesito Impalarlo en mi trabajo,

Atte,

คอลลินส์ เนปตาลี อาร์ราอิซ โลเปซ
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
สวัสดี มีวิธีเพียงแค่กด Enter โดยไม่ต้องป้อนอะไรเลยและให้ไปที่ตัวเลือกถัดไปหรือไม่?
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
สวัสดี ใหม่ที่นี่ รหัส VBA ทำงานจนกว่าฉันจะกดกล่องแบบดึงลง ฉันไปที่ส่วนแรกในการเลือกของฉัน กด Tab แล้วมันจะย้ายไปยังเซลล์ที่ถูกล็อก มันทำหน้าที่เหมือนเซลล์ที่ฉันไม่ได้ป้อนข้อมูลใด ๆ เลย ข้อเสนอแนะ? GlennD24
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
Olá, o código VBA para definir a ordem das células desejadas funcionou perfeitamente. Eu percebi que para que ele funcione, é necessário entrar com um dado na célula e pressionar TAB หรือ ENTER.
PERGUNTA: Você tem como fazer este código percorrer todas as células (no meu caso são 31, sendo algumas vazias e outras com valores padrão) sem ter que entrar com dados nelas, somente oupression และ ENTER Como eu tenho algumas células vazias e outras com valores, por padrão, eu gostaria de percorrer เป็น células sem precisar entrar com dados em todas elas novamente, mas, somente alterando เป็น células alter que forem preciso

ข้อความที่แปลโดย Google Translator
สวัสดี รหัส VBA เพื่อกำหนดลำดับเซลล์ที่ต้องการทำงานได้อย่างสมบูรณ์ ฉันตระหนักว่าเพื่อให้ใช้งานได้ จำเป็นต้องป้อนข้อมูลลงในเซลล์แล้วกด TAB หรือ ENTER
คำถาม: คุณสามารถทำให้โค้ดนี้ผ่านทุกเซลล์ได้ (ในกรณีของฉันมี 31 บางอันว่างเปล่าและบางเซลล์เป็นค่าเริ่มต้น) โดยไม่ต้องป้อนข้อมูลในเซลล์ เพียงแค่กด TAB หรือ ENTER เนื่องจากฉันมีเซลล์ว่างและเซลล์อื่นๆ ที่มีค่า ตามค่าเริ่มต้น ฉันจึงต้องการวนรอบเซลล์โดยไม่ต้องป้อนข้อมูลในเซลล์ทั้งหมดอีกครั้ง แต่เปลี่ยนเฉพาะเซลล์ที่จำเป็นต้องเปลี่ยนเท่านั้น

ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
ฉันได้คัดลอกรหัสของคุณลงในเวิร์กชีตของฉันแล้ว แต่ทันทีที่ฉันปิดและเปิดใหม่เพื่อใช้อีกครั้ง รหัสจะหายไป ฉันจะบันทึกสิ่งนี้ได้อย่างไร
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
สวัสดีแอนนิต้า
หากคุณต้องการเก็บโค้ด VBA ไว้เพื่อใช้คุณลักษณะ หลังจากเพิ่มโค้ด VBA แล้ว ให้บันทึกเวิร์กบุ๊กของคุณเป็น an สมุดงานที่เปิดใช้งาน Excel Macro ตามที่แสดงในภาพหน้าจอด้านล่าง จากนั้นใช้ไฟล์ที่บันทึกไว้ใหม่ในอนาคต
https://www.extendoffice.com/images/stories/comments/comment-picture-zxm/Excel_macro-enabled_workbook.png
มีความคิดเห็นยังไม่มีการโพสต์ที่นี่
แสดงความคิดเห็นของคุณ
โพสต์ในฐานะแขก
×
ให้คะแนนโพสต์นี้:
0   ตัวอักษร
สถานที่แนะนำ