Change The Printer Proprties Using VBA

Nov 22, 2007

i am using windows xp, and i am printing from a matrix printer, so i go to file then print then on the top right of the dialog box it say properties, and i go there to change the printers speed and darkness, the i click ok to print.

ADVERTISEMENT

Change Default Printer

May 17, 2009

I have got a buttion that changes various layout and borders for the page then shows a printpreview, after printprewiew closes.

Then a msgbox that askes if you would like print. Is there a way to change the defult printer between local printer and adobe distiller(.pdf) as a dropdown option box. Or Yes for Local printer and NO for adobe distiller(.pdf) using vbYesNoCancle.

View 9 Replies View Related

Open Print Window To Change Printer And Select Number Of Copies?

Oct 5, 2011

The below code opens up the printpreview window. This does not allow to select the correct (or change) printer it will automatic use the default printer.

Is there a way for the code to open the print window so I can change the printer and select number of copies?

Code:

Sub Print_Button()
Dim ws As Worksheet, cell As Range
Set ws = Sheets("main")
Set cell = Range("g2000").End(xlUp)
Do Until cell.Value ""
Set cell = cell.Offset(-1, 0)
Loop
ws.PageSetup.PrintArea = ("A2:" & cell.Address)
ws.PrintPreview
End Sub

View 3 Replies View Related

Choosing A Printer

Jun 6, 2007

I want the user to be able to choose a printer but not print at that time.

1. Store the active printer as a variable using application.activeprinter
2. Have a dialog box (the printers available) popup and have them choose one, then store that

3. I know how to do the rest, but I will have the word document print out with the selected printer, then use the application.activeprinter reset to the original one

View 9 Replies View Related

Way To Set The Printer's Properties Using VBA

Oct 16, 2007

Is there a way to set the printer's properties using VBA?

Sometimes we set the printer for BEST quality to do photos or brochures. Well if we don't change it back, when we go to print a spreadsheet, it takes forever because it is set on best quality.

So......
I want to be able to set the print properties to normal using VBA.

View 9 Replies View Related

Set VBA For Default Printer

Sep 30, 2008

I need an assistance in setting up a VBA for the default printer in my office. The issue is I want my spreadsheet to be set up to wherever I open the spreadsheet at any computers in the facility. I want the sheet to be printing out directly at the printer in my office only. Is there a way to do this?

View 9 Replies View Related

Selecting A Printer

Jan 12, 2009

I have a form that all the salespeople use. The last thing in the process is to print the completed form to a specific printer. I recorded a macro to get the proper name of the printer but I am finding out that it records differently for each computer. Is there a way around this?

View 9 Replies View Related

Set Printer To Cell Value

Nov 23, 2006

I have a quality form that is produced from data on an Excel log file. I was wondering if it is possible to select a different network printer based upon the value of a certain cell.

I understand how to print using the local machines local printer but our quality department is located at one site and these forms need to be printed at our other locations.

View 3 Replies View Related

VBA To Print To Printer That Is Not Default?

Jun 5, 2014

I have a spreadsheet where I am trying to print barcode labels. The barcode is found in cell A1. I have looked in a lot of places and I can't really figure out exactly how to do it. This is the code that I have so far but it gives me an error. The printer name should be right. Some of this code I just copied from another thread.

[Code].....

View 4 Replies View Related

Printing To A Cute Pdf Printer

Feb 5, 2009

how to automate the printing of Excel sheets each with a different name to a Cute pdf printer?

I have a VBA procedure which uses Windows API calls to write to a system ini file (which I understand is a necessary requirement of the Cute software), which loops through all the sheets I need to print, and sends them one by one to a Cute pdf printer. However each time the 'print' instruction is invoked - I say print but of course this is really a file save process, the Save As dialog box pops up asking the user to confirm the save.

What I want to achieve is the file gets saved automatically, with the relevant sheet name with no confimation dialog box.

View 9 Replies View Related

Printer Detection Macro In VBA

Jun 13, 2009

i have a workbook system that is used on 25 standalone machines that all have different printers everytime i install on a new system i have to reconfigure all of the printers that i have set up in VBA i am curious to find out as to whether or not there is a macro i can use that will generate a list of all printers on a machine that i can then use to refrence a printer name in my VBA

View 3 Replies View Related

Ask User To Select A Printer [{}]

Jan 2, 2007

I have a file for which I wish only selected pages to be printed, so I have disabled the print function in the ThisWorkbook module. Instead, the user chooses from a menu of available sheets to print, via a user form, and then requests the print.

I've got most of this sussed in my mind, but the users need the option of which printer to use (loads of networked printers available and the choice will depend upon monochrome for draft print or full colour for final print), so I want to be able to call up the printer dialog box using

Application.Dialogs(xlDialogPrint).Show
BUT!!!!

I want all the options on the dialog box disabled, except for the choice of printer as clicking OK after choosing the printer adds the active sheet to the list of items to print.

View 2 Replies View Related

Choosing Specific Printer In Vba

Jun 16, 2007

In my program I want some labels to be printed on printer P661 (black/white) and other labels on printer P656 (color).

Q: is it possible to do this in vba for my code?

The labels are made in Word and printed from within Excel.


Sub PrintNACL_LABEL()
Dim oWord As Object
Dim sPath As String
Dim iCnt As Integer

sPath = ThisWorkbook.Path & Application.PathSeparator & "NACL_LABEL.doc"

iCnt = Val(InputBox("Hoeveel exemplaren?", "NACL_LABEL", 1))

If iCnt >= 1 Then

Set oWord = CreateObject(Class:="Word.Application")

With oWord.Documents.Open(sPath)
.PrintOut Background:=False, Copies:=iCnt
.Close False
End With

oWord.Quit False
End If

Set oWord = Nothing
End Sub

The specific printers in the network are:

Color ---> "\PlantijnP656 op Ne00:"
Black/white ---> "\plantijn2000oldP661 op Ne02:"

View 9 Replies View Related

Active Network Printer

Oct 30, 2008

Is there a way to test for an active default network printer?

In my module the code sets the paper size and a few other printer settings, if my default network printer is down or offline the code fails.

If I could test for active default printer I could remove this error.

View 9 Replies View Related

Find Active Printer

Mar 5, 2009

I have excel printing some sheets to pdf and it works fine on my PC. WHen someone else tries to print it wont work because they arent on "Adobe PDF on Ne02:"...they maybe on Ne03 or Ne08 or ne05...you get my point.

I saw code on here before as to how to find the proper "port" but after a bit of searching, i cant find it again.

Application.ActivePrinter = "Adobe PDF on Ne02:"
ActiveWindow.SelectedSheets.PrintOut Copies:=1, ActivePrinter:= _
"Adobe PDF on Ne02:"

View 9 Replies View Related

Print Each Worksheet To Printer Of Same Name

Apr 14, 2009

I have a workbook with 150-some-odd sheets, each with a store number. I would like to loop through each sheet & print that sheet to the printer with the same name in my printers & faxes queue.

(eg. sheet 9604 would print to printer name oki9604)

View 9 Replies View Related

Identify Default Printer

Sep 30, 2004

how to identify in code which installed printer is set as the default printer? I can set/switch printers easily enough but don't seem to be able to identify the default printer as opposed to the active printer...

View 6 Replies View Related

VBA Code And Cutepdf Printer

Jun 2, 2006

I'm trying to save excel files as pdf using vba code and the cutepdf printer. If I do this manually it works, but when I write code it saves the output to a file that cannot be read or opened

Unfortunately I don't have access to the pdfdistiller so can't use this technique which I've seen described in a number of forums.

The code I've used is below.

[PHP]Sub pdfing()

Dim cntTrue As Long, cnt As Long
Dim rng As Range, bk As Workbook
Dim fName As String
Dim WB As Workbook
Dim FundName As String

Workbooks.Open ("S:SRQFSFCWNames")

Range("A1").Select

Do
FundName = ActiveCell.Value

fName = Dir("S:SRQFS" & FundName & ".xls")
Do While fName <> ""
Workbooks.Open ("S:SRQFS" & fName), UpdateLinks:=0
cnt = cnt + 1
fName = Dir()
Application. ScreenUpdating = False
Loop

ActiveWorkbook.UpdateLink Name:=ActiveWorkbook.LinkSources

Range("A3:X3").Select
ActiveWorkbook.Save

View 4 Replies View Related

Install Network Printer Via VBA

Jul 26, 2007

I have a new workbook that needs to be printed to a specific printer regardless of who the user is. I am happy with the method used for doing this using the PrintOut function, but am trying to work out what to do in the event that the user does not have this printer installed. The logic, not in true VBA syntax, is as follows;

' Check Printer
If <This Printer> Is installed Then
Printout using <This Printer>
Else
Install <This Printer>
Printout using <This Printer>

I found a useful post about ascertaining whether or not a printer is installed, but can't find anything about actually installing a printer via VBA.

View 7 Replies View Related

Printing Two Sheets On Duplex Printer

Mar 30, 2009

Is if possible to set up two different sheets in the same workbook to print as front and back pages on a duplex printer?

View 7 Replies View Related

Print To A User's Default Printer?

Feb 17, 2009

Is there a Macro to automatically print the selected print area (print area is also established within the macro itself) to a user's default printer; whatever that printer may be? Note that this printer and/or printer name could change depending on the user.

I would like this to actually select and print to the default printer without Excel having to ask you. I don't even want the "OK" box to show up if possible. I just want them to run the macro, execute all it's duties, and print, all in 1 shot.

View 3 Replies View Related

Macro Print To Default Printer

Mar 16, 2009

i have a macro that loads a userform for previewing and printing selected sheets. The macro works fine for previewing sheets but when i choose the print button the marco trys to save the file as a .mdi, i want this to select the default printer on the pc instead, the excel file will be onpened on many different pcs so the printers will be different on each machine, hence why i want a default printer selected. This is the section of code from the form

View 2 Replies View Related

Go Back Too Default Printer Each Time

Apr 8, 2009

I have my buttons working, but I need too have it return to the default printer after a button is used. If I send it too PDF it will not let me print it. Is there a way too go back too default printer each time?

View 2 Replies View Related

Macro To Print To Specific Printer

Jun 15, 2009

I am trying to swith between different printers to print out sheets within a single workbook. Recording the macro doesn't work very well and the code I found online doesn't work either (error: object doesn't support property).

How can I set this up to be a dynamic printer setting?
Code I tried:

View 2 Replies View Related

Bring Back Complete Printer Name

Nov 12, 2009

create an array of active printers. I edited the code to write the array to a range, then populate a data validation list with the printer names. All works great. The goal was to select a printer name from the list and run a macro to print some sheets. However, the function doesn't bring back enough of the name to do this. how to edit the function to bring back the whole name.

For example: after running the function the 1st printer returned ="\rizzoHQ-ENG-04"...when i record a macro to print to this printer it needs ""\rizzoHQ-ENG-04 on Ne05:". Here is the function unedited, I bolded the part i think is controlling the name:

View 5 Replies View Related

Print To Papersize A3 Or A4 To A Printer With Different Trays

Mar 6, 2014

I have done a userform which allows the user to select printing to each section(All, A, B or C) of the report to either paper size A3 or A4 looking something like below -

Print All A3 A4 (these buttons are option buttons)
Print A A3 A4
Prtint B A3 A4
Print C A3 A4

I have coded and part recorded a macro to change the paper size to either A3 or A4 depending on the user's selection.

The problem i have is if i take out the print command, it seems to change the paper sizes as it should but when i print it prints to the same size as the previous print i did, regardless of what was selected on the userform.

I have a printer with multiple tray sizes, and since I need to change paper sizes, I assume i need to change trays as well.

Below is the two macros -

'''''''''''''Set Print area and print to A3'''''''''''''''''

Private Sub PrintAllA3_Click()
Dim LastRow As Long
Dim LastCol As Long
With ActiveSheet
LastRow = .Cells(.Rows.Count, "A").End(xlUp).Row
LastCol = .Cells(2, .Columns.Count).End(xlToLeft).Column
End With

[Code]....

View 2 Replies View Related

Print Sheet2 To Specific Printer

Feb 15, 2008

What code can I write to print Sheet1 and Sheet2 on specific Printer and Sheet 3 to another printer, then all other sheets to another printer.

View 9 Replies View Related

Print Macro To Send To PDF Printer

Apr 8, 2009

I want to automate (with the click of a macro button, or hot key sequence) is to:
· take a pre-set print area (which is always the same – 1 page wide x 1 page tall)
· send to the printer
· select the PDF printer from the list (not the default printer for the computer)
· Automatically change the save PDF file name to “(Cell A1) – Weekly Update – (Today’s Date).pdf”
· Change location to save file on Desktop

Feels like a pretty lofty goal for a macro to do all of that – please let me know if that is even possible to set up.

View 9 Replies View Related

VBA Code To Print To Specfic Printer

Apr 22, 2009

I have a macro that prints out several worksheets. My problem is that I want to print these worksheets to a specific color printer. There are many different users and most of them will have a black-and-white printer setup as their default. I want to be able to print using the ip address of the color printer.

I have tried setting the active printer using:

Application.ActivePrinter = "\WP010110.117.3.36"

with little luck... This seems like such a simple thing! I have done a lot of research and can't find a good solution although I have seen the question raised several times!

Ozgrid has been a great source of information and solutions in the past. Please help again!

View 9 Replies View Related

Print Out Spreadsheet In Dotmatrix Printer

Aug 28, 2006

I have developed one file for invoice printing using VBA coding.

When i take print out from excel workbook the print out is comming in Windows Font (i want like Dos prompt printing).

I want to take printout in Dot matrics printer for invoice printing and the print out has to come like Lotus123 spreadsheet print out (dos mode).

is it possible to get print out like Lotus123? If possible can u please tell me how to change the printing property in excel spreadsheet.

View 3 Replies View Related

Convert Worksheets To PDF Without PDF Printer Installed

Nov 3, 2006

I would like to save a Sheet as a PDF, however I do not have access to install a PDF-printer service (like PDF995 etc) on all the PCs at work. I've been Google-ing for the past week, and there are a lot of options out there, however all the options I have found fall into 3 categories;

- Prohibitively epensive
- Install a Printer
- Convert text only

I need something that mimics the output of Distiller (which I have at home) as either an excel addin or a stand-alone program which I can run via Shell. (I should be able to cope with the VBA for this : D) I don't need charts etc printed, however I do need a simple graphic (logo) to be included.

View 2 Replies View Related

Hp Printer Prints Blank Pages

Jun 14, 2007

When printing an Excel workbook/Worksheet that has been emailed via Lotus notes 7.02 the print job is all blank pages - PrintPreview is normal and correct - Page Breaks are set correctly - The correct number of pages are printed but, ALL Pages are blank. The printer is an HP 6310 All-in-One connected locally via USB. If Printed to Adobe, ALL pages are correct and can be printed on the HP 6310. If another printer is selected (ie: Any Network Printer) the results are the same. This occurrs only on certain spreadsheats received from only a few users.

View 3 Replies View Related

Reset Default Printer Settings In Vba

Jun 14, 2007

We have printer mailboxes setup for all of the employees and sometimes the print settings get saved in the excel files. This means that when another employee uses the file their prints get sent to the wrong mailbox. We have hundreds of files like this and it causes all kinds of problems with prints going to wrong mailboxes!
Obviously their default print settings are all set to their own mailboxes.

Is there some way, using vba, to get an excel file to go back to using the user's default printer settings instead of the ones saved in it's file? (or get it to remove the printer settings saved in it's file). That way I could just make an application level open event to fix the problem! Either that or some way, in vba, of changing a user's storage box number for a specific printer.

View 2 Replies View Related

Userform As Printer Interface For Protected Workbook

Apr 21, 2014

I'm closing in on the final stage of a large project and I've run into a road block. The following line of code is preventing my users from being able to select specific page ranges when using the Print Entire Workbook option in the print menu.

[Code] .....

I've attached the latest version of my form (with significant support by jaslake) to explain what I'm attempting here. The attached form has several macros that activate upon open; including a user form. The password for the workbook/worksheets/VBE is "j".

Attached File : HCT-RCS ITP V1.89.xlsm

View 14 Replies View Related

Print Macro: The Data To Be Printed To Another Printer

Dec 15, 2008

I have the following code to print a selection of data which is fine but i need to have in the code a different printer. So, for example my default printer needs to stay the same but when this spreadsheet is open i need the data to be printed to another printer.

View 3 Replies View Related

Printing With Dot Matrix Printer On Pre-printed Forms

Dec 12, 2013

My company started using preprinted forms to print out delivery receipts with a dot matrix printer. We only need to print 2 pieces of data on this form at specific places, then move onto a new form and print the next 2 pieces of info. Ive tried searching and haven't found anything remotely related to this situation.

Essentially, we will have a spreadsheet with 2 columns with cells containing stock codes eg:
StockA1 StockB1
StockA2 StockB2
etc

The number of rows will vary, one week may be 20 rows of info, the next may be 76 rows.

I need to be able to take the info in each row, and send it to the printer so that it prints in the right place of the form, and move onto the next row/page until all rows have been printed.

Currently, I have a spreadsheet with a bunch of empty rows, 2 rows where the info needs to be, then more empty rows followed by the next 2 items, empty rows etcetc...As you can imagine this could require some tedious reworking week after week as the number of forms to be printed changes each week.

There has to be a better way to do this! I havent got the experience of working with excel (or dot matrix printers)

View 5 Replies View Related

VBA To Send Text File To USB Dot Matrix Printer

May 22, 2014

How do I send a text file to a usb dot matrix printer as opposed to a parallel port.

I have an Excel spreadsheet that prints labels on a dot matrix printer. Until now the printer used a parallel port. My Excel workbook generates a text file "C:PRINTLABEL.TXT". I then execute a shell command to run a batch file called

"C:PRINTLABEL.BAT". The BAT file contains the line
----------------------
copy C:PRINTLABEL.txt lpt3
------------------------
The shell command contains the lines (not all lines are shown)
-------------------
On Error GoTo ErrorHandler ' Enable error-handling routine.
RetVal = Shell("C:PRINTLABEL.BAT") ' PRINTS LABEL.
Exit Sub ' Exit to avoid handler.
----------------------------------------

Now I have to deal with a newer dot-matrix printer (EpsonLX300+II) that is able to use a USB port.

How do I print the plain txt file to the printer using the USB port (LPT1/2/3 are all parallell ports, so the batch file does not work as it stands.

View 4 Replies View Related

Print Labels To Continuous Roll Printer

Dec 4, 2006

We have a an existing spreadsheet which uses a query from Excel to Sage Line50 Accounting software to create labels for stock items. The number of times a label is printed is dictated by the number of items that are required for a particular sales order.

For example -
1006abc 100 No.
2003abc 20 No.

The program would produce 100 labels for item code 1006abc, and would produce 20 labels for item number 2003abc.

However we have recently acquired a heavy duty industrial printer which prints to labels on a continuous roll and I am unable to alter the spreadsheet to work with the new printer layout.

I have attached the spreadsheet and, I hope, the VBA code. PLease also see this link to my previous post - Print Labels Dependant on Content

View 9 Replies View Related

VBA Print Preview Code Causes Crash If No Printer Installed

Aug 23, 2009

activesheet.printpreview , Excel crashes if there are no printers installed on the machine. How can i check for printers before calling the printpreview, or else stop the program from crashing?

View 2 Replies View Related

Network Printer 'ActivePrinter' Of Object'_Application' Failed

May 18, 2007

I am having trouble printing a page to both a local printer (which works fine) and a network printer (which does not work) Both printers are installed on the Computers. The error message I get when I try to run the macro is Run-Time ERror '1004': 'ActivePrinter' of object'_Application' failed. The codes that I have used are

Application.ActivePrinter = _
"\SAUWTPFS01.sopac.pilkington.netDespatch Toughend & Batch reports (L164) on Ne05:"

and

Application.ActivePrinter = _
" \sauwtpfs01pauwtp0305 on Ne05:"

and

Application.ActivePrinter = _
" \sauwtpfs01pauwtp0305"

It works on the day I record the macro. As soon as the next day comes around I get the error message. When I click debug it is these lines that are highlighted in yellow. I have looked at this for several days on and off and I always get the same error.

View 7 Replies View Related

Excel 2013 :: How To Record Printer Info With Macro Recorder

Dec 6, 2013

Had 2003 now 2013. Trying to get the macro to select different printers for different doccuments. 2013 macro recorder does not record any printer info or path, all printers show the same wording just application print...

How can I get the recorder to acurrately record and diferentiate printers?

View 2 Replies View Related

ADVERTISEMENT