کد بستن یک ورک بوک و دستور پرینت

[ali719]

سلام
1:من چه کدی را در قسمت وی بی اکسل بنویسم تا وقتی روی دکمه آن کلیک میکنم کلا از اکسل خارج شوم (مانند وقتی که روی ضربدر بالای کلیک میکنم دکمه سیو میاد )
2: برای بالا آمدن پنجره پرینت در اکسل چه کدی را باید بنویسم(مانند دستور ctrl+p)

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

[Javid Mokhtari]

سلام
1:من چه کدی را در قسمت وی بی اکسل بنویسم تا وقتی روی دکمه آن کلیک میکنم کلا از اکسل خارج شوم (مانند وقتی که روی ضربدر بالای کلیک میکنم دکمه سیو میاد )
2: برای بالا آمدن پنجره پرینت در اکسل چه کدی را باید بنویسم(مانند دستور ctrl+p)

با سلام.
برای بستن نرم افزار اکسل :

Application.Quit 

برای بستن ورک بوک :

Application.ActiveWorkbook.Close 

برای پرینت مستقیم(بدون پیش نمایش) :

ActiveSheet.PrintOut 

برای پیش نمایش پرینت :

ActiveSheet.PrintPreview 

نمایش لیست خروجی های پرینت :

Application.Dialogs(xlDialogPrinterSetup).Show 

نمایش پنجره تنظیمات پرینت -

دستور ctrl+p

:

Application.Dialogs(xlDialogPrint).Show 

[ali.b]

ببخشید حالا با این دستور پرینت رو من قرار دادم ولی من به کامپیوترم 4 5 تا چاپگر که در فایل های مختلف هی تغییر میدم .حالا میخام داخل کد تنظیم کنم که مثلا با فلان چاپگر چاپ کن ؟؟
یا همون دستور چاپ با یک چاپگر مخصوص اگه حتی روی ی چاپگر دیگ تنظیم بود مثلا فقط با hp چاپ کنه

سلام ازین کد استفاده کنید

  Application.Dialogs(xlDialogPrinterSetup).Show