از کارانداختن کلیدهای میانبر

Collapse
این تاپیک قفل است.
X
X
Collapse
 
  • صفحه از 1
  • زمان
  • نمایش
حذف همه
new posts
قبلی template بعدی
  • exceliran

    • 2010/02/15
    • 86
    #1

    [حل شده] از کارانداختن کلیدهای میانبر

    سلام. وقت بخیر
    چطور میشه تمام کلیدهای میانبر رو در فایل موردنظر از کار انداخت؟
    باتشکر فراوان
    برچسب ها: کلیدهای, کارانداختن, میانبر
    • amir_ts

      • 2015/03/17
      • 1247
      #2
      با سلام
      بصورت موردی میتونید از دستور onkey استفاده کنید.مثلا کد زیر به ترتیب copy-paste-cut-print رو غیر فعال میکنه.

      کد:
      With Application
.OnKey "^c", ""
.OnKey "^v", ""
.OnKey "^x", ""
.OnKey "^p", ""
End With
      و برای فعال کردن از کد زیر میتونید استفاده کنید.

      کد:
      With Application
.OnKey "^c"
.OnKey "^v"
.OnKey "^x"
.OnKey "^p"
End With
      فایل های پیوست شده
      [SIZE=7][B][COLOR=navy][FONT=IranNastaliq]ای برادر تو همه اندیشه ای[/FONT][/COLOR][/B][/SIZE]

        کامنت

        • exceliran

          • 2010/02/15
          • 86
          #3
          نوشته اصلی توسط amir_ts
          با سلام
          بصورت موردی میتونید از دستور onkey استفاده کنید.مثلا کد زیر به ترتیب copy-paste-cut-print رو غیر فعال میکنه.

          کد:
          With Application
.OnKey "^c", ""
.OnKey "^v", ""
.OnKey "^x", ""
.OnKey "^p", ""
End With
          و برای فعال کردن از کد زیر میتونید استفاده کنید.

          کد:
          With Application
.OnKey "^c"
.OnKey "^v"
.OnKey "^x"
.OnKey "^p"
End With
          ممنوون. واسه pgdn یا pgup زدم ارور داد. اونو چطو باس لحاظ کرد؟

            کامنت

            • amir_ts

              • 2015/03/17
              • 1247
              #4
              این کد ها رو امتحان کنید.
              کد:
              .OnKey "{PGUP}", ""
.OnKey "{PGDN}", ""
              [SIZE=7][B][COLOR=navy][FONT=IranNastaliq]ای برادر تو همه اندیشه ای[/FONT][/COLOR][/B][/SIZE]

                کامنت

                • exceliran

                  • 2010/02/15
                  • 86
                  #5
                  نوشته اصلی توسط amir_ts
                  این کد ها رو امتحان کنید.
                  کد:
                  .OnKey "{PGUP}", ""
.OnKey "{PGDN}", ""
                  ممنون ولی متاسفانه کارنکرد این 2تا

                    کامنت

                    • amir_ts

                      • 2015/03/17
                      • 1247
                      #6
                      نوشته اصلی توسط exceliran
                      ممنون ولی متاسفانه کارنکرد این 2تا
                      فایل نمونه رو ملاحظه کنید.با همین کد کلید Page Up و Page Dn فعال و غیر فعال میشه.
                      فایل های پیوست شده
                      [SIZE=7][B][COLOR=navy][FONT=IranNastaliq]ای برادر تو همه اندیشه ای[/FONT][/COLOR][/B][/SIZE]

                        کامنت

                        • exceliran

                          • 2010/02/15
                          • 86
                          #7
                          نوشته اصلی توسط amir_ts
                          فایل نمونه رو ملاحظه کنید.با همین کد کلید Page Up و Page Dn فعال و غیر فعال میشه.
                          سپاس بابت پاسخگویی شما مهندس عزیز. منظور من ctrl+pgup و ctrl+pgdn هس که امکان رفتن به شیت های دیگه نباشه. الان هم چنان امکانش هس که به سایر شیت ها رفت.

                            کامنت

                            • amir_ts

                              • 2015/03/17
                              • 1247
                              #8
                              با سلام
                              برای کلید های ترکیبی مثلا Ctrl+Page Up باید قبل از همین کد ها از علامت ^ استفاده کنید.
                              به این صورت میشه:
                              کد PHP:
                              Application.OnKey "^{PGUP}", ""
                              Application.OnKey "^{PGDN}", "" 
                              [SIZE=7][B][COLOR=navy][FONT=IranNastaliq]ای برادر تو همه اندیشه ای[/FONT][/COLOR][/B][/SIZE]

                                کامنت

                                قبلی template بعدی
                                چند لحظه..