มาเปลี่ยนเลขอาราบิคให้เป็นเลขไทยกันเถอะ

จากที่มีหนังสือเวียนให้หน่วยงานราชการต่างๆ ใช้เลขไทยในหนังสือราชการ ทำให้มีการตื่นตัวกันอย่างมากมายซึ่งปัจจุบันการพิมพ์้เอกสารต่างๆ ก็มักจะใช้คอมพิวเตอร์ซะเกือบจะ 100% และก็จะใช้โปรแกรมยอดนิยม อย่าง Micro soft Word ซะเป็นส่วนมาก ปัญหาสำหรับคนที่มีเอกสารเยอะๆ คือจะมาเปลี่ยนเลขอาราบิคให้เป็นเลขไทยทุกไฟล์ ที่ล่ะตัว ก็คงต้องใช้เวลาพอสมควรและทำให้เสียเวลาด้วย เมื่อมีปัญหามันก็มีทางแก้ มาเริ่มกันเลย... :)
วิธีการก็คือเขียนMacro ให้มันแก้ให้โดยอัตโนมัติ มีขั้นตอนดังนี้
1. เปิดโปรแกรม MicrosoftWord ขึ้นมาก จากนั้น ไปที่ menu --> Tools -->Macro --> Macros ดังรูป
11
2. โปรแกรมจะขึ้นเป็น ไดอะล็อกบล็อก Macro ขี้นมา ให้ตั้งชื่อ Macro ที่ช่อง Macro Name ตั้งเป็นชื่ออะไรก็ได้ อย่างตัวอย่างผมตั้งชื่อเป็น Arabictothai จากนั้นคลิ๊กที่ปุ่ม Create
Create Macro
Create Macro
3. จากนั้นโปรแกรมจะเปิดโปรแกรม Microsoft Visual basic ขึ้นมา ให้copy(คัดลอก) code ข้างล่างนี้ ไปที่ Paste (วาง)ในช่องด้านขาว ดังรูป
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
แก้ไข Macro
แก้ไข Macro
เสร็จแล้วอย่าลืม Save นะครับ จากนั้น ก็คลิ๊กปุ่มกากกะบาทสีแดงเพื่อปิดโปรแกรมMicrosoft Visual basicและกลับไป Microsoft word
4. ตอนนี้เราก็สามารถใช้ Macro สำหรับเปลี่ยนเลขอราบิคให้เป็นเลขไทยได้แล้ว วิธีการใช้งานก็ง่ายๆ ไม่ยุ่งยาก ครับ
4.1 ทำการทดสอบโปรแกรม Macro ของเราโดยทดลองพิมพ์ ตัวเลขอาราบิค ในWord
4
4.2 จากนั้น ให้คลิกที่เมนู Tools -->Macro--> Macros
1
4.3 เลือกชื่อMacro ที่เราสร้างไว้ เสร็จแล้ว คลิ๊ก ปุ่ม Run ตัวเลขก็จะถูกแปลงให้โดยอัตโนมัติ
5
6
ตัวเลขที่ถูกแปลงเรียบร้อยแล้ว
ละเพื่อให้การใช้งานสะดวกมากขึ้น ไม่ต้องมาค่อยคลิ๊กหลายstep เราก็สร้างเป็นปุ่มใน tools bar กันซะเลย (จะได้เทพๆ) ซึ่งก็มีขั้นตอนดังนี้ครับ
1. คลิ๊กที่เมนู viwe -->Toolbars --> Customize ดังรูปครับ
สร้างToolbar เพื่อความสะดวกในการใช้งาน
สร้างToolbar เพื่อความสะดวกในการใช้งาน
2. ไดอะล็อกบล็อก Customize จะแสดงขึ้นมา ที่tabs Toolbars คลิ๊กที่ปุ่ม New --> เสร็จแล้วตั้งชื่อ toolbar ในช่อง toolbar name -->คลิ๊กปุ่ม OK
9
10





คลิ๊กขยายดูรูป
3. จากนั้น คลิกที่ tab Commands --> คลิ๊กเลือก Macro ที่ช่อง Categories
สร้างไอคอนให้ toolbar
สร้างไอคอนให้ toolbar
4. เสร็จแล้ว ก็มาเปลี่ยน Icon ,ชื่อของปุ่ม เปลี่ยนเลขอราบิคเป็นเลขไทย โดย..
a.คลิ๊กที่ Modify selection จะมีรายการขึ้นมา
b.คลิ๊กที่ Name เปลี่ยนเป็นชื่ออะไรก็ได้ ตัวอย่างใช้คำว่า อารบิก2ไทย เสร็จแล้ว
c. คลิ๊กที่ Chang button Image เพื่อสร้าง icon ให้ปุ่ม เลือก Icon ที่ต้องการ ตรง Toolsbar ของเราก็จะมีicon
d. จากนั้น คลิ๊กเมาส์ที่ toolsbar ลากไปไว้ที่ตำแหน่งที่ต้องการ
12
5. การใช้งานก็เพียงแต่ คลิ๊กที่ปุ่มไอคอน ที่เราสร้างเท่านั้นเอง
สำหรับ Microsoft Excel ก็ทำให้ลักษณะเดี่ยวกันเพียงแต่ว่า Code Macro ให้ใช้ Code ข้างล่างนี้แทนครับ
For i = 0 To 9
Cells.Replace What:=Chr(48 + i), Replacement:=Chr(240 + i)
Next
:) และสำหรับผู้ที่ใช้ Offices 2007 ก็สามารถนำวิธีการนี้ไปใช้ได้เลยครับ :)

................................
ขอคุณข้อมูลดีๆ จาก KM ICT - MOPH

ข่าวสารด้าน IT @ ARIP

 
Design by Free WordPress Themes | Bloggerized by Lasantha - Premium Blogger Themes | Lady Gaga, Salman Khan