เมื่อสถานีอนามัยอื่นๆเขาปลับเปลี่ยนไปใช้เลขไทยกันหมดผมเองต้องเลยปรับตัวกับเขาบ้างจะได้อินเทรนด์....เพื่อไม่เป็นการเสียเวลาก็มาเรียนรู้วิธีกันเลยครับ สำหรับวิธีที่จะแนะนำจะใช้ Macro ซึ่งเป็นชุดคำสั่งอัตโนมัติที่มีมากับโปรแกรม Microsoft Word มาทุกเวอร์ชั่น
วิธีทำ
ขั้นที่ 1 เปิดโปรแกรม Microsoft Word ขึ้นมาครับ แล้วคลิกที่เมนู เครื่องมือ (Tool)แล้วเลือกที่เมนู มาโคร(Macro)>>>> มาโคร(Macro)
ขั้นที่ 2 โปรแกรมจะเปิดหน้าต่างขั้นมาให้เราพิมพ์ชื่อ Macro และคำอธิบาย Macro เราก็พิมพ์ให้เป็นชื่ออะไรก็ได้ครับ เสร็จแล้วให้เราคลิกที่ปุ่ม สร้างดังรูป
ขั้นที่ 3 โปรแกรมจะเปิดหน้าต่างให้เราเขียนชุดคำสั่ง แต่เราไม่ต้องเขียนนะครับ ให้เรา Copy ข้อความข้างล่างนี้ Paste ลงไปทับกับชุดคำสั่งเก่าที่มีทั้งหมดเลยนะครับ(ดังรูป)
ชุดคำสั่ง
Sub arabictothai()
For i = 0 To 9
With Selection.Find
.Text = Chr(48 + i)
.Replacement.Text = Chr(240 + i)
.Wrap = wdFindContinue
End With
Selection.Find.Execute Replace:=wdReplaceAll
Next
End Sub
Sub thaitoarabic()
For i = 0 To 9
With Selection.Find
.Text = Chr(240 + i)
.Replacement.Text = Chr(48 + i)
.Wrap = wdFindContinue
End With
Selection.Find.Execute Replace:=wdReplaceAll
Next
End Sub
ขั้นที่ 4 กดที่ปุ่ม Save แล้วปิดหน้าต่างเขียนชุดคำสั่งเข้าสู่โปรแกรม Microsoft Word เป็นอันเสร็จพิธีครับ
สำหรับวิธีการเรียกใช้ชุดคำสั่งที่เราตั้งไว้ ก็มีขั้นตอนง่ายๆดังนี้
ขั้นตอนที่ 1 เปิดไฟล์เอกสาร MS WORD ที่เราต้องการเปลี่ยนเปลี่ยนเลขไทยเป็นเลขอารบิก หรือเปลี่ยนเลขอารบิกเป็นเลขไทยขึ้นมา หรืออาจจะพิมพ์ขั้นใหม่ก็ได้ ตัวอย่างผมจะทำการแปลงตัวเลขในหนังสือราชการนะครับ
ขั้นตอนที่ 2 เปิดการใช้ Macro โดยไปที่เมนู เครื่องมือ (Tool)แล้วเลือกที่เมนู มาโคร(Macro)>>>> มาโคร(Macro) ดังรูป
ขั้นตอนที่ 3 เราจะพบกับ Macro ที่เราได้บันทึกไว้แล้ว 2 Macro คือ
arabictothai ใช้เปลี่ยนตัวเลขอารบิกไปเป็นเลขไทย
thaitoarabic ใช้เปลี่ยนเลขไทยไปเป็นเลขอารบิก
ขั้นตอนที่ 4 ให้เราใช้ Mouse คลิกเลข Macro ที่เราต้องการ แล้วกดปุ่ม เรียกใช้ (ตามรูป) โปรแกรมก็จะทำการแปลงเลขไทยเป็นเลขอารบิก หรือเปลี่ยนเลขอารบิกเป็นเลขไทย ตามที่เราได้เลือกไว้ครับ