انتخاب چاپگر

Collapse
این تاپیک قفل است.
X
X
 
  • زمان
  • نمایش
حذف همه
new posts
  • kazem1359

    • 2018/06/08
    • 331
    • 39.00

    [حل شده] انتخاب چاپگر

    باسلام روی یک سیستم چند چاپگر متصل هست ایا این امکان هست با اجرا ماکرو بتوان ا نواع چاپگر ها قابل مشاهده بشه و خودمان چاپگر را انتخاب کنیم.ممنون
  • mrhartsclube

    • 2017/11/15
    • 130
    • 81.00

    #2
    سلام دوست عزیز

    فقط در این کد بجای ThisWorkbook هرچیزی که میخواین پرینت بشه بذارین. لازم هم نیست حتما بسرعت بعد از انتخاب پرینتر پرینت گرفته بشه، واسه همین خط آخر کلا اختیاریه

    کد PHP:
    Dim ActvPrntr As String

    Application
    .Dialogs(xlDialogPrinterSetup).Show

    ActvPrntr 
    Application.ActivePrinter

    ThisWorkbook
    .PrintOut ActivePrinter:=ActvPrntr 
    [CENTER][COLOR=#696969][FONT=lucida console]... [B]Programming [/B]C# - VB.Net - VC++ - ASP.Net - HTML - CSS - JS - AS2 - AutoIt - Pascal - Delphi - PHP - Python - VBA - Etc
    [/FONT][/COLOR][SIZE=2][FONT=lucida console][COLOR=#808080]... 2D & 3D [B]Graphic Designer[/B][/COLOR][COLOR=#ff0000][B]|[/B][/COLOR][COLOR=#808080] 2D & 3D [B]Animator [/B][/COLOR][COLOR=#ff0000][B]|[/B][/COLOR][COLOR=#808080] [B]Game [/B]Designer & [B]Hacker [/B][/COLOR][COLOR=#ff0000][B]|[/B][/COLOR][COLOR=#808080] Data [B]Forensic [/B]Expert [/COLOR][COLOR=#ff0000][B]|[/B][/COLOR][COLOR=#808080] [B]Ethical [/B]Hacker [/COLOR][COLOR=#ff0000][B]|[/B][/COLOR][COLOR=#808080] [B]Pen[/B] Tester

    [/COLOR][/FONT][/SIZE][COLOR=#ff0000][FONT=courier new][SIZE=4][B].: Expert in doing what nobody else can :.[/B][/SIZE][/FONT][/COLOR][/CENTER]

    کامنت

    • kazem1359

      • 2018/06/08
      • 331
      • 39.00

      #3
      سلام ممنون عالی بود

      کامنت

      چند لحظه..