หากคุณมีคอลัมน์ของค่าตัวเลขในแผ่นงานของคุณและต้องการแปลงเป็นคำภาษาอังกฤษที่เทียบเท่า คุณอาจสงสัยว่าจะทำได้อย่างไร Excel ไม่มีสูตรที่สามารถทำเช่นนี้ได้โดยตรง แต่ก็มีวิธีแก้ปัญหาชั่วคราวบางประการที่คุณสามารถใช้ได้ รวมถึง WPS AI ซึ่งแปลงตัวเลขเป็นคำด้วยพรอมต์ง่ายๆ ในบทความนี้ เราจะแสดงวิธีแปลงตัวเลขเป็นคำใน Excel ให้คุณดู
ส่วนที่ 1: วิธีแปลงตัวเลขเป็นคำใน Excel โดยใช้ VBA

แผ่นงาน Excel ของคุณเต็มไปด้วยตัวเลข และตอนนี้ลองจินตนาการถึงตัวเลขเหล่านี้ที่แปลงเป็นคำอย่างน่าอัศจรรย์ นั่นคือพลังของแมโคร SpellNumber ในโลกอันน่าหลงใหลของ Excel มาดูวิธีง่ายๆ ในการเพิ่มแมโครนี้ เพื่อปูทางไปสู่ความมหัศจรรย์ที่กำลังจะเกิดขึ้น
ตัวอย่าง: การแปลงตัวเลขเป็นคำ
คุณมีคอลัมน์ของตัวเลขในคอลัมน์ A ตั้งแต่ 1 ถึง 10 คุณต้องการแปลงตัวเลขเหล่านี้เป็นคำ เพื่อเพิ่มความหรูหราให้กับข้อมูลของคุณ มาดูวิธีเพิ่มแมโคร SpellNumber เพื่อทำสิ่งนี้ให้สำเร็จ เพื่อเตรียมพร้อมสำหรับขั้นตอนต่อไป
ขั้นตอนที่ 1 เปิด Excel แล้วไปที่แท็บ "นักพัฒนา" (Developer) หากคุณไม่เห็นแท็บนี้ ไม่ต้องกังวล! สามารถเปิดใช้งานได้อย่างง่ายดายในตัวเลือกของ Excel


ขั้นตอนที่ 2 คลิกที่ "Visual Basic" เพื่อเปิดตัวแก้ไข VBA

ขั้นตอนที่ 3 ในตัวแก้ไข VBA ไปที่ "แทรก" (Insert) และเลือก "มอดูล" (Module) นี่คือจุดที่ความมหัศจรรย์จะเผยออกมา

ขั้นตอนที่ 4 คัดลอกและวางโค้ดแมโคร SpellNumber จากลิงก์อ้างอิงของเราด้านล่างลงในมอดูล
Function SpellNumber(ByVal MyNumber) 'Update by Extendoffice Dim xStr As String Dim xFNum As Integer Dim xStrPoint Dim xStrNumber Dim xPoint As String Dim xNumber As String Dim xP() As Variant Dim xDP Dim xCnt As Integer Dim xResult, xT As String Dim xLen As Integer On Error Resume Next xP = Array("", "Thousand ", "Million ", "Billion ", "Trillion ", " ", " ", " ", " ") xNumber = Trim(str(MyNumber)) xDP = InStr(xNumber, ".") xPoint = "" xStrNumber = "" If xDP > 0 Then xPoint = " point " xStr = Mid(xNumber, xDP + 1) xStrPoint = Left(xStr, Len(xNumber) - xDP) For xFNum = 1 To Len(xStrPoint) xStr = Mid(xStrPoint, xFNum, 1) xPoint = xPoint & GetDigits(xStr) & " " Next xFNum xNumber = Trim(Left(xNumber, xDP - 1)) End If xCnt = 0 xResult = "" xT = "" xLen = 0 xLen = Int(Len(str(xNumber)) / 3) If (Len(str(xNumber)) Mod 3) = 0 Then xLen = xLen - 1 Do While xNumber <> "" If xLen = xCnt Then xT = GetHundredsDigits(Right(xNumber, 3), False) Else If xCnt = 0 Then xT = GetHundredsDigits(Right(xNumber, 3), True) Else xT = GetHundredsDigits(Right(xNumber, 3), False) End If End If If xT <> "" Then xResult = xT & xP(xCnt) & xResult End If If Len(xNumber) > 3 Then xNumber = Left(xNumber, Len(xNumber) - 3) Else xNumber = "" End If xCnt = xCnt + 1 Loop xResult = xResult & xPoint SpellNumber = xResult End Function Function GetHundredsDigits(xHDgt, xB As Boolean) Dim xRStr As String Dim xStrNum As String Dim xStr As String Dim xI As Integer Dim xBB As Boolean xStrNum = xHDgt xRStr = "" On Error Resume Next xBB = True If Val(xStrNum) = 0 Then Exit Function xStrNum = Right("000" & xStrNum, 3) xStr = Mid(xStrNum, 1, 1) If xStr <> "0" Then xRStr = GetDigits(Mid(xStrNum, 1, 1)) & "Hundred " Else If xB Then xRStr = "and " xBB = False Else xRStr = " " xBB = False End If End If If Mid(xStrNum, 2, 2) <> "00" Then xRStr = xRStr & GetTenDigits(Mid(xStrNum, 2, 2), xBB) End If GetHundredsDigits = xRStr End Function Function GetTenDigits(xTDgt, xB As Boolean) Dim xStr As String Dim xI As Integer Dim xArr_1() As Variant Dim xArr_2() As Variant Dim xT As Boolean xArr_1 = Array("Ten ", "Eleven ", "Twelve ", "Thirteen ", "Fourteen ", "Fifteen ", "Sixteen ", "Seventeen ", "Eighteen ", "Nineteen ") xArr_2 = Array("", "", "Twenty ", "Thirty ", "Forty ", "Fifty ", "Sixty ", "Seventy ", "Eighty ", "Ninety ") xStr = "" xT = True On Error Resume Next If Val(Left(xTDgt, 1)) = 1 Then xI = Val(Right(xTDgt, 1)) If xB Then xStr = "and " xStr = xStr & xArr_1(xI) Else xI = Val(Left(xTDgt, 1)) If Val(Left(xTDgt, 1)) > 1 Then If xB Then xStr = "and " xStr = xStr & xArr_2(Val(Left(xTDgt, 1))) xT = False End If If xStr = "" Then If xB Then xStr = "and " End If End If If Right(xTDgt, 1) <> "0" Then xStr = xStr & GetDigits(Right(xTDgt, 1)) End If End If GetTenDigits = xStr End Function Function GetDigits(xDgt) Dim xStr As String Dim xArr_1() As Variant xArr_1 = Array("Zero ", "One ", "Two ", "Three ", "Four ", "Five ", "Six ", "Seven ", "Eight ", "Nine ") xStr = "" On Error Resume Next xStr = xArr_1(Val(xDgt)) GetDigits = xStr End Function |
|---|
ขั้นตอนที่ 5 ปิดตัวแก้ไข VBA และกลับไปยังแผ่นงาน Excel ของคุณ

ประสบการณ์ของฉันในการเพิ่มแมโคร SpellNumber:
การผนวกรวมแมโคร SpellNumber ใน Excel นั้นง่ายอย่างน่าประหลาดใจ ฉันทำตามขั้นตอนไปยังแท็บนักพัฒนาและตัวแก้ไข VBA ซึ่งฉันได้เพิ่มโค้ดแมโครสำหรับการเขียนคำอ่านจำนวนเงินที่ใช้ในการทำบัญชี การที่ตัวเลขสามารถเปลี่ยนเป็นข้อความได้นั้นทำให้ฉันรู้สึกทึ่ง อย่างไรก็ตาม ฉันได้เรียนรู้ว่าต้องระมัดระวัง แมโครต้องการความแม่นยำเพื่อหลีกเลี่ยงไม่ให้เกิดการรบกวนแผ่นงาน การมีการสำรองข้อมูลและการเข้าใจโครงสร้างของ VBA ช่วยได้มาก ประสบการณ์นี้เปิดประตูสู่ความเป็นไปได้ใหม่ๆ ใน Excel ด้วยการผสมผสานตรรกะเข้ากับความคิดสร้างสรรค์
แผ่นงาน Excel ของคุณกลายเป็นผืนผ้าใบสำหรับความมหัศจรรย์ทางภาษา ในส่วนที่ 2 เราจะมอบกุญแจในการปลดล็อกแมโคร SpellNumber ซึ่งเป็นเครื่องมืออันทรงพลังที่ยกระดับข้อมูลตัวเลขของคุณให้กลายเป็นคำที่สละสลวย นำทางผ่านตัวอย่างที่ใช้งานได้จริงซึ่งจะส่องสว่างเส้นทางสู่ความเชี่ยวชาญ และเฝ้าดูข้อมูลของคุณเปลี่ยนแปลงไปต่อหน้าต่อตาคุณ โดยได้รับคำแนะนำจากศิลปะของแมโครอันน่าทึ่งนี้
ตัวอย่าง: การแปลงข้อมูลตัวเลขเป็นคำ
ขั้นตอนที่ 1 เปิดแผ่นงาน Excel ที่มีข้อมูลตัวเลขที่คุณต้องการแปลง
ขั้นตอนที่ 2 เลือกคอลัมน์ที่อยู่ใกล้เคียง เราจะใช้คอลัมน์ B สำหรับคำที่แปลงแล้ว
ขั้นตอนที่ 3 ในเซลล์แรกของคอลัมน์ B ให้ป้อน =SpellNumber(A1)

ขั้นตอนที่ 4 กด Enter แล้วดูตัวเลขในเซลล์ A1 แปลงเป็นคำในเซลล์ B1 อย่างสวยงาม
ขั้นตอนที่ 5 หากต้องการแปลงตัวเลขเพิ่มเติม ให้ลากสูตรลงมา เพื่อให้แมโคร SpellNumber ได้แสดงเสน่ห์ของมัน

ประสบการณ์การใช้แมโคร SpellNumber ของฉัน:
การทดลองใช้แมโคร SpellNumber มอบมุมมองใหม่ๆ เมื่อตัวเลขถูกแปลงเป็นคำ ซึ่งเพิ่มสัมผัสที่แปลกใหม่ให้กับข้อมูลของฉัน กระบวนการนี้ตรงไปตรงมา โดยเผยให้เห็นถึงศักยภาพในการปรับปรุงการสื่อสาร อย่างไรก็ตาม ขอเตือนไว้ก่อนว่า ความแม่นยำเป็นสิ่งสำคัญ ข้อผิดพลาดเพียงเล็กน้อยอาจนำไปสู่ผลลัพธ์ที่ไม่คาดคิดได้ ความคุ้นเคยกับแมโครและการตรวจสอบความถูกต้องของอินพุตอย่างรอบคอบเป็นสิ่งสำคัญสำหรับประสบการณ์ที่ราบรื่น
ส่วนที่ 2: วิธีแปลงตัวเลขเป็นคำใน Excel โดยไม่ใช้ VBA
การสำรวจภูมิทัศน์ที่ซับซ้อนของ VBA อาจดูน่ากังวล แต่ไม่ต้องกลัวไป เพราะมีเส้นทางที่ง่ายกว่าในการบรรลุความสำเร็จอันน่าหลงใหลในการแปลงตัวเลขให้เป็นคำ แนวทางทางเลือกนี้ ซึ่งใช้ฟังก์ชันที่ผู้ใช้กำหนด (User-Defined Function) เสนอวิธีการที่คล่องตัวซึ่งยังคงการแปลงที่น่าดึงดูดใจเอาไว้ เมื่อเจาะลึกในขั้นตอนต่อไปนี้ เราจะค้นพบเทคนิคที่เป็นนวัตกรรมนี้ ช่วยให้คุณสามารถผสานข้อมูลของคุณเข้ากับเสน่ห์แห่งภาษาได้อย่างราบรื่นในขณะที่หลีกเลี่ยงความซับซ้อนของ VBA
ประโยชน์ของการใช้แมโคร SpellNumber:
1. ใช้งานง่าย: ฟังก์ชันที่ผู้ใช้กำหนดให้ความเรียบง่าย ไม่จำเป็นต้องมีความรู้ด้าน VBA ทำให้ผู้ใช้ในวงกว้างสามารถเข้าถึงได้ง่ายขึ้น
2. การเข้าถึงที่เป็นสากล: ต่างจากแมโครที่ต้องผนวกรวมในแต่ละสมุดงาน ฟังก์ชันนี้จะไปพร้อมกับแผ่นงาน ทำให้มั่นใจได้ถึงการแชร์ที่ราบรื่น
3. ไม่มีการแจ้งเตือนแมโคร: บอกลาการแจ้งเตือนแมโครที่น่ารำคาญเมื่อแชร์สมุดงานของคุณ ฟังก์ชันนี้จะทำงานอยู่เบื้องหลัง โดยเปลี่ยนตัวเลขเป็นคำอย่างแนบเนียน
ข้อเสียของการใช้แมโครในการเรียก SpellNumber ใน Excel:
1. ความเชี่ยวชาญด้าน VBA: แมโครต้องใช้ทักษะ VBA ในการปรับแต่ง ซึ่งอาจจำกัดผู้ที่ไม่คุ้นเคยกับการเขียนโปรแกรม
2. เฉพาะสมุดงาน: ต้องคัดลอกหรือสร้างแมโครลงในสมุดงานแต่ละชุด ซึ่งเพิ่มความซับซ้อนและภาระในการบำรุงรักษา
3. การแจ้งเตือนแมโคร: การแชร์สมุดงานที่มีแมโครอาจทริกเกอร์การแจ้งเตือน ซึ่งอาจทำให้เกิดความกังวลด้านความปลอดภัย
ตอนนี้ เรามาใช้เส้นทางที่ผ่อนคลายและร่วมเป็นสักขีพยานในความงดงามของวิธีนี้ (การใช้สูตรแบบผสมผสานที่มีใน Excel) ผ่านตัวอย่างการใช้งานจริง
วิธีแปลงตัวเลขเป็นคำใน Excel โดยไม่ใช้ VBA
ตัวอย่าง: การแปลงตัวเลขเป็นคำโดยใช้สูตร
ขั้นตอนที่ 1 เปิดแผ่นงาน Excel ที่มีข้อมูลตัวเลขที่คุณต้องการแปลง

ขั้นตอนที่ 2 เลือกคอลัมน์ที่อยู่ติดกับตัวเลข เราจะใช้คอลัมน์ B สำหรับคำที่แปลงแล้ว
ขั้นตอนที่ 3 ในเซลล์แรกของคอลัมน์ B ให้ป้อนสูตร
=IF(OR(LEN(FLOOR(A1,1))=13,FLOOR(A1,1)<=0),"out of="" range="">1,CHOOSE(MID(TEXT(INT(A1),REPT(0,12)),3,1)+1,""," one"," two"," three"," four"," five"," six"," seven"," eight"," nine"),IF(VALUE(MID(TEXT(INT(A1),REPT(0,12)),2,1))=0,CHOOSE(MID(TEXT(INT(A1),REPT(0,12)),3,1)+1,"","one","two","three","four","five","six","seven","eight","nine"),"")),IF(A1>=10^9," billion ",""),CHOOSE(MID(TEXT(INT(A1),REPT(0,12)),4,1)+1,"","one hundred ","two hundred ","three hundred ","four hundred ","five hundred ","six hundred ","seven hundred ","eight hundred ","nine hundred "),CHOOSE(MID(TEXT(INT(A1),REPT(0,12)),5,1)+1,"",CHOOSE(MID(TEXT(INT(A1),REPT(0,12)),6,1)+1,"ten","eleven","twelve","thirteen","fourteen","fifteen","sixteen","seventeen","eighteen","nineteen"),"twenty","thirty","forty","fifty","sixty","seventy","eighty","ninety"),IF(VALUE(MID(TEXT(INT(A1),REPT(0,12)),5,1))>1,CHOOSE(MID(TEXT(INT(A1),REPT(0,12)),6,1)+1,""," one"," two"," three"," four"," five"," six"," seven"," eight"," nine"),IF(VALUE(MID(TEXT(INT(A1),REPT(0,12)),5,1))=0,CHOOSE(MID(TEXT(INT(A1),REPT(0,12)),6,1)+1,"","one","two","three","four","five","six","seven","eight","nine"),"")),IF(VALUE(MID(TEXT(INT(A1),REPT(0,12)),4,3))>0," million ",""),CHOOSE(MID(TEXT(INT(A1),REPT(0,12)),7,1)+1,"","one hundred ","two hundred ","three hundred ","four hundred ","five hundred ","six hundred ","seven hundred ","eight hundred ","nine hundred "),CHOOSE(MID(TEXT(INT(A1),REPT(0,12)),8,1)+1,"",CHOOSE(MID(TEXT(INT(A1),REPT(0,12)),9,1)+1,"ten","eleven","twelve","thirteen","fourteen","fifteen","sixteen","seventeen","eighteen","nineteen"),"twenty","thirty","forty","fifty","sixty","seventy","eighty","ninety"),IF(VALUE(MID(TEXT(INT(A1),REPT(0,12)),8,1))>1,CHOOSE(MID(TEXT(INT(A1),REPT(0,12)),9,1)+1,""," one"," two"," three"," four"," five"," six"," seven"," eight"," nine"),IF(VALUE(MID(TEXT(INT(A1),REPT(0,12)),8,1))=0,CHOOSE(MID(TEXT(INT(A1),REPT(0,12)),9,1)+1,"","one","two","three","four","five","six","seven","eight","nine"),"")),IF(VALUE(MID(TEXT(INT(A1),REPT(0,12)),7,3))," thousand ",""),CHOOSE(MID(TEXT(INT(A1),REPT(0,12)),10,1)+1,"","one hundred ","two hundred ","three hundred ","four hundred ","five hundred ","six hundred ","seven hundred ","eight hundred ","nine hundred "),CHOOSE(MID(TEXT(INT(A1),REPT(0,12)),11,1)+1,"",CHOOSE(MID(TEXT(INT(A1),REPT(0,12)),12,1)+1,"ten","eleven","twelve","thirteen","fourteen","fifteen","sixteen","seventeen","eighteen","nineteen"),"twenty","thirty","forty","fifty","sixty","seventy","eighty","ninety"),IF(VALUE(MID(TEXT(INT(A1),REPT(0,12)),11,1))>1,CHOOSE(MID(TEXT(INT(A1),REPT(0,12)),12,1)+1,""," one"," two"," three"," four"," five"," six"," seven"," eight"," nine"),IF(VALUE(MID(TEXT(INT(A1),REPT(0,12)),11,1))=0,CHOOSE(MID(TEXT(INT(A1),REPT(0,12)),12,1)+1,"","one","two","three","four","five","six","seven","eight","nine"),"")))," "," ")&IF(FLOOR(A1,1)>1," "," "))&IF(ISERROR(FIND(".",A1,1)),""," point "&PROPER(IF(LEN(LEFT(TRIM(MID(SUBSTITUTE('Number to Word Without VBA'!A1,".",REPT(" ",255)),255,200)),2))=1,CHOOSE(1*LEFT(TRIM(MID(SUBSTITUTE('Number to Word Without VBA'!A1,".",REPT(" ",255)),255,200)),2),"One","Two","Three","Four","Five","Six","Seven","Eight","Nine")&" ","")&CONCATENATE(CHOOSE(MID(TEXT(INT(LEFT(TRIM(MID(SUBSTITUTE('Number to Word Without VBA'!A1,".",REPT(" ",255)),255,200)),2)),REPT(0,12)),11,1)+1,"",CHOOSE(MID(TEXT(INT(LEFT(TRIM(MID(SUBSTITUTE('Number to Word Without VBA'!A1,".",REPT(" ",255)),255,200)),2)),REPT(0,12)),12,1)+1,"One","One One","One Two","One Three","One Four","One Five","One Six","One Seven","One Eight","One Nine")&" ","Two","Three","Four","Five","Six","Seven","Eight","Nine"),IF(VALUE(MID(TEXT(INT(LEFT(TRIM(MID(SUBSTITUTE('Number to Word Without VBA'!A1,".",REPT(" ",255)),255,200)),2)),REPT(0,12)),11,1))>1,CHOOSE(MID(TEXT(INT(LEFT(TRIM(MID(SUBSTITUTE('Number to Word Without VBA'!A1,".",REPT(" ",255)),255,200)),2)),REPT(0,12)),12,1)+1,""," One"," Two"," Three"," Four"," Five"," Six"," Seven"," Eight"," Nine")&" ",IF(LEFT(TRIM(MID(SUBSTITUTE('Number to Word Without VBA'!A1,".",REPT(" ",255)),255,200)),2)="01","one ",IF(LEFT(TRIM(MID(SUBSTITUTE('Number to Word Without VBA'!A1,".",REPT(" ",255)),255,200)),1)="0",CHOOSE(MID(TEXT(INT(LEFT(TRIM(MID(SUBSTITUTE('Number to Word Without VBA'!A1,".",REPT(" ",255)),255,200)),2)),REPT(0,12)),12,1)+1,"","One","Two","Three","Four","Five","Six","Seven","Eight","Nine")&" ",""))))))) |
|---|
ขั้นตอนที่ 4 กด Enter และสังเกตดูตัวเลขในเซลล์ A2 ที่ค่อยๆ เปลี่ยนเป็นคำในเซลล์ B2

ขั้นตอนที่ 5 หากต้องการแปลงตัวเลขเพิ่มเติม ให้ลากสูตรลงมา เพื่อเผยให้เห็นการเปลี่ยนแปลงอันน่ามหัศจรรย์

ประสบการณ์ของฉันในการใช้ฟังก์ชันที่ผู้ใช้กำหนด:
เมื่อสำรวจฟังก์ชันที่ผู้ใช้กำหนด ฉันรู้สึกประทับใจในความเรียบง่ายที่ได้รับ ไม่ต้องมีการเขียนโค้ด VBA ที่ยุ่งยาก หรือการตั้งค่าที่ซับซ้อน เป็นเพียงสูตรตรงไปตรงมาเพื่อแปลงตัวเลขเป็นคำ ซึ่งเพิ่มความพิเศษให้กับ Excel แต่ก็มีข้อควรระวัง: การทำความเข้าใจฟังก์ชันอย่างลึกซึ้งคือกุญแจสำคัญ ควรทดสอบในหลากหลายสถานการณ์เพื่อให้มั่นใจในความถูกต้อง ข้อมูลเชิงลึกในเชิงปฏิบัตินี้ตอกย้ำถึงคุณค่าของฟังก์ชัน พร้อมกับเน้นย้ำความสำคัญของการใช้งานอย่างระมัดระวังเพื่อให้ได้ผลลัพธ์ที่ดีที่สุด
ส่วนที่ 3: ทำไมต้องใช้ WPS Office?

สิ่งสำคัญที่ควรทราบคือวิธีที่เราได้สำรวจมาจนถึงตอนนี้ ไม่เพียงแต่ใช้ได้กับ Microsoft Excel เท่านั้น แต่ยังนำไปใช้กับ WPS Office Spreadsheet ได้อีกด้วย อย่างไรก็ตาม เราขอเชิญคุณมาสำรวจข้อได้เปรียบที่โดดเด่นซึ่ง WPS Office มอบให้ นี่คือเหตุผลที่เราแนะนำให้คุณพิจารณา WPS Office สำหรับการทำงานบน Excel ที่เปลี่ยนผ่านของคุณ:
1. ราคา: WPS Office นำเสนอทางเลือกที่ราคาจับต้องได้โดยไม่ลดทอนคุณสมบัติใดๆ ทำให้เป็นตัวเลือกที่คุ้มค่าสำหรับการใช้งานทั้งส่วนตัวและระดับมืออาชีพ
2. ความเข้ากันได้: แลกเปลี่ยนเอกสารระหว่าง WPS Office และ Microsoft Office ได้อย่างไร้รอยต่อ เพื่อให้มั่นใจถึงการทำงานร่วมกันและการแชร์เอกสารที่ราบรื่น
3. ฟีเจอร์มากมาย: WPS Office มีชุดฟีเจอร์ที่ครอบคลุม เทียบเท่ากับมาตรฐานอุตสาหกรรม และช่วยให้คุณทำงานต่างๆ ได้อย่างง่ายดาย นอกจากนี้ยังมีฟีเจอร์ AI เช่น การเขียนด้วย AI และเครื่องมือแปลเอกสารด้วย AI
4. อินเทอร์เฟซที่ใช้งานง่าย: การนำทางใน WPS Office นั้นง่ายดาย แม้แต่กับผู้ใช้ใหม่ อินเทอร์เฟซที่ใช้งานง่ายช่วยให้การเรียนรู้เป็นไปอย่างราบรื่นและมีขั้นตอนการทำงานที่มีประสิทธิภาพ
5. เผยขุมทรัพย์ที่ซ่อนอยู่: เจาะลึกในบล็อก WPS เพื่อค้นพบเทคนิคดีๆ ที่จะช่วยเพิ่มทักษะของคุณ ตั้งแต่เทคนิคขั้นสูงไปจนถึงโซลูชันที่เป็นนวัตกรรม แต่ละบทช่วยสอนคืออีกก้าวสู่ความเป็นผู้เชี่ยวชาญ
6. การแปลงรูปแบบอย่างรวดเร็ว: เพื่อเพิ่มประสิทธิภาพการทำงานของคุณ WPS Office ยังสามารถ แปลง Excel เป็น PDF ได้อย่างรวดเร็ว
7. เพิ่มประสิทธิภาพการทำงานด้วยพลังของ AI: WPS AI ขับเคลื่อนงานประจำวันของคุณอย่างเต็มพิกัด—ตั้งแต่การแปลงตัวเลขเป็นคำใน Excel ด้วยพรอมต์ง่ายๆ ไปจนถึงการสร้างสูตรอัตโนมัติ การสรุปเอกสาร และการแปลข้อความแบบเรียลไทม์
ส่วนที่ 4: วิธีแปลงตัวเลขเป็นคำใน Excel ด้วย WPS AI
ต่อยอดจากวิธีการที่ไม่ใช้ VBA ที่เราเพิ่งสำรวจไป WPS AI นำเสนอวิธีที่ใช้งานง่ายกว่าในการแปลงตัวเลขเป็นคำ—โดยไม่ต้องสร้างสูตรเองเลยแม้แต่น้อย แนวทางที่ขับเคลื่อนด้วย AI นี้ช่วยเพิ่มความคล่องตัวให้กับกระบวนการ ทำให้ผู้ใช้ทุกระดับทักษะสามารถเข้าถึงได้
ขั้นตอนที่ 1 ในเซลล์ว่าง เริ่มพิมพ์ =WPSAI แล้วดับเบิลคลิกที่ฟังก์ชัน WPSAI จากเมนูแบบเลื่อนลง

ขั้นตอนที่ 2 ภายในวงเล็บของฟังก์ชัน ให้อ้างอิงเซลล์ที่มีตัวเลขเป้าหมายของคุณ จากนั้นเพิ่มพรอมต์

ขั้นตอนที่ 3 กด Enter และ AI จะสร้างคำที่เทียบเท่ากับตัวเลขนั้นในเซลล์ทันที

ขั้นตอนที่ 4 ลากจุดจับเติมลงมาจากเซลล์แรกที่แปลงแล้ว เพื่อนำการแปลงด้วย AI แบบเดียวกันนี้ไปใช้กับตัวเลขที่เหลือทั้งหมดในคอลัมน์ของคุณ


ตัวเลขในเซลล์ที่เลือกจะถูกแปลงเป็นข้อความ
ไม่เหมือนกับสูตรแบบไม่มี VBA ทั่วไปที่ผูกกับกฎการแปลงแบบเฉพาะเจาะจง AI สามารถเข้าใจพรอมต์ภาษาธรรมชาติได้ ดังนั้นหากฉันจำเป็นต้องเปลี่ยนไปใช้สไตล์อื่น ฉันก็แค่ปรับเปลี่ยนพรอมต์แทนการสร้างสูตรใหม่ นอกจากนี้ยังช่วยลดความจำเป็นในการจดจำไวยากรณ์ที่ซับซ้อน หรือการแก้ไขปัญหาฟังก์ชันซ้อนทับกัน AI จะจัดการกับงานที่หนักหน่วงให้ เพื่อให้ฉันสามารถมุ่งเน้นไปที่ข้อมูลของตนเองแทนที่จะเป็นกลไกการทำงาน หลังจากทำสถิติเสร็จสิ้น คุณสามารถใช้ฟังก์ชันการแปลงของ WPS Office ได้เช่นกัน รวมถึง การแปลง Excel เป็น PDF
คำถามที่พบบ่อยเกี่ยวกับวิธีแปลงตัวเลขเป็นคำใน Excel
ฉันสามารถแปลงคำกลับเป็นตัวเลขได้หรือไม่?
ได้แน่นอน! การแปลงกลับจากคำเป็นตัวเลขสามารถทำได้ใน WPS Office โดยใช้โค้ด VBA แม้ว่าประเด็นหลักของการสนทนานี้คือการเปลี่ยนตัวเลขเป็นคำ แต่สิ่งสำคัญคือต้องสังเกตว่า WPS Office มีเครื่องมืออเนกประสงค์เพื่อจัดการกับการแปลงทั้งสองทิศทาง
ฉันสามารถแปลงตัวเลขเป็นคำได้ในคลิกเดียวหรือไม่?
ได้แน่นอน การเปลี่ยนตัวเลขให้เป็นคำด้วยการคลิกเพียงครั้งเดียวเป็นเรื่องง่ายดายด้วยความสามารถที่โดดเด่นของ WPS Office (โดยใช้ VBA หรือสูตรร่วมกันที่มีให้) กระบวนการที่คล่องตัวนี้ช่วยลดความซับซ้อนของงาน ประหยัดเวลาอันมีค่าและความพยายามของคุณ
VBA คืออะไร และจะเรียนรู้ได้อย่างรวดเร็วอย่างไร?
VBA เป็นภาษาโปรแกรมจาก Microsoft ที่ใช้เพื่อทำให้งานเป็นแบบอัตโนมัติ และสร้างโซลูชันแบบกำหนดเองในแอปพลิเคชัน Office เช่น Excel, Word และ PowerPoint
การเรียนรู้ VBA อย่างรวดเร็ว:
พื้นฐาน: ทำความเข้าใจแนวคิดการเขียนโปรแกรม เช่น ตัวแปรและการวนซ้ำ (loops)
ตัวแก้ไข VBA: เปิดใช้งานในแอป Office เพื่อเขียนโค้ด
ตัวอย่าง: ศึกษาตัวอย่างโค้ดง่ายๆ
บันทึกแมโคร: เรียนรู้จากการบันทึกการทำงานต่างๆ
แหล่งข้อมูลออนไลน์: ใช้บทช่วยสอนและหลักสูตรต่างๆ
ฝึกฝน: เขียนโค้ดโปรเจกต์เล็กๆ อย่างสม่ำเสมอ
เอกสารประกอบ: สำรวจเอกสารประกอบ VBA ของ Microsoft
ชุมชน: มีส่วนร่วมในฟอรัมออนไลน์ต่างๆ
สร้างสรรค์: สร้างแมโครของคุณเองสำหรับงานจริง
การแก้จุดบกพร่อง (Debugging): เรียนรู้วิธีแก้ไขข้อผิดพลาดในโค้ด
ความอยากรู้อยากเห็น: สำรวจและทดลองต่อไป
การเรียนรู้ VBA จนชำนาญจะช่วยเพิ่มประสิทธิภาพการทำงานและนำเสนอโซลูชันที่ปรับแต่งได้ตามความต้องการ
ฉันควรทำอย่างไรหากไฟล์เสียหายระหว่างกระบวนการแปลง?
โดยทั่วไป ปัญหาไฟล์เสียหายจะไม่เกิดขึ้น อย่างไรก็ตาม หากไฟล์เกิดเสียหายระหว่างกระบวนการแปลง โปรดอย่ากังวลไป—คุณสามารถใช้เครื่องมือซ่อมแซมไฟล์ของ WPS เพื่อ กู้คืนไฟล์ Excel ได้
บทสรุป
ในคู่มือนี้ เราได้สำรวจวิธีต่างๆ ในการแปลงตัวเลขเป็นคำใน Excel โดยมุ่งเน้นไปที่ทั้งแมโคร VBA และฟังก์ชันที่ผู้ใช้กำหนด เราได้ให้คำแนะนำทีละขั้นตอนอย่างชัดเจน พร้อมทั้งตัวอย่างสำหรับแต่ละวิธี นอกจากการเน้นย้ำถึงประโยชน์ของ WPS Office แล้ว เรายังได้ชี้ให้เห็นถึงความเข้ากันได้กับ Excel ฟีเจอร์ที่ใช้งานง่าย และราคาที่จับต้องได้ รวมถึง WPS AI อันทรงพลังที่ช่วยให้การแปลงตัวเลขเป็นคำง่ายขึ้นด้วยพรอมต์เพียงสั้นๆ WPS ยังมีเครื่องมือ โปรแกรมเปิดอ่าน XLSX (XLSX Viewer) เพื่อช่วยคุณเปิดและดูไฟล์ Excel ได้ทันที ไม่ว่าคุณจะเลือกใช้ VBA หรือฟังก์ชันที่ผู้ใช้กำหนด คู่มือนี้จะเตรียมความพร้อมให้คุณแปลงตัวเลขเป็นคำได้อย่างราบรื่น ในขณะที่ตระหนักถึงข้อดีของการใช้ WPS Office เพื่อยกระดับงานด้านเอกสารของคุณให้ดียิ่งขึ้น





