วิธีแยกค่าทศนิยมจากสตริงใน Excel
บทช่วยสอนนี้จะบอกวิธีแยกค่าทศนิยมจากสตริงใน Excel เท่านั้น
แยกค่าทศนิยมด้วยสูตรใน Excel
แยกค่าทศนิยมด้วย VBA ใน Excel
แยกค่าทศนิยมได้อย่างง่ายดายด้วย Kutools for Excel
แยกค่าทศนิยมด้วยสูตรใน Excel
มีสูตรสองสูตรที่สามารถช่วยคุณแยกค่าทศนิยมจากสตริงเลือกสูตรใดสูตรหนึ่งตามที่คุณต้องการ
สูตรที่ไม่คำนึงถึงสัญลักษณ์ของค่า:
เลือกเซลล์และพิมพ์สูตรนี้ = ABS (A1-TRUNC (A1)) (A1 คือเซลล์ที่คุณต้องการแยกค่าทศนิยม) ลงในแถบสูตรแล้วกด เข้าสู่ สำคัญ. ให้เลือกเซลล์ผลลัพธ์แรกลากที่จับเติมลงเพื่อให้ได้ผลลัพธ์ทั้งหมด คุณสามารถเห็นค่าทศนิยมที่แยกออกมาโดยไม่มีเครื่องหมายดังภาพด้านล่างที่แสดง
สูตรที่แสดงถึงสัญลักษณ์ของค่า:
เลือกเซลล์และพิมพ์สูตรนี้ = A1-TRUNC (A1) (A1 คือเซลล์ที่คุณต้องการแยกค่าทศนิยม) ลงในแถบสูตรแล้วกด เข้าสู่ สำคัญ. เลือกเซลล์ผลลัพธ์แรกต่อไปและลากที่จับเติมลงเพื่อให้ได้ผลลัพธ์ทั้งหมด คุณสามารถดูว่าค่าทศนิยมถูกดึงออกมาพร้อมกับเครื่องหมายดังภาพด้านล่างที่แสดง
แยกตัวเลขทศนิยมจากช่วงที่เลือกใน Excel ได้อย่างง่ายดาย:
Kutools สำหรับ Excel's แยกข้อความ ยูทิลิตี้ช่วยให้คุณสามารถแยกค่าทศนิยมทั้งหมดจากช่วงที่ระบุได้อย่างง่ายดายดังตัวอย่างด้านล่างที่แสดง
ดาวน์โหลดและทดลองใช้ทันที! (เส้นทางฟรี 30 วัน)
แยกค่าทศนิยมด้วย VBA ใน Excel
มี VBA ที่สามารถแยกค่าทศนิยมจำนวนมากด้วยเครื่องหมายจากสตริงเท่านั้น
1 กด Alt + F11 เพื่อเปิด Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง
2. ในหน้าต่างป็อปอัพคลิก สิ่งที่ใส่เข้าไป > โมดูลจากนั้นวางรหัส VBA ต่อไปนี้ลงในโมดูล
VBA: แยกค่าทศนิยมเท่านั้น
Sub GetNumber()
Dim xSRg As Range
Dim xDRg As Range
Dim xPRg As Range
Dim xSRgArea As Range
Dim xRgVal As String
Dim xAddress As String
Dim I As Long
Dim K As Long
Dim KK As Long
On Error Resume Next
xAddress = Application.ActiveWindow.RangeSelection.Address
Set xSRg = Application.InputBox("Please select range:", "KuTools For Excel", xAddress, , , , , 8)
If xSRg Is Nothing Then Exit Sub
Set xDRg = Application.InputBox("Select single cell:", "KuTools For Excel", , , , , , 8)
If xDRg Is Nothing Then Exit Sub
Set xDRg = xDRg(1)
For I = 1 To xSRg.Areas.Count
Set xSRgArea = xSRg.Areas.Item(I)
For K = 1 To xSRgArea.Count
xRgVal = xSRgArea(K).Value
KK = xSRgArea(K).Row - xSRg.Row
If IsNumeric(xRgVal) Then
xDRg.Offset(KK) = xRgVal - VBA.Fix(xRgVal)
End If
Next
Next
End Sub3 กด F5 กุญแจสำคัญในการเรียกใช้รหัส จากนั้นก Kutools สำหรับ Excel กล่องโต้ตอบจะปรากฏขึ้นโปรดเลือกช่วงที่คุณต้องการแยกค่าทศนิยมเท่านั้นจากนั้นคลิก OK ปุ่ม. ดูภาพหน้าจอ:
4. แล้วอีกอย่าง Kutools สำหรับ Excel กล่องโต้ตอบจะปรากฏขึ้นคุณต้องเลือกเซลล์สำหรับค้นหาค่าทศนิยมที่แยกออกมา ดูภาพหน้าจอ:
คุณสามารถเห็นเฉพาะค่าทศนิยมของตัวเลขที่ระบุเท่านั้นที่ถูกดึงออกมาและวางไว้ในช่วงที่กำหนดดังที่แสดงด้านล่าง
แยกค่าทศนิยมได้อย่างง่ายดายด้วย Kutools for Excel
หากคุณไม่ชอบสูตรและวิธี VBA ฉันขอแนะนำเครื่องมือที่มีประโยชน์ให้คุณที่นี่ - Kutools สำหรับ Excel. ด้วยของ แยกข้อความ ยูทิลิตี้คุณสามารถแยกค่าทศนิยมทั้งหมดจากช่วงใน Excel ได้อย่างง่ายดาย
ก่อนที่จะใช้ Kutools สำหรับ Excelโปรด ดาวน์โหลดและติดตั้งในตอนแรก.
1. เลือกช่วงที่มีทศนิยมที่คุณต้องการแยกจากนั้นคลิก Kutools > ข้อความ > แยกข้อความ. ดูภาพหน้าจอ:
2 ใน แยกข้อความ กล่องโต้ตอบพิมพ์ .* ลงในกล่องข้อความจากนั้นคลิกไฟล์ เพิ่ม ปุ่ม. สุดท้ายคลิกไฟล์ OK ปุ่ม. ดูภาพหน้าจอ:
3. ในอีกป๊อปอัพ แยกข้อความ กล่องโต้ตอบเลือกเซลล์ว่างสำหรับค้นหาผลลัพธ์จากนั้นคลิกที่ไฟล์ OK ปุ่ม
จากนั้นค่าทศนิยมทั้งหมดในช่วงที่เลือกจะถูกดึงออกทันที ดูภาพหน้าจอ:
หากคุณต้องการทดลองใช้ยูทิลิตีนี้ฟรี (30 วัน) กรุณาคลิกเพื่อดาวน์โหลดแล้วไปใช้การดำเนินการตามขั้นตอนข้างต้น
แยกค่าทศนิยมได้อย่างง่ายดายด้วย Kutools for Excel
บทความญาติ:
สุดยอดเครื่องมือเพิ่มผลผลิตในสำนักงาน
เพิ่มพูนทักษะ Excel ของคุณด้วย Kutools สำหรับ Excel และสัมผัสประสิทธิภาพอย่างที่ไม่เคยมีมาก่อน Kutools สำหรับ Excel เสนอคุณสมบัติขั้นสูงมากกว่า 300 รายการเพื่อเพิ่มประสิทธิภาพและประหยัดเวลา คลิกที่นี่เพื่อรับคุณสมบัติที่คุณต้องการมากที่สุด...
แท็บ Office นำอินเทอร์เฟซแบบแท็บมาที่ Office และทำให้งานของคุณง่ายขึ้นมาก
- เปิดใช้งานการแก้ไขและอ่านแบบแท็บใน Word, Excel, PowerPoint, ผู้จัดพิมพ์, Access, Visio และโครงการ
- เปิดและสร้างเอกสารหลายรายการในแท็บใหม่ของหน้าต่างเดียวกันแทนที่จะเป็นในหน้าต่างใหม่
- เพิ่มประสิทธิภาพการทำงานของคุณ 50% และลดการคลิกเมาส์หลายร้อยครั้งให้คุณทุกวัน!
