วิธีการสลับเนื้อหาของสองเซลล์ใน Excel อย่างรวดเร็ว?

เมื่อเราจัดการกับเวิร์กชีตเราอาจต้องสลับเนื้อหาของสองเซลล์ในบางครั้ง โดยปกติแล้วพวกเราส่วนใหญ่รู้จักแค่ "ตัดวางและคัดลอก" เพื่อแลกเปลี่ยนเนื้อหา แต่ต้องใช้เวลานาน เราจะพูดถึงวิธีการสลับเนื้อหาในเซลล์ใน Excel อย่างรวดเร็ว

สลับเนื้อหาเซลล์สองเซลล์ที่อยู่ติดกันด้วยตนเอง
สลับเนื้อหาของเซลล์ที่ไม่อยู่ติดกันด้วยรหัส VBA
สลับเนื้อหาแบบสุ่มสองเซลล์ได้อย่างง่ายดายด้วยการคลิกเพียงไม่กี่ครั้ง

สลับเนื้อหาเซลล์สองเซลล์ที่อยู่ติดกันด้วยตนเอง

บางครั้งจำเป็นต้องสลับเซลล์สองเซลล์ที่อยู่ติดกัน เราสามารถทำได้ด้วยตนเองง่ายๆ ดูภาพหน้าจอต่อไปนี้ฉันต้องการสลับเซลล์ A4 และ B4 โปรดทำดังนี้:

1. เลือกเซลล์ที่คุณต้องการสลับ ในตัวอย่างนี้เลือกเซลล์ A4

2. กด เปลี่ยน และวางเคอร์เซอร์ไว้ที่ขอบด้านขวา

3. จากนั้นลากเคอร์เซอร์ไปที่ขอบด้านขวาของเซลล์ B4

4. เมื่อมีการแสดง“工” ปล่อยเมาส์

5. และเนื้อหาของเซลล์ทั้งสองถูกสลับกัน ดูภาพหน้าจอ:

ด้วยวิธีนี้เราสามารถสลับสองแถวหรือคอลัมน์ที่อยู่ติดกันได้

สลับเนื้อหาของเซลล์ที่ไม่อยู่ติดกันด้วยรหัส VBA

เมื่อเซลล์ทั้งสองไม่ติดกันวิธีการข้างต้นจะไม่ได้ผล เราสามารถสลับด้วยรหัส VBA

1. กด Ctrl คีย์และเลือกเซลล์สองเซลล์ที่ไม่อยู่ติดกันที่คุณต้องการสลับ

2. คลิก ผู้พัฒนา>ของ Visual Basicใหม่ Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่างจะปรากฏขึ้นให้คลิก สิ่งที่ใส่เข้าไป>โมดูลและป้อนรหัสต่อไปนี้ในไฟล์ โมดูล:

Sub SwapTwoRange()
'Updateby20131120
Dim Rng1 As Range, Rng2 As Range
Dim arr1 As Variant, arr2 As Variant
xTitleId = "KutoolsforExcel"
Set Rng1 = Application.Selection
Set Rng1 = Application.InputBox("Range1:", xTitleId, Rng1.Address, Type:=8)
Set Rng2 = Application.InputBox("Range2:", xTitleId, Type:=8)
Application.ScreenUpdating = False
arr1 = Rng1.Value
arr2 = Rng2.Value
Rng1.Value = arr2
Rng2.Value = arr1
Application.ScreenUpdating = True
End Sub

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

4 คลิก Ok ในกล่องโต้ตอบป๊อปอัพเซลล์ที่เลือกสองเซลล์จะถูกสลับกัน ดูภาพหน้าจอ:

หมายเหตุ: รหัส VBA นี้ไม่สามารถสลับการจัดรูปแบบของสองเซลล์ได้

สลับเนื้อหาแบบสุ่มสองเซลล์ได้อย่างง่ายดายด้วยการคลิกเพียงไม่กี่ครั้ง

กับ Kutools for Excel's ช่วงการสลับ ยูทิลิตี้เราไม่เพียง แต่สามารถสลับเซลล์แถวหรือคอลัมน์ที่อยู่ติดกันสองเซลล์เท่านั้น แต่ยังสามารถสลับเซลล์แถวหรือคอลัมน์ที่ไม่อยู่ติดกันสองเซลล์ได้อย่างง่ายดาย

1 คลิก Kutools > พิสัย > ช่วงการสลับดูภาพหน้าจอ:

2 ใน ช่วงการสลับ คุณต้อง:

• (1) คลิกตัวแรก ปุ่มใน ช่วง Swap 1 เพื่อเลือกเซลล์ที่คุณต้องการสลับ
• (2) คลิกที่สอง ปุ่มจาก ช่วง Swap 2 เพื่อเลือกเซลล์ที่คุณจะสลับด้วย
  เคล็ดลับ: คุณสามารถเลือกสองช่วงก่อนที่จะใช้คุณสมบัติจากนั้นคุณจะเห็นช่วงสองช่วงที่เลือกแสดงในกล่องช่วงการสลับ 1 และช่วงการสลับ 2 แยกกัน
• (3) คลิกไฟล์ OK ปุ่ม

จากนั้นเซลล์หรือช่วงที่เลือกสองเซลล์จะสลับกันทันที ดูภาพหน้าจอ:

การสาธิต: สลับเนื้อหาเซลล์แบบสุ่มสองรายการด้วย Kutools for Excel

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

• วิธีการสลับแถวหรือคอลัมน์ใน Excel

สุดยอดเครื่องมือเพิ่มผลผลิตในสำนักงาน

	คุณสมบัติยอดนิยม: ค้นหา เน้น หรือระบุรายการที่ซ้ำกัน   |  ลบแถวว่าง   |  รวมคอลัมน์หรือเซลล์โดยไม่สูญเสียข้อมูล   |   รอบโดยไม่มีสูตร ...
	การค้นหาขั้นสูง: VLookup หลายเกณฑ์  |   VLookup หลายค่า  |   VLookup ข้ามหลายแผ่น   |   การค้นหาที่ไม่ชัดเจน ....
	รายการแบบเลื่อนลงขั้นสูง: สร้างรายการแบบหล่นลงอย่างรวดเร็ว   |  รายการแบบหล่นลงขึ้นอยู่กับ   |  เลือกหลายรายการแบบหล่นลง ....
	ผู้จัดการคอลัมน์: เพิ่มจำนวนคอลัมน์เฉพาะ  |  ย้ายคอลัมน์  |  สลับสถานะการมองเห็นของคอลัมน์ที่ซ่อนอยู่  |  เปรียบเทียบช่วงและคอลัมน์ ...
	คุณสมบัติเด่น: กริดโฟกัส   |  มุมมองการออกแบบ   |   บาร์สูตรใหญ่   |  สมุดงานและตัวจัดการชีต   |  ห้องสมุดทรัพยากร (ข้อความอัตโนมัติ)   |  เลือกวันที่   |  รวมแผ่นงาน   |  เข้ารหัส/ถอดรหัสเซลล์   |  ส่งอีเมลตามรายการ   |  ซุปเปอร์ฟิลเตอร์   |   ตัวกรองพิเศษ (กรองตัวหนา/ตัวเอียง/ขีดทับ...) ...
	ชุดเครื่องมือ 15 อันดับแรก:  12 ข้อความ เครื่องมือ (เพิ่มข้อความ, ลบอักขระ, ... )   |   50 + แผนภูมิ ประเภท (แผนภูมิ Gantt, ... )   |   40+ ใช้งานได้จริง สูตร (คำนวณอายุตามวันเกิด, ... )   |   19 การแทรก เครื่องมือ (ใส่ QR Code, แทรกรูปภาพจากเส้นทาง, ... )   |   12 การแปลง เครื่องมือ (ตัวเลขเป็นคำ, การแปลงสกุลเงิน, ... )   |   7 ผสานและแยก เครื่องมือ (แถวรวมขั้นสูง, แยกเซลล์, ... )   |   ... และอื่น ๆ

เสริมทักษะ Excel ของคุณด้วย Kutools for Excelและสัมผัสประสิทธิภาพอย่างที่ไม่เคยมีมาก่อน Kutools for Excel เสนอคุณสมบัติขั้นสูงมากกว่า 300 รายการเพื่อเพิ่มประสิทธิภาพและประหยัดเวลา  คลิกที่นี่เพื่อรับคุณสมบัติที่คุณต้องการมากที่สุด...

อ่านเพิ่มเติม ... ดาวน์โหลดฟรี...

---

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

• เปิดใช้งานการแก้ไขและอ่านแบบแท็บใน Word, Excel, PowerPoint, ผู้จัดพิมพ์, Access, Visio และโครงการ
• เปิดและสร้างเอกสารหลายรายการในแท็บใหม่ของหน้าต่างเดียวกันแทนที่จะเป็นในหน้าต่างใหม่
• เพิ่มประสิทธิภาพการทำงานของคุณ 50% และลดการคลิกเมาส์หลายร้อยครั้งให้คุณทุกวัน!

อ่านเพิ่มเติม ... ดาวน์โหลดฟรี...