PDA

توجه ! این یک نسخه آرشیو شده میباشد و در این حالت شما عکسی را مشاهده نمیکنید برای مشاهده کامل متن و عکسها بر روی لینک مقابل کلیک کنید : باز كرده پنجره( print (ctrl+p


jeddi
2011/10/15, 19:18
سلام خدمت دوستان عزيز
_ يه سئوال اگه ممكنه راهنمايي بفرمائيد
پنجره print - كه از طريق ctrl+p باز ميشود را ميشه با كد نويسي در CommandButton باز كرد
با تشكر از همه دوستاني كه لطف دارند
plc_pcb
2011/10/15, 22:39
با سلام

کد زیر را در یک ماژول قرار دهید و به یک باتن اساین کنید

Application.Dialogs(xlDialogPrint).Show

و یک راه جامع تر که میتونی از تمام شرت کات ها از این دستور استفاده کنی:

SendKeys "^{p}"
jeddi
2011/10/16, 18:08
دوست عزيز خيلي خيلي متشكرم
فقط جمله آخري را خوب متوجه نشدم ميشه يه مقدار بيشتر توضيح بدي
يه سئوالي كه به ذهنم امد اين كه ميشه براي اجراي يه CommandButton شرت كات گذاشت
با تشكرات فراوان از لطف دوستان عزيز
plc_pcb
2011/10/16, 20:09
دوست عزيز خيلي خيلي متشكرم
فقط جمله آ---ي را خوب متوجه نشدم ميشه يه مقدار بيشتر توضيح بدي
يه سئوالي كه به ذهنم امد اين كه ميشه براي اجراي يه CommandButton شرت كات گذاشت
با تشكرات فراوان از لطف دوستان عزيز


من اشتباه به جای نوشتن کلیدهای میانبر از کلمه شرت کات استفاده کردم منظورم این بود که
روش دومی که استفاده از دستور SendKeys بود یک روشی است که میتوان از تمام
کلیدهای میانبر که در محیط اکسل استفاده میشود دسترسی داشت مثلا

برای پرینت SendKeys "^{p}" ctrl+p

باز کردن فایل SendKeys "^{o}"
ctrl+O

alt+F4 [/align]و غیره