P
Pablo
Is there a way to print the value of a text box in a spreadsheets header? I
have a dynamic print function that prints out the spreadsheet. I would like
to be able to use the text box when the print out spans multiple pages.
Sub PrintCart()
Dim lngBottomRow As Long
Dim rngData As Range
'Where is the end of the data beginning with row 24, 1-23 reserved for
header
Set rngData = Range("a24").End(xlDown)
lngBottomRow = rngData.Row
Range("A1", "J" & lngBottomRow).PrintOut
End Sub
have a dynamic print function that prints out the spreadsheet. I would like
to be able to use the text box when the print out spans multiple pages.
Sub PrintCart()
Dim lngBottomRow As Long
Dim rngData As Range
'Where is the end of the data beginning with row 24, 1-23 reserved for
header
Set rngData = Range("a24").End(xlDown)
lngBottomRow = rngData.Row
Range("A1", "J" & lngBottomRow).PrintOut
End Sub