User Name :
Password :
 
ลืมรหัสผ่าน? / สมัครสมาชิก!!!
Link URL:หน่วยงาน


http://www.ayph.in.th/index.php
----ผ่านระบบ CAT TELECOM
https://ayo.moph.go.th/index.php
----ผ่านระบบ TOT สรอ.
สถานการณ์อุทกภัยปี 66
สถานการณ์อุทกภัยปี 65
สถานการณ์อุทกภัยปี 64
สถานการณ์อุทกภัยปี 60
ศูนย์อุทกวิทยาภาคกลาง
กรมอุตุนิยมวิทยา
ศูนย์ปฏิบัติการน้ำอัจฉริยะ
ทั้งหมด

คู่มือประชาชนของ สสจ.อยุธยา
คู่มือประชาชนของ ก.พ.ร.
การประชุม กวป.โปร่งใสไร้กระดาษ
รายงานการประชุม กวป.
จังหวัดพระนครศรีอยุธยา
ผลการรับรองรายงานการประชุมกวป.
ระบบฐานข้อมูล 43 แฟ้ม HDC
   HDC กระทรวง
   HDC On Cloud อยุธยา
ระบบการกำกับติดตามงบประมาณโครงการ สธ.(SMS) 2022
ระบบกำกับติดตามแผนปฎิบัติการ
ข้อมูลการเกิด - ตาย กยผ.
ระบบ Ayutthaya Claim
ระบบงานสารบัญ(ECMS2.0)
ระเบียบพัสดุแก้ไข้ 9 เมษายน 2552
ระเบียบพัสดุอิเล็กทรอนิกส์ 2549
ระเบียบพัสดุ 2535 และแก้ไขเพิ่มเติมฉบับที่ 2,3,4,5
ระเบียบว่าด้วยการพัสดุ พ.ศ.2535
previous year previous month มีนาคม 2567 next month next year
SMTWTFS
252627282912
3456789
10111213141516
17181920212223
24252627282930
31123456
ดาวน์โหลด > รายละเอียด
 
รายละเอียด
หัวข้อการใช้แป้นลัด เปลี่ยนตัวเลขใน Microsoft Word จากไทย->อังกฤษ /อังกฤษ->ไทย 
รายละเอียด Microsoft Word2003

1.      สร้าง macro

ไปที่เมนูTool(เครื่องมือ) -> macro (แมโคร) -> Create macro (สร้าง) -> แล้ว copy code ด้านล่างนี้ไปวาง แล้วบันทึกและปิด

###############################################

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

          ##############################################

2.      สร้าง Short Key    Ctrl+t เพื่อเปลี่ยนตัวเลขจากอังกฤษเป็นไทย  และ Ctrl+e เปลี่ยนจากตัวเลขไทยเป็นอังกฤษ   

ไปที่ Tool(เครื่องมือ) -> Customize(กำหนดเอง)-> tab ตัวเลือก -> Customize Keyboard(แป้นพิมพ์) -> เลื่อนหาในCategories(ประเภท) -> macro -> แล้วเลือก arabictothai ใส่แป้น Short key -> Ctrl+t -> Assign(กำหนดค่า)  เลือก thaitoarabic ใส่แป้นShort key Ctrl+e -> Assign(กำหนดค่า) -> Close(ปิด) 

3.     ทดสอบการใช้งาน พิมพ์ตัวเลขไทยหรืออังกฤษก็ได้สัก 4-5 ตัวแล้วกด short key ดูผล

 
Microsoft Word2007

1.      สร้าง macro

ไปที่เมนูView(มุมมอง) -> macro (แมโคร) -> view macro ใส่ชื่อ macro-> arabictothai -> Create macro (สร้าง) -> แล้ว copy code ด้านล่างนี้ไปวางทับทั้งหมด แล้วบันทึกและปิด

###############################################

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

          ##############################################

2.      สร้าง Short Key    Ctrl+t เพื่อเปลี่ยนตัวเลขจากอังกฤษเป็นไทย  และ Ctrl+e เปลี่ยนจากตัวเลขไทยเป็นอังกฤษ   

ไปที่ Dropdownเมนูบนหัว bar แถวรูปแผ่นดิสก์(Customize Quick Access Toolbar) -> More commands -> Choose Command From -> macro เลือก arabictothai -> Keyboard Shortcut Customize -> เลื่อนหาในCategories(ประเภท) -> macro -> แล้วเลือก arabictothai  ใส่แป้น Short key -> Ctrl+t -> Assign(กำหนดค่า) เลือก thaitoarabic ใส่แป้น Short key Ctrl+e  -> Assign(กำหนดค่า)  -> Close(ปิด) -> OK ตกลง

3.     ทดสอบการใช้งาน พิมพ์ตัวเลขไทยหรืออังกฤษก็ได้สัก 4-5 ตัวแล้วกด short key ดูผล

 
ผู้อัพโหลด 
เมื่อวันที่5 พ.ย.53 21:29