تعریف کلید خاص برای اجرای کد

**Juliet** · 2014/08/18

درود دوستان
آیا این امکان هست که بدون نیاز به مثلاً دکمه برای اجرای کد ها با فشردن کلیدی خاص بخشی از کد اجرا بشه؟

(به عنوان مثال نیاز دارم در هر موقعیتی روی صفحه اکسلم (و نه در یوزر فرم) با زدن کلید F5 تابع TextBox_KeyDown اجرا بشه)
یا حداقل بتونم با زدن دکمه ای این تابع رو فراخوانی کنم، چون وقتی عددی به عنوان آرگومان KeyCode (که در تابع تعریف شده As MSForm.ReturnInteger) وارد میکنم خطای Type Missmatch میده.

سپاس از راهنماییتون

اخطار: این یک موضوع قدیمی است
به دلیل قدیمی بودن موضوع، ممکن است برخی فایل های ضمیمه به درستی کار نکنند. لطفا در صورت عدم ضرورت، از بالا آوردن موضوعات قدیمی خودداری نمایید.

سیستم تبلیغات اکسل ایران

**~M*E*H*D*I~** · 2014/08/18

درود

**Juliet** · 2014/08/19

سپاس از توجه و راهنمایی شما
من از Record Macro استفاده نکردم، کد های vba دارم و یا این کادر از بین همه کد هایی که پشت شیت ها هست، فقط کلیک یکی از دکمه های یکی از شیت ها رو بهم میده، دستی هم که آدرس دادم (مثلاً Sheet1.tb_Code_s_KeyDown) قبول نکرد.

**khakzad** · 2014/08/19

دوست عزیز شما اگر کدتون رو داخل ماژول نوشته باشید با همین روش جناب وطن پرست شدنی هست.
این قسمت کدهای داخل ماژول رو نشون میده
پشت شیت منظور چی هست؟؟؟؟؟

در نهایت فایلتون رو بذارید تا بررسی بشه

**علی فاطمی** · 2014/08/19

با سلام ، از خصوصیت Accelerator استفاده کنین ممکنه جواب بگیرین.

**Juliet** · 2014/09/02

نوشته اصلی توسط khakzad

دوست عزیز شما اگر کدتون رو داخل ماژول نوشته باشید با همین روش جناب وطن پرست شدنی هست.
این قسمت کدهای داخل ماژول رو نشون میده
پشت شیت منظور چی هست؟؟؟؟؟

در نهایت فایلتون رو بذارید تا بررسی بشه

درود گرامی
مشکل من با روش آقای وطن پرست اینه که در پنجره ماکرو هیچ عنوانی ندارم (همان طور که در تصویر می بینید همه دکمه ها غیر فعال هستن
+
منظورم از کد پشت شیت، پروسیجر های مربوط به آبچکت هاست که از طریق دابل کلیک روی آن ها ایجاد میشن

در نهایت در فایل نمونه ای که ضمیمه کردم، روی شیت اول TextBox دارم که با اینتر متن نوشته شده رو به کاربر نشون میده، میخوام: