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

แบ่งช่วงของเซลล์ด้วยตัวเลขด้วยฟังก์ชัน Paste Special

แบ่งช่วงของเซลล์ด้วยตัวเลขอย่างรวดเร็วด้วย Kutools for Excel

แบ่งช่วงของเซลล์ด้วยตัวเลขด้วยรหัส VBA

แบ่งช่วงของเซลล์ด้วยตัวเลขด้วยฟังก์ชัน Paste Special

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

1. ใส่หมายเลขตัวหารเช่น 15 ลงในเซลล์ว่างแล้วคัดลอก

2. ไฮไลต์ช่วงที่คุณต้องการหารตัวเลขทั้งหมดด้วย 15 แล้วคลิกขวาเลือก วางแบบพิเศษ จากเมนู

3 ใน วาง Special กล่องโต้ตอบคลิก ทั้งหมด ตัวเลือกใน พาสต้า เลือก แบ่ง ตัวเลือกใน การดำเนินการ แล้วคลิกไฟล์ OK ปุ่ม

4. ลบหมายเลข 15 ที่คุณป้อนก่อนหน้านี้

ตอนนี้ช่วงของเซลล์ถูกหารด้วย 15 จำนวนมาก ดูภาพหน้าจอ:

แบ่งช่วงของเซลล์ด้วยตัวเลขอย่างรวดเร็วด้วย Kutools for Excel

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

1. เลือกช่วงที่มีตัวเลขที่คุณต้องการหารด้วยจำนวนหนึ่ง จากนั้นคลิก Kutools > เพิ่มเติม > การดำเนินการดูภาพหน้าจอ:

3 ใน เครื่องมือการทำงาน ใหเลือก การแบ่ง ใน การดำเนินการ ใส่หมายเลขตัวหารเช่น 15 ใน ตัวดำเนินการ กล่อง. และคุณสามารถดูผลลัพธ์จากไฟล์ ดูตัวอย่าง บานหน้าต่าง และสุดท้ายคลิก OK or สมัครสมาชิก ปุ่ม. ดูภาพหน้าจอ:

แบ่งช่วงของเซลล์ด้วยตัวเลขด้วยรหัส VBA

ด้วยโค้ด VBA คุณยังสามารถหารช่วงเซลล์ด้วยตัวเลขโดยอัตโนมัติได้อีกด้วย

1. เลือกช่วงที่คุณต้องการให้หารด้วยตัวเลข

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

VBA: แบ่งช่วงของเซลล์ตามตัวเลข

Sub DivisionNum()
'Updateby20140128
Dim Rng As Range
Dim WorkRng As Range
Dim xNum As Integer
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
xNum = Application.InputBox("Division num", xTitleId, Type:=1)
For Each Rng In WorkRng
    Rng.Value = Rng.Value / xNum
Next
End Sub

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

4. ในกล่องโต้ตอบที่สองที่โผล่ขึ้นมาให้ป้อนหมายเลขตัวหารจากนั้นคลิกปุ่มตกลง ดูภาพหน้าจอ:

ตอนนี้ตัวเลขทั้งหมดในช่วงที่เลือกจะหารด้วยหมายเลข 15

การสาธิต: แบ่งช่วงของเซลล์อย่างรวดเร็วด้วยตัวเลขด้วย Kutools for Excel

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