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.
VB:
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
ADVERTISEMENT
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?
VB:
Sub PrintSpecificSheets()
Dim WS As Worksheet, mySheets()
Redim mySheets(0)
[Code]....
View 1 Replies
View Related
Nov 21, 2006
I need to have a macro or VB that prints a number of pages based on the value of a cell in the workbook.
Example:
A1 = 155
B1 would divide by 50, print 3 pages where B1 = 50 and then print the 4th page where B1 = 5.
View 2 Replies
View Related
Feb 20, 2009
I'm trying to execute a macro and it won't put the focus (radio button) to select x pages wide by x pages tall in the Page Setup/Page/Scaling Area. I looked at the macro and can't find a setting in the code but yet the focus won't change. What can I do about this? In other words the radio button stays selected as "adjust to "" % of normal size. Here's the code...
View 2 Replies
View Related
Mar 26, 2013
All sheets are basically the same except some minor values, names and addresses. There is one page per sheet and all pages are in portrait format. The print preview shows all the pages in order but when I print it, it makes multiple print jobs of 1 to 2 pages each and prints them all out of order. I don't know why it is splitting up the workbook or why it changes the order. I print and reorder these weekly, which is a major pain. It comes out in the same order each time but it is the wrong order.
View 1 Replies
View Related
Dec 10, 2012
Using Excel 2010: I have 2 rows (A4:J4 & A5:J5) selected as print titles that I would like to be printed at the top of selected pages. Currently, my document is 3 pages long, and I would like to have the print titles only applied to the first 2 pages. More data will be added in the future on pages 1&2 but the last page (whatever page number it ends up being) should not contain the selected print titles.
View 2 Replies
View Related
Jan 16, 2007
I have a worksheet named "TQUOTE" with the print area defined as A1:E:286 resulting in 5 pages printing ,however if there are only 3 pages of data I will be left with 2 blank pages being printed. (along with the header rows which are set to repeat for each page ). I should mention this worksheet is included in a list of sheets to print based on the response to a user form. Would it be possible to have the print area change based on the an empty cell that related to the next page break? eg. If the page break for page 1 ends at row 55, if a cell in row 56 were empty then set the print area to be A1:E55 If the page break for page 2 ends at row 85, if a cell in row 86 were empty then set the print area to be A1:E85 and so on ?? I do not have the skills yet to write this macro , and i bow to thiose
View 6 Replies
View Related
Feb 14, 2007
I have a spreadsheet with 28 visible tabs. When I select all tabs and print, I get 3 cover (or banner) pages...I like having the first banner page, but the other two are in the middle of my report. I assume excel is sending 3 print jobs and I'm not sure why.
I've seen a couple of posts regarding this issue when using VBA, but I'm not using VBA...just selecting all the sheets and sending a single print job, but get 3 banner pages.
View 9 Replies
View Related
Jan 3, 2013
I'm trying to create a formula that tells me the following:
If the item is marked as closed (vs. active), then how many renewals/terminations replacements/etc are there? These are two difference columns in a worksheet.
View 2 Replies
View Related
Nov 10, 2006
I have a report which is split into page sized chunks, in column P I have an identifier Planned, Booked or Running.
Is it possible to build a macro which says something along these lines
If P1 = "RUNNING" Then
Print that Page
Else
Go to P44
If P44 = "Running" Then
Print that page
Else
Go to P87
and so on until the cell selected is blank then stop.
View 5 Replies
View Related
Feb 20, 2009
There are 24 pages for printing and each one has different information on that sheet. From day to day some or all of the pages are needed. I would like the macro to look at each page and find a cell(different cell but same info on each page) and if the value of that cell is greater than 0 print that page. If not don't. I only need to calculate the "Bundle Tops" sheet. How do I write this. I am a beginner at the VBA code.
View 9 Replies
View Related
Mar 20, 2006
I have a color printer that is set to grayscale as a default. When I print my
excel workbook and select it to print in color in the print driver properties
the first page prints in color but the other pages print in black and white
even though the other pages are in color.
View 12 Replies
View Related
Nov 8, 2008
I have a macro that cycles through several student ID numbers and prints a progress report for each one. It works great, but I would like to add an option to pick which printer to use at the beginning of the code. In other words, when I run the macro, the printer box opens and I can pick the printer. When I click okay to print, the macro continues.
View 4 Replies
View Related
Aug 25, 2013
In my excel, i have 3 worksheets. On the first worksheet, i have 2 pages since i have 2 sections side by side. I can't stack the sections due to different column widths. I am trying to see if there is a macro to stack the 2 pages on the first worksheet as one pdf page, and then have worksheets 2 and 3 as pages 2 and 3 of the pdf.
View 1 Replies
View Related
Sep 2, 2013
I have client sheets that need to be printed at the end of each month. Sometimes I need 1 sheet, sometimes more. I have a macro which pops up a userform in which I can select the client I want to print and the month. I would like to be able to have the macro determine how many pages need to be printed so I get all the pages and do not end up with any blank pages. Is this possible?
View 1 Replies
View Related
Nov 7, 2012
Basically, I need to copy and paste upon certain condition (references) and paste related-datas in another sheet corresponding with these references. Every references are organized by lines with indicators on columns.
In attached file, see:
- worksheet ANALYSIS:
* datas in E2, G2, D18, D19, D20, D21, D22 that needs to be copy based on reference in C2,
* then need to find this reference in worksheet called GROUP SAVE,
* and based on this reference, paste above cells value in corresponding "Indicators" column number
THEN, I will have to do pretty much the same with subgroup data. But I can figure out for this second step that request same manipulation.
View 3 Replies
View Related
Apr 1, 2014
I have an excel file of 154 pages. I want to print only pages 1,151 and 154. what i am doing is print pages one by one.first give the command to page i then 151 then 154. how can i give the command in one go so that it is printed the required pages only.
View 5 Replies
View Related
Apr 29, 2012
When I view my page on print preview it shows 2 pages but I only have stuff on one page the second page shows 2 border marks but when I go to erase them I can't find them. Is there some way that I can find them other than look at page after blank page.
View 4 Replies
View Related
Jan 25, 2013
I have data range which have three sections identical in shape and size.
How should i set the page setup so that each section print on a separate page.
View 1 Replies
View Related
May 8, 2007
I've set up a short bit of code to select the print area for several pages in a workbook, but have no idea how to get the code to "activate". I tried placing a command button on a page to activate the code, but for some reason it won't see or act upon any sheets outside the sheet the command button is on. Same goes for the "event" proceudres on pages (activate, change.selection, etc).
View 9 Replies
View Related
Mar 28, 2013
I have a macro that copies my selected area on one workseet, for example B2:M120 on Sheet 1, over to A10 on sheet 2, then prints sheet 2 and then clears the data that was just added leaving sheet 2 as a "clean" template for next use.
Is it possible to add code to the print macro that would look at column G of my selected area and print all rows that had say "cat" in column G on one sheet, all rows with "dog" on another set of sheet 2's, and repeats until all rows of my original selection have been printed?
I thought maybe paste the whole selection then filter, hide unwanted rows, print, repeat but I can't figure out how to repeat and alternate what rows are hidden.
I'm open to any way of doing this, we currently do it by repeating the "select area" but as my real life use replaces "cat" and "dog" with a 9 digit number we are having issues with some rows getting skipped while others get doubled up.
View 1 Replies
View Related
May 29, 2009
I have a UserForm that I want to use as a “Print Selection Page” using check boxes to make selection or multiple selections of pages to print from different spreadsheets but same work book.
View 9 Replies
View Related
Mar 26, 2014
There were 2 macros. One printed all of the defined ranges (40) on separate pages, and the other printed all the graphs ("charts" - 39) on separate pages. I tried to combine the VBA code to print each range and then the corresponding graph. Everything is still on separate pages, but it saved time because I didn't have to collate after printing. It seemed to work. Then I tried figure out if I could print them all to a specific tray of the printer as set in the workbook or as the printer default. Now both the combined macro and the original macro are giving errors.
Is the code I have correct to do what I am trying to do (print each range and then the graph all on separate pages)? Is there any way to put the output tray choice into the macro?
Sub Load_Data_Report()
'
' Load_Data_Report Macro (print all tables & graphs)
' Macro recorded 12/21/00 by xxx
'
' Keyboard Shortcut: Ctrl+j
'
[Code] ........
View 1 Replies
View Related
Nov 12, 2012
I have a single page spreadsheet. I want to print multiple copies and have a unique invoice number on each page printed in cell O1. I don't want to just send it to the printer as individual print jobs. I would like to send it to print as a pdf in a single 100 page document or if not a pdf then just as a multiple page document.
For example first print run would start at number 1001 and last numbered page is 1101.
View 6 Replies
View Related
Jun 10, 2006
I have a macro that pastes formulas as values on specific pages (("CTY EME", "Int Center", " Total SW dist cost", "Int, pubs & oth", "Total". Is there a way to compress the macro ie with the sheet names?
Sheets("CTY EME").Select
Cells.Select
Selection.Copy
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Range("A1").Select
Application.CutCopyMode = False
View 3 Replies
View Related
Apr 16, 2008
I have been building a HR database. There are more or less 20 worksheets in it, including staff personal datas, contracts informations, overtime, leave etc.
All the calculations work, and I can print my payroll correctly. So everything is good.
However, what I really would like to do is to be able to print all salary slips in just one clic or two.
I think I have to create a VBA Macro to do so. But I never learned to use this tool. And I think this macro is too complicated to create for a newbie like me. So, I'd really like you guys to help me in creating it.
What I want this macro to do:
1° To check if the staff in question is still hired by the ngo
(I have on worksheet 'employee register' a column A named 'staff code' and a column Q named 'inactive'; i put a "x" when an employee is inactive, and the column automatically remains blank in the other worksheets)
2° If the staff is still hired, to print the salary slip of this staff
(I have a worksheet 'Salary slip' in which I have a cell (D5) that allows me to select the 'staffcode' in a validated list, when I select the staffcode, the information concerning the slip update automatically)
(my "staffcode" validated list still contains the inactive staffs, I dont know how to fix this)
3° Repeat this operation for all hired staff (all active staffcode)
View 5 Replies
View Related
Nov 20, 2006
simple example.
A1 = 155
I need to print 3 pages where B1 is equal to 50 and 1 page where B1 is equal to 5. A1 may change, but B1 will always be multiples of 50, plus whatever is left over.
View 9 Replies
View Related
Sep 17, 2013
Is there anyway I can make excel scale a set amount of information between page breaks fit 1 page wide 1 page tall? using a macro.
FT000010
SPAX SCREWS 1000pc TRADE PACK
Llandeilo
4
0
[Code]....
I essentially have this data repeated multiple times depending on how many products I am looking at, I would like this repeated 3 times per page, which is where the page breaks are currently being placed. When i tried to set Width 1 page the automatic page breaks would only allow two of these per page at 100% scaling.
View 1 Replies
View Related
Apr 12, 2014
So I have one sheet that needs to pull data through to another sheet (which is a stats summary)
I have a drop down list containing 4 options all of which have to be counted separately on the stats summary sheet. However I only need them counted when a value is input in another cell in that row.
For example: I select option 1 from down down menu, but I only want this to be counted on the stats page when I enter a date in the "date" cell.
View 9 Replies
View Related
Feb 1, 2014
I try to add some conditions to get specific text. i.e.
if cell b4 <= 20% then cell f4=01.30min
if cell b4 >= 21% and <=50% then cell f4=02.00 hr
if cell b4 >= 51% and <=70% then cell f4=02.30min
if cell b4 >= 71% then cell f4=03.00 hr
I tried different ways, including select case but unsuccessful.
View 8 Replies
View Related
