แป้นพิมพ์ลัดใน Microsoft Office รุ่นที่ไม่ใช่ภาษาอังกฤษ

ฉันมีปัญหาใหญ่กับ MS Office 2007 และ 2010 รุ่นภาษาโปรตุเกส

ทางลัดมาตรฐานที่แอปพลิเคชันทั่วไปใช้มีการเปลี่ยนแปลง
ทางลัดบางอย่างที่ไม่ทำงาน: Ctrl+ s(บันทึก), Ctrl+ f(ค้นหา) และCtrl+ a(เลือกทั้งหมด)

ฉันต้องการกำหนดค่าให้ใช้ทางลัดของเวอร์ชันภาษาอังกฤษ

มีตัวเลือกที่อนุญาตให้กำหนดค่าทางลัดแต่ละรายการแยกกัน นอกจากนี้ฉันต้องกำหนดค่าสำหรับแต่ละแอพหากฉันกำหนดค่าใน Word ฉันจะต้องกำหนดค่าอีกครั้งสำหรับ Excel

จะใช้ช็อตคัตของ MS Office เวอร์ชันภาษาอังกฤษได้อย่างไรโดยไม่คำนึงถึงภาษา Office

ขอบคุณ

ฉันเกือบจะแน่ใจว่าไม่มีวิธีการเปลี่ยนทางลัดในแอปพลิเคชัน MS Office ในตัว

อย่างไรก็ตามคุณสามารถใช้AutoHotkeyเพื่อจุดประสงค์นี้

สคริปต์

^a::
^f::
^s::
    WinGet, Process, ProcessName, A
    if(RegExMatch(Process, "^(WINWORD|EXCEL)\.EXE$"))
    {
       if(A_ThisHotKey = "^a")
           SendPlay, ^e
       if(A_ThisHotKey = "^f")
           SendPlay, ^b
       if(A_ThisHotKey = "^s")
           SendPlay, ^g
    }
    else
        SendPlay, %A_ThisHotKey%
return

มันทำงานอย่างไร

• ^a::ระบุหนึ่งในคีย์ลัดที่รันสคริปต์ก่อนreturnคำสั่งโดยที่^บ่งชี้ถึงCtrlคีย์

• WinGet, Process, ProcessName, Aเก็บที่ใช้งาน (คนAชื่อกระบวนการ) Processของหน้าต่างในตัวแปร

• if(RegExMatch(Process, "^(WINWORD|EXCEL)\.EXE$")) {...} else ...ตรวจสอบว่าProcess ตรงกับการแสดงออกปกติคือถ้ามันตรงกับของสตริงหรือWINWORD.EXEEXCEL.EXE

  • ถ้าเป็นเช่นนั้นบล็อกแรกจะถูกดำเนินการ

    • if(A_ThisHotKey = "^a")การตรวจสอบถ้าฮอตกดเป็น+CtrlA

      ถ้ามันคือมันจำลอง bombination คีย์Ctrl+ Eซึ่งเป็นฮอตโปรตุเกสการเลือกทั้งหมด1

  • มิฉะนั้นSendPlay, %A_ThisHotKey%จำลองชุดคีย์ที่กดครั้งแรก

    ด้วยวิธีนี้แอปพลิเคชันอื่น ๆ ยังคงทำงานตามที่ควรจะเป็น

วิธีใช้

1. ดาวน์โหลดและติดตั้ง AutoHotkey เวอร์ชันล่าสุด

2. บันทึกสคริปต์ข้างต้นเป็นms-office.ahkโดยใช้โปรแกรมแก้ไขข้อความที่คุณชื่นชอบ

3. ดับเบิลคลิกที่ไฟล์เพื่อเรียกใช้สคริปต์

4. หากคุณต้องการให้คัดลอกสคริปต์ (หรือลิงก์ไปยังสคริปต์) ในStartupโฟลเดอร์

5. หากต้องการเพิ่มแอปพลิเคชัน MS Office เพิ่มเติมเพียงแค่ปรับเปลี่ยนนิพจน์ทั่วไป

   หากต้องการเพิ่ม PowerPoint เช่นแทนที่โดย(WINWORD|EXCEL)(WINWORD|EXCEL|POWERPNT)

6. ในการเพิ่มปุ่มลัดเพิ่มเติมคุณต้องแก้ไขสองส่วนของสคริปต์

   ในการเพิ่มCtrl+ O(เปิด ... ) เช่นเพิ่มบรรทัด^o::ลงในรายการที่ด้านบนสุดให้เพิ่มบรรทัดเหล่านี้ภายในifบล็อก:

   if(A_ThisHotKey = "^o")
       SendPlay, ^a
   

¹อย่างน้อยฉันก็คิดว่ามันเป็น ฉันเอาปุ่มลัดจาก MS Office สเปนของฉัน ปรับหากจำเป็น

ขึ้นอยู่กับคำตอบก่อนหน้าทางลัดอีกสองสามทาง (สามารถเพิ่มในคำตอบก่อนหน้า):

^a::
^f::
^s::
^w::
^n::
^u::
^d::
^r::
^b::
^i::
^k::
^g::
    WinGet, Process, ProcessName, A
    if(RegExMatch(Process, "^(EXCEL)\.EXE$"))
    {
       if(A_ThisHotKey = "^a") ;seleccionar rango
           SendPlay, ^e
       if(A_ThisHotKey = "^f") ;buscar
           SendPlay, ^b
       if(A_ThisHotKey = "^s") ;guardar
           SendPlay, ^g
       if(A_ThisHotKey = "^w") ;cerrar
           SendPlay, ^r
       if(A_ThisHotKey = "^n") ;nuevo libro
           SendPlay, ^u
       if(A_ThisHotKey = "^u") ;subrayar
           SendPlay, ^s
       if(A_ThisHotKey = "^b") ;negrita
           SendPlay, ^n
       if(A_ThisHotKey = "^i") ;cursiva
           SendPlay, ^k
       if(A_ThisHotKey = "^d") ;filldown
           SendPlay, ^j
       if(A_ThisHotKey = "^r") ;fill right
           SendPlay, ^d
       if(A_ThisHotKey = "^k") ;hyperlink
           SendPlay, ^!k
       if(A_ThisHotKey = "^g") ;goto
           SendPlay, ^i
    }
    else
        SendPlay, %A_ThisHotKey%
return