باز كرده پنجره( print (ctrl+p

[jeddi]

سلام خدمت دوستان عزيز
_ يه سئوال اگه ممكنه راهنمايي بفرمائيد
پنجره print - كه از طريق ctrl+p باز ميشود را ميشه با كد نويسي در CommandButton باز كرد
با تشكر از همه دوستاني كه لطف دارند

[plc_pcb]

RE: باز كرده پنجره( print (ctrl+p


با سلام

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

Application.Dialogs(xlDialogPrint).Show

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

SendKeys "^{p}"

[jeddi]

RE: باز كرده پنجره( print (ctrl+p

دوست عزيز خيلي خيلي متشكرم
فقط جمله آخري را خوب متوجه نشدم ميشه يه مقدار بيشتر توضيح بدي
يه سئوالي كه به ذهنم امد اين كه ميشه براي اجراي يه CommandButton شرت كات گذاشت
با تشكرات فراوان از لطف دوستان عزيز

[plc_pcb]

RE: باز كرده پنجره( print (ctrl+p

دوست عزيز خيلي خيلي متشكرم
فقط جمله آ---ي را خوب متوجه نشدم ميشه يه مقدار بيشتر توضيح بدي
يه سئوالي كه به ذهنم امد اين كه ميشه براي اجراي يه CommandButton شرت كات گذاشت
با تشكرات فراوان از لطف دوستان عزيز

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

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

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

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