VBA To Auto Select Last Populated Print Page

Feb 19, 2014

I have a sheet that already has page breaks set at specific intervals to ensure the data is displayed in a certain way on print, I can only have whole pages. The variable is how many pages are printed on each project, which can be anything between 1 and 20 or more. I have a few columns that contain line numbers, and formulae down the entire length of the sheet, so a basic last populated cell search won't work, but the column I'd like to focus on is Col F, which only has blank/empty cells below the last used one in use. Is it possible to have a BeforePrint code find the last populated cell in Col F and simply capture which print page number it is in, and set that as the number of pages to print?

So in summary, I'd like to be able to just hit Print, and the code will automatically set the number of pages to print based on which page contains the last populated cell in Col F.

View 2 Replies


ADVERTISEMENT

Print Various Populated Rows From Different Worksheets Onto The Same Page

Sep 30, 2006

I'm trying to print populated rows from 5 different worksheets. I can get them to print out onto 5 different sheets of A4 but would ideally like them to print underneath each other (continous and use less paper) as some times one sheet may only have one populated row.

Application. ScreenUpdating = False
Dim printer1 As Range
Dim printer2 As Range
Dim printer3 As Range
Dim printer4 As Range
Dim printer5 As Range

Sheets("xxxx").Select
Set printer1 = ActiveSheet.Range("a9", Range("i65536").End(xlUp))

Sheets("xxxx").Select
Set printer2 = ActiveSheet.Range("a7", Range("i65536").End(xlUp))

Sheets("xxxx").Select...............

View 2 Replies View Related

Auto Select Populated Cells For Chart

Dec 26, 2011

Seeking a way to automatically select just the populated range of cells in Cols A, B and C starting with row 2. In this sample there are 48 however this changes.

ActiveSheet.Shapes.AddChart.Select
ActiveChart.ChartType = xlBarStacked
ActiveChart.SeriesCollection(1).Name = "=Sheet1!$C$1"
ActiveChart.SeriesCollection(1).Values = "=Sheet1!$C$2:$C$48"
ActiveChart.SeriesCollection.NewSeries
ActiveChart.SeriesCollection(2).Name = "=Sheet1!$D$1"
ActiveChart.SeriesCollection(2).Values = "=Sheet1!$D$2:$D$48"
ActiveChart.SeriesCollection(2).XValues = "=Sheet1!$A$2:$A$48"

View 1 Replies View Related

Add In Another Option To Select Whether To Print The Page As Horizontal Or Landscape

Aug 29, 2003

I'm using the select sheets to print code from: http://j- walk.com/ss/excel/tips/tip48.htm. I need to add in another option to select whether to print the page as horizontal or landscape. I've been able to add the checkbox, but am having a hard time with the loop to process correctly. I also have the landscape changing code as well. Here is my
Option Explicit
Sub SelectSheets()
Dim i As Integer
Dim TopPos As Integer
Dim TopPos1 As Integer
Dim SheetCount As Integer
Dim PrintDlg As DialogSheet
Dim CurrentSheet As Worksheet
Dim cb As CheckBox
Application.ScreenUpdating = False
If ActiveWorkbook.ProtectStructure Then
MsgBox "Workbook is protected.", vbCritical
Exit Sub
End If
Set CurrentSheet = ActiveSheet............

View 2 Replies View Related

Print To Fit All Rows And Column On One Page And Take Up Entire Page?

Oct 16, 2013

I have a sheet that changes the number of columns based on data from other sheets. This is the only sheet in the workbook that I will print out every day. I have it set right now to fit all columns on one page, however sometimes this will result in the bottom 1/3rd of the sheet not being used. If I use fit all rows on one page, then some of the columns will get cut off. Is there a way to scale in both directions? My guess is there is not, but I thought I would ask because it would work great for me if I could.

View 4 Replies View Related

Macro To Print Page Based On Active Page

Jun 29, 2007

I need a macro that will print a hidden page that is linked to the page I have active.

It needs to be able to find the correct hidden page that corresponds to the active page because there are multilple pairs of the hidden/visible pages. The name of the hidden page is the same as the visible one with "printout" added to the end. When created, the sheet code names are sheetn and sheetm; n and m being consecutive numbers.

View 3 Replies View Related

VBA To Look At Tha Last Cell That Is Populated In Column And Set Print Area

Mar 8, 2007

I have a template worksheet that several people use and print from.
The range on this worksheet used is A1:C499

I want the VBA to look at tha last cell that is populated in column A and set the print area to suit.
i.e. the last cell used in column A could be A277. then I'd want the print area to be A1:C277.

View 9 Replies View Related

Auto Insert A Row With Info Populated From The Row Above

Jan 14, 2010

to be able to do is have a stock control sheet that tells me how much of 1 item we have in stock which is easy, the hard part comes when this stock is sold as this stock can be sold to a number of different customers e.g.

We have 10,000 X Pens

Customer 1 buys 1,000
Customer 2 buys 6,000
Customer 3 buys 3,000

i need a way of saying that we have 10,000 pens but if we sold 1,000 then we can click a button (macro maybe) and that will automatically see that we have 10,000 for that line and we have only sold 1,000 so we need a line inserting saying that we have 9,000 remaing and so on.... The sheet needs to record who these goes to though, that the reason i was thinking of adding a row

If this doesnt make sense then i am happy to answer your questions?

i can upload an example excel sheet if required if someone can explain how i do this?

View 14 Replies View Related

Excel 2010 :: How To Apply Print Titles To Print On Select Pages

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

Passing Value To Cell As String From Auto-Populated Combobox

Apr 10, 2013

I have been searching for hours trying to find a solution to no avail. What I need to do is make sure that when I press a button on a form, the value in a combo-box should be populated as "text format" not as a number. The reason for this is that when my numbers start with a 0, the leading zero gets dropped and I can't run the rest of my code as the items don't match...

I have tried substituting the "Value" to "text" in : Me.cboItem.value and have tried for hours trying to name dim variables as a String and pass this into the cboItem...with no luck...

VB:

Private Sub CommandButton1_Click()
Dim iRow As Long
Dim ws As Worksheet
Set ws = Worksheets("Order")
'find first empty row in database
iRow = ws.cells.Find(What:="*", SearchOrder:=xlRows, _

[Code]...

The below populated the combo box cboItem:

VB:

Private Sub OptionButton1_Click()
With Me.cboItem
.Clear
.List = Application.Transpose(Worksheets("Item List").Range("List1"))
End With
End Sub

View 1 Replies View Related

Select All Cells In Semi-populated Dynamic Range

Aug 16, 2006

I have a range of data in columns A2 to Mx. The length of the columns varies, and all cells are not always populated. I want to be able to select the entire range, no matter what its length, no matter how many cells are populated (as both of these will vary on each tab) However, I do not want to select A1 to M1 as this is column headers which need to be excluded from the data for compliation purposes.

View 9 Replies View Related

Create Auto Populated List Field Based Off Multiple Fields

Apr 21, 2014

I have two or more fields of data, where parts of them are auto populated based on inputs from elsewhere. That part i have working fine, however the problem arises in taking that information and displaying it as a Bill of Materials list on another tab in my excel file. I want to take the information, and only display it in the BOM tab if that piece of information is being used (ie item count field not being 0). I know how to do that part in a rather simple format, however i'd prefer to make it so that when i have the list, and a certain item isn't used then its not included in the BOM, and an empty space is not left behind. I would prefer this to be all be done automatically by a formula if possible instead of just having to resort to sorting the table every time the tool is being used.

Is this even possible in excel, A quick example doc is attached, shows 2 example fields. i'd like to take the information from those 2 fields. and somehow create a single list, with a single heading along the top, with all row containing a 0 "Unit Count" to be omitted entirely from the list, and not have a blank space where the item should be. Keep in mind these fields may be greater than 2, and may not be position one after the other in a strait down line.

Example.xlsx

View 4 Replies View Related

Print The One Page

Dec 29, 2009

I have an Excel 2007 file with a number of tabs, about 15. All has worked well until today. All of a sudden I want to print one page and the preview shows I have 300 pages selected!!!!

I cleared all print ranges,even on hidden files. No luck.....

I only selected one page. it tells me my print margins are off but it will not let me get to any changes in page setup......

I tried printing a few of them and I just get the top few rows of each page.

View 4 Replies View Related

Print Only First Page?

Mar 11, 2014

Can you make excel only print the first page automatically without adjusting settings each time in the print box?

View 1 Replies View Related

Set To Print One Page

Apr 18, 2007

How can I set a workbook to only print the first page without printing it? I want to apply it to a folder full of xls workbooks so whenever a user opens one to print, they can just hit print.

I have tried:

ActiveWindow.SelectedSheets.PrintOut From:=1, To:=1, Copies:=1, Collate:=True

but it sends the file to the printer. I do not want to have to use a macro in each file, I just want to use an existing xls workbook to apply the settings to many other xls workbooks.

View 3 Replies View Related

Print Preview The Page

Nov 23, 2008

I set up a passworded spreadsheet and saved it to my documents folder. I then copied it across to a network area I use to link to a company I work with. The file opens ok on the password but the page is completely white and I can see nothing at all! When I print preview the page I can see all my information but this doesn't help when I need to update it.

Not only that, the whole lot of excel spreadsheets I have both on my documents and the network area are doing the same thing! I've no idea how it's happened or what to do to retrieve the page view.

View 2 Replies View Related

Tab Name To Be Header For Print Page

Nov 24, 2008

I would like to have the tab names as part of my header for printed report. Can I automate that process?

View 2 Replies View Related

Print 1 Report Page For Every Row.

Jan 16, 2010

how to print one report page for every row on a sheet. So if I have 300 rows containing personal info like name phone email I would like to print the data out in a separate formated report for each person.

View 3 Replies View Related

Print A Header Row On All But First Page.

Oct 23, 2008

I have a database that starts on row 10 with header information in row 9 explaining the purpose of the data for each column. In rows 1 through 8 I have general information that when I print the database - I would want on the first printed page (as well as the beginning rows of the database) and have the remaining print pages be the remaining portions of the database but have the header row (row 9) at the top of each - like a header row.

I know how to goto FILE > PAGE SETUP > SHEET > ROWS TO REPEAT AT TOP: - but this will put row 9 at the top of ALL pages...which I want, but not on the first page. I'm ok with making a print button with a macro...but no idea where to begin with the vba code to do this.

View 3 Replies View Related

Print Macro To Fit Page

Apr 1, 2012

I have a macro to print out page 9 but what i whant it to do is to print and fit to full page. how do i do that?

Code:
ExecuteExcel4Macro "PRINT(2,9,9,1,,,,,,,,2,,,TRUE,,FALSE)"
With ActiveSheet.PageSetup
.FitToPagesWide = 1
.FitToPagesTall = 1
End With

View 1 Replies View Related

Print Footer On Last Page Only - VBA?

Jul 21, 2013

I am working on workbook having more then 15 sheets and i want to print the cell reference (L3:P14) as footer automatically but only on the last page printed.

View 2 Replies View Related

Print Columns On One Page

Jun 12, 2014

How do I print columns A:I, and calculating rows dynamically, to fit on one page in portrait.

View 2 Replies View Related

Count The Page Print

Apr 25, 2007

I have a page i want to print fx. 50 copies of, then when i choose to make 50 copies it should automaticly insert this on the page:
Page 1 out of 50
Page 2 out of 50
Page 3 out of 50
and so on...

View 9 Replies View Related

Print Sheet To One Page With Button?

Mar 29, 2013

I have a sheet that I would like to print to one page (11x17, landscape) and have it take up the majority of the page. The largest the sheet will ever be is data in rows 1 - 71, and columns A - AC. Right now I have it set up so that when i click on the button, the print dialog opens up and no adjustments are needed to print to pdf in 11x17 for the maximum amount of data.

Overall what I am trying to do is have the zoom change when rows are deleted (columns will always be A-AC). The top 5 rows and bottom 5 rows will always be there. I want the top and bottom margins to be the same on the pdf even if 10 rows are deleted in between.

View 1 Replies View Related

Set Print Area To End Of Text On Page

Aug 7, 2009

I have a problem when I want to print, it will only print a set area. How to I make it print everything, so it prints everything till the last letter on the page?

View 10 Replies View Related

Print A Page Showing The Formulas?

Feb 4, 2013

I want to print a page showing the formulas as I have to create many spreadsheets using similiar formulas. Is there a way to print a page viewing formulas put in each cell?

View 4 Replies View Related

How Print Long List On One Page

Aug 27, 2013

I have a spreadsheet with only entries in column A - 154 cells. Nothing in other columns. When I try to print, it says it'll be 4 sheets long...

1
2
3
4
down to
154

How can I get it to print in a snake-like fashion so all on one page?

View 2 Replies View Related

How To Print A List Of Names With Each Name On A Page

Mar 24, 2014

I have a voucher that I am trying to print out for everyone with their name and Employee number on it. Now, I have the generic voucher and the list of name. I am wondering if there is a way to automatically print out vouchers with their name on it, according to the list? Or if some VBA can allow me to create a sheet for each person in the workbook.

View 3 Replies View Related

Page Orientations For Different Print Areas?

Jun 10, 2014

I have seven printareas as follows:

$G$8:$Q$40 - Landscape
$C$42:$M$108 - Portrait
$O$42:$Y$108 - Portrait
$C$110:$M$157 - Landscape
$C$159:$M$206 - Landscape
$O$110:$Y157 - Landscape
$O$159:$Y$206 - Landscape

As you can see, when I go to print preview, I will want the first and the last four to be formatted landscape and the second and third to be formatted portrait. This is all I want the macro to do. Then later when I go to print, I want to be able to print them all together. Is there a way to do this? Perhaps by letting the first printarea be on its on sheet, the second two on their own sheet, and the final four on their own sheet?

View 1 Replies View Related

Page Numbers To Print Area

May 30, 2012

Within one worksheet: Is there a way to apply page numbers and/or footers only to a print area so that if I change the print area the page numbers will begin at 1 again.

View 1 Replies View Related







Copyrights 2005-15 www.BigResource.com, All rights reserved