Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.misc
|
|||
|
|||
How do I set an EXCEL worksheet to print one row of data per page
Hi. I have entered the wonderful world of barcoding.
I want to create and print my barcodes in Excel. So far, I've been able to do the create part with no problem. Now, I need advice on how to set up my spreadsheet to AUTOMATICALLY print one row of data per page. My spreadsheet has three columns of data: Student ID number, Student ID number in BARCODE format, and Student Name. So, each printed page will contain one student's data. My worksheet will contain data for MANY students, so manually entering page breaks is not an option. Any help would be appreciated. |
#2
Posted to microsoft.public.excel.misc
|
|||
|
|||
How do I set an EXCEL worksheet to print one row of data per page
Carol, If you up to running a macro, select the columns you want to print and run the following code... '---------------------------- Sub PrintEachRow() '06/30/2005 - Jim Cone - San Francisco, USA 'Prints each row in the selection - skips any blank rows. Dim rngPrint As Excel.Range Dim rngRow As Excel.Range Set rngPrint = Application.Intersect(Selection, ActiveSheet.UsedRange) If Not rngPrint Is Nothing Then For Each rngRow In rngPrint.Rows If Application.CountA(rngRow) 0 Then rngRow.PrintOut copies:=1 End If Next End If Set rngPrint = Nothing Set rngRow = Nothing End Sub -- Jim Cone San Francisco, USA http://www.realezsites.com/bus/primitivesoftware "Carol" wrote in message Hi. I have entered the wonderful world of barcoding. I want to create and print my barcodes in Excel. So far, I've been able to do the create part with no problem. Now, I need advice on how to set up my spreadsheet to AUTOMATICALLY print one row of data per page. My spreadsheet has three columns of data: Student ID number, Student ID number in BARCODE format, and Student Name. So, each printed page will contain one student's data. My worksheet will contain data for MANY students, so manually entering page breaks is not an option. Any help would be appreciated. |
#3
Posted to microsoft.public.excel.misc
|
|||
|
|||
How do I set an EXCEL worksheet to print one row of data per page
I'd use a macro to insert the page breaks.
Option Explicit Sub testme() Dim iRow As Long With Worksheets("sheet1") .ResetAllPageBreaks For iRow = 2 To .Cells(.Rows.Count, "A").End(xlUp).Row .HPageBreaks.Add Befo=.Cells(iRow, "A") Next iRow End With End Sub Then you could set up the page layout to have row 1 to repeat at top (if required). And print. Carol wrote: Hi. I have entered the wonderful world of barcoding. I want to create and print my barcodes in Excel. So far, I've been able to do the create part with no problem. Now, I need advice on how to set up my spreadsheet to AUTOMATICALLY print one row of data per page. My spreadsheet has three columns of data: Student ID number, Student ID number in BARCODE format, and Student Name. So, each printed page will contain one student's data. My worksheet will contain data for MANY students, so manually entering page breaks is not an option. Any help would be appreciated. -- Dave Peterson |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Can you print separate worksheet on a single page? | Excel Discussion (Misc queries) | |||
How do I print more than 1 worksheet on a page? | Excel Discussion (Misc queries) | |||
Different print page setups on one worksheet? | Excel Worksheet Functions | |||
Print other worksheet by changing a Letter/# on another page. | Excel Worksheet Functions | |||
why would page 1 of an excel worksheet print smaller of page 2 if. | Excel Discussion (Misc queries) |