ورود

View Full Version : نحوه تعريف ماكروي autokeys در ماژول


mohammadsaleh
یک شنبه 30 تیر 1387, 16:19 عصر
با سلام خدمت همه دوستان.

اگه بخواهيم به جاي استفاده از ماكروي اتوكيز از يك ماژو ل استفاده كنيم . نحوه تعريف و استفاده از كليدها به چه شكل است.

من علمني حرفا فقد صيرني عبدا. امام علي عليه السلام
amirzazadeh
یک شنبه 30 تیر 1387, 18:39 عصر
دوست عزيز كافيه اول ماكرو رو درست كني بعد از منوي tools>macros>convert to visual basic رو انتخاب كني اكسس خودش اين كارو برات انجام ميده.
....................................
موفق باشيد
amirzazadeh
دوشنبه 31 تیر 1387, 08:44 صبح
اگر نخواهين كلا از ماكرو استفاده كنين از اين كد در رويداد key down فرمتون استفاده كنين در اين مثال كليد f10 براي بستن فرم استفاده شده به خطر داشته باشين كه در اين حالت key preview فرمتون رو با yes تنظيم كنين.

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = vbKeyF10 Then
DoCmd.Close
End If
End Sub
..........................
موفق باشيد
mohammadsaleh
دوشنبه 31 تیر 1387, 15:59 عصر
سلام دوست عزيز.

اون چيزي كه دوستمون فرمودند فقط ماكروهاي فرم رو به كد تبديل ميكنه . من مي خوام بدانم تو يك ماژول چطور انجام ميشه ؟ اصلا ميشه يا نه . ميدان ديد اين دكمه براي همون فرمه مگه اينكه فرم هميشه باز و آنويزيبل باشه . در هر صورت امكان اين عمل در ماژول مد نظرم هست .


من علمني حرفا فقد صيرني عبدا. امام علي عليه السلام