PDA

View Full Version : کلید میانبر برای باز شدن یک جدول


barname_m708
یک شنبه 04 اسفند 1387, 15:10 عصر
با عرض سلام خدمت دوستان
من یک جدول دارم و میخوام بدون گذاشتن کلیدی برای فشردن این جدول رو باز کنم .میخوام بدونم آیا میشه با یک کلید Shortcut این کار رو انجام بدم.لطفا اگر این کار شدنی هست راه حل اونو به من بدین


با تشکر
مهدی قربانی
یک شنبه 04 اسفند 1387, 16:10 عصر
سلام
یک ماکرو AutoKeys ایجاد کنید در ستون Macro Name عبارتی مثل m^ وارد کنید که و در ستون Action هم گزینه OpenTable انتخاب کنید و نهایتاً در قسمت Table Name هم نام جدولی که می خواین باز بشه رو انتخاب کنید . حالا شما می تونید با کلیدهای Control+m جدول رو در محیط فایل اکسس باز کنید .
barname_m708
یک شنبه 04 اسفند 1387, 17:35 عصر
سلام
یک ماکرو AutoKeys ایجاد کنید در ستون Macro Name عبارتی مثل m^ وارد کنید که و در ستون Action هم گزینه OpenTable انتخاب کنید و نهایتاً در قسمت Table Name هم نام جدولی که می خواین باز بشه رو انتخاب کنید . حالا شما می تونید با کلیدهای Control+m جدول رو در محیط فایل اکسس باز کنید .


آقای قربانی سلام

من چه طوری باید ماکروی AutoKeys ایجاد کنم.لطفا راهنمایی بفرمایید
e601
یک شنبه 04 اسفند 1387, 21:04 عصر
آقای قربانی سلام

من چه طوری باید ماکروی AutoKeys ایجاد کنم.لطفا راهنمایی بفرمایید

سلام

اصلا کار پیچیده ای نیست دوست من. فقط کافیه کارهایی که جناب قربانی فرمودن رو انجام بدین و ماکرو را با نام Autokeys ذخیره کنین. همین :لبخندساده:

موفق باشید...
barname_m708
دوشنبه 05 اسفند 1387, 09:06 صبح
با سلام

من نام ماکرو Autokeys گذاشتم و همه کارهایی رو که گفته بودبد انجام دادم ولی وقتی ماکرو رو میبندم و کلید ctrl+m رو میزنم جدولی رو که میخام باز بشه رو باز نمیکنه.آیا باید کار خاصی انجام بدم
barname_m708
دوشنبه 05 اسفند 1387, 09:07 صبح
سلام

اصلا کار پیچیده ای نیست دوست من. فقط کافیه کارهایی که جناب قربانی فرمودن رو انجام بدین و ماکرو را با نام Autokeys ذخیره کنین. همین :لبخندساده:

موفق باشید...
با سلام
من نام ماکرو Autokeys گذاشتم و همه کارهایی رو که گفته بودبد انجام دادم ولی وقتی ماکرو رو میبندم و کلید ctrl+m رو میزنم جدولی رو که میخام باز بشه رو باز نمیکنه.آیا باید کار خاصی انجام بدم
مهدی قربانی
دوشنبه 05 اسفند 1387, 10:16 صبح
سلام
دوست عزیز بهتره نمونه فایلتون رو بذارید تا ببینیم مشکل چیه .
barname_m708
دوشنبه 05 اسفند 1387, 10:51 صبح
سلام
دوست عزیز بهتره نمونه فایلتون رو بذارید تا ببینیم مشکل چیه .
آقای قربانی با سلام و تشکر
باید بگم که با راهنمایی شما مشکلم حل شد


با تشکر
barname_m708
دوشنبه 05 اسفند 1387, 15:19 عصر
آقای قربانی با سلام و تشکر
باید بگم که با راهنمایی شما مشکلم حل شد


با تشکر
باید بگم که با راهنمایی شما مشکلم حل شد.,ولی یک سوال حالا اگه بخواهیم چتد تا کلید میانبر در برنامه ایجاد کنیم با توجه به اینکه فرمودید نام ماکرو باید Auotokeys باشه ،چگونه باید عمل کرد که نامهای ماکروها با هم یکی نشه
مهدی قربانی
سه شنبه 06 اسفند 1387, 00:08 صبح
سلام
ببينيد بعضي ماكروهاي خاص مثل AutoExec و AutoKeys در اكسس منحصر به فرد هستند يعني شما از اين نوع ماكروها فقط يكي مي تونيد در برنامه داشته باشيد بنابراين لزومي نداره براي هركليد ميانبر يك ماكرو AutoKeys بسازيد شما مي تونيد در هر سطر ماكرو يك كليد تعريف كنيد
dadsara
چهارشنبه 24 تیر 1388, 08:38 صبح
باسلام
اگر بخواهیم از کلیدهای ترکیبی جهت کلید میانبر استفاده کنید آیا روش زیر درست است
به عنوان مثال Ctrl+S

If KeyCode = vbkey ^ s Then megbox 11
dadsara
شنبه 03 مرداد 1388, 10:15 صبح
سلام
از دوستان کسی به جواب اگر رسیده لطفا بنده را مطلع کند
dadsara
دوشنبه 16 شهریور 1388, 09:08 صبح
باسلام
اگر بخواهیم از کلیدهای ترکیبی جهت کلید میانبر استفاده کنید آیا روش زیر درست است
به عنوان مثال Ctrl+S

If KeyCode = vbkey ^ s Then megbox 11
سلام
لطفا در خصوص استفاده از کلیدهای ترکیبی CTRL + کلید دیگر با استفاده از VBA توضیح دهید
amirzazadeh
دوشنبه 16 شهریور 1388, 10:19 صبح
سلام
لطفا در خصوص استفاده از کلیدهای ترکیبی CTRL + کلید دیگر با استفاده از VBA توضیح دهید
ميتونين به عنوان مثال براي كليد تركيبي" كنترل + a "از اين كد استفاده كنين(كنترل s جواب نميده احتمالا جز كليدهاي ذخيره شده اكسس هست)



Private Sub Form_KeyPress(KeyAscii As Integer)
If KeyAscii = 1 Then
MsgBox "ctrl + a"
End If
End Sub
..........................
موفق باشيد