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


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

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

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

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

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.


View 4 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

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

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


View 2 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

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

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?


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)
ws.PageSetup.PrintArea = ("A2:" & cell.Address)
End Sub

View 3 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.

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

Specific Column Print Macro

Sep 18, 2012

I need to get a button to print specified columns of data. There are columns in between the data that I don't need. So what I need is something that will allow me to print everything in column D starting at row 4 down to the last cell with data in it as well as G and H starting at row 4 down to the last cell with data in it. I have somewhat figured it out but the data ends up being put on different pages when printing. If possible I need it to print side by side on the same page.

View 1 Replies View Related

Macro To Print Specific Sheet If Name Appears In Cell

Nov 13, 2013

I am trying to print one of the Sheets in my Workbook by looking at a specific cell that can have one of the sheet names.

View 7 Replies View Related

Creating Macro To Print Specific Worksheets In Workbook

May 15, 2014

I have an excel workbook with about 40 worksheets. I have a formula in A1 of each sheet that returns a 1 or a 0 depending on whether or not the name of the worksheet is in a list.

What I am trying to do is create a macro that will print all worksheets that have a 1 in A1.

View 2 Replies View Related

Macro To Print Number Of Copies Equal To Output Of Formula In Specific Cell?

Apr 21, 2014

I can assign a number of copies to print by adjusting ActiveWindow.SelectedSheets.PrintOut Copies:= , but what I want it to have the number of copies auto adjust to the value of a cell that contains a formula. I was hoping it would something as simple as Copies:=cell but no luck...

View 2 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

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

Macro To Print Sheets With Value In Cell A1 But Print Dynamic Ranges On Certain Sheet

Sep 24, 2013

I've found some code which works to print certain pages with value in cell A1 but I need to print dynamic ranges on some of the sheets as they will have filters on so the rows ranges will be different each time.

So far this is what I have but the dynamic range part is not working:

Sub Print_All_Worksheets_With_Value_In_A1()
Dim Sh As Worksheet
Dim Arr() As String
Dim N As Integer

[Code] ....

View 3 Replies View Related

Stop Print Macro Firing Before Print Event

Oct 18, 2006

I have a "submit" button macro which user would click after he has finished his input. This macro would update a reference number on the worksheet named "orange" and then print out this worksheet.

My purpose is "orange" is printed out with a reference number.

Below is the 1st code.....

View 9 Replies View Related

Print Specific Rows To A Form

Nov 9, 2007

I found a code which is very useful for my project, I have somehow copied the coding and tried to use it, however, I seek help to accomplish it. My question is as follows:-

I have 3 forms,namely PO1,PO2 & PO3. All the data is extracted from the spreadsheet, how do I call up the PO2 form if the row selected is PO2? Attached is my file for better understanding.

View 10 Replies View Related

Use VBA And Select A Specific Print Area

Oct 3, 2008

is there a way to use VBA and select a specific print area.
i want only up to column 'z' and to select from row 'a' to the final row with data in it.

View 6 Replies View Related

Print All Worksheets Before Specific Sheet

Apr 21, 2008

I am seeking the most efficient code to print all excel worksheets beginning with sheet "XYZ" and ending with the last sheet in the workbook.

- Sheet "XYZ" is always the starting point
- The number of sheets after "XYZ" is variable
- The names of the subsequent sheets are unique and not sequentially named/numbered
- The printing will be to one report (i.e. don't print pages individually)

View 2 Replies View Related

Option To Print - Use Print Macro

Dec 30, 2008

I have a few macros that run in a sheet. After the macros are finnished I would like to present to the user a msgbox that asks if they would like to print. if "Yes" is selected, the print macro runs. If "No" is pressed then nothing happens.

View 3 Replies View Related

Disable Print But Allow Print From Macro

Jun 11, 2007

I have found a macro which disables all print features in excel. I have rwo other codes to print. When I put this macro, It also disables the print from the other macro. How can I use this code so that normal print features will be disabled but if someone takes the print from the macros, Print will be allowed. The code which disables the print is given below:

Private Sub Workbook_BeforePrint(Cancel As Boolean)
If PrtOK Then
Cancel = False
MsgBox "Can't print from here!"
Cancel = True
End If
End Sub

View 9 Replies View Related

Print Specific Pages On Multiple Sheets?

Dec 29, 2012

I have a workbook that has multiple sheets for patients (each named with SSN) with all such sheets having identical structure. I have the VBA code below that prints all sheets. Each sheet will have 7 pages when printed. Is it possible to amend the code so that it prints page 1 and page 3 from each sheets only?

Sub PrintSpecificSheets()
Dim WS As Worksheet, mySheets()
Redim mySheets(0)


View 1 Replies View Related

VBA Print Specific Pages Based On Condition

Jan 25, 2013

I'm looking to setup a macro that will print specific pages on the current worksheet. What pages will print in that same worksheet will be determined on the value of a specific cell.

Here is what I have that isn't working.

Sub Print_Specific_Pages()
'''''''''''''''''''''''''''''''''''''''''''''Prints only pages that contain data
If Range("B3").Value = 0 Then
Worksheets.PrintOut from:=1, to:=1 'Prints page 1 when there is no data.

[Code] ......

View 5 Replies View Related

Copyrights 2005-15, All rights reserved