Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.misc
Megan
 
Posts: n/a
Default print spreadsheet with each coming day dated on it for 2006.

I have a spreadsheet in excell that I want to print with todays date on it as
a header and then some how be able to print one for each day for the rest of
the year. I dont want to have to print it each day, or make a copy of it and
change the date everyday. I want to be able to print the whole thing today
with just this one copy that I have in excell. Please help.
  #2   Report Post  
Posted to microsoft.public.excel.misc
Crystal
 
Posts: n/a
Default print spreadsheet with each coming day dated on it for 2006.

If I understand your message correctly then in your header use....
&[DATE]

Good Luck!

"Megan" wrote:

I have a spreadsheet in excell that I want to print with todays date on it as
a header and then some how be able to print one for each day for the rest of
the year. I dont want to have to print it each day, or make a copy of it and
change the date everyday. I want to be able to print the whole thing today
with just this one copy that I have in excell. Please help.

  #3   Report Post  
Posted to microsoft.public.excel.misc
Megan
 
Posts: n/a
Default print spreadsheet with each coming day dated on it for 2006.

Crystal my problem is that will this let me print the same spreadsheet
multiple times with a different date on it each time with only this one
command I need 1print for each day of the year?

"Crystal" wrote:

If I understand your message correctly then in your header use....
&[DATE]

Good Luck!

"Megan" wrote:

I have a spreadsheet in excell that I want to print with todays date on it as
a header and then some how be able to print one for each day for the rest of
the year. I dont want to have to print it each day, or make a copy of it and
change the date everyday. I want to be able to print the whole thing today
with just this one copy that I have in excell. Please help.

  #4   Report Post  
Posted to microsoft.public.excel.misc
Ron de Bruin
 
Posts: n/a
Default print spreadsheet with each coming day dated on it for 2006.

Try this one

Enter the first day in A1 before you run the macro
If it is working correct change PrintPreview to PrintOut

This example will not print the sunday's

Sub PrintCopies_ActiveSheet()
Dim yr As Integer
yr = Year(Range("a1").Value)
Do While Year(Range("a1").Value) = yr
If Application.WorksheetFunction. _
Weekday(Range("a1").Value) < 1 Then
ActiveSheet.PrintPreview
End If
Range("a1").Value = Range("a1").Value + 1
Loop
End Sub




--
Regards Ron de Bruin
http://www.rondebruin.nl


"Megan" wrote in message ...
I have a spreadsheet in excell that I want to print with todays date on it as
a header and then some how be able to print one for each day for the rest of
the year. I dont want to have to print it each day, or make a copy of it and
change the date everyday. I want to be able to print the whole thing today
with just this one copy that I have in excell. Please help.



  #5   Report Post  
Posted to microsoft.public.excel.misc
Megan
 
Posts: n/a
Default print spreadsheet with each coming day dated on it for 2006.

Ron iwas not creating a macro never have do I need to do this to make this
possable.

"Ron de Bruin" wrote:

Try this one

Enter the first day in A1 before you run the macro
If it is working correct change PrintPreview to PrintOut

This example will not print the sunday's

Sub PrintCopies_ActiveSheet()
Dim yr As Integer
yr = Year(Range("a1").Value)
Do While Year(Range("a1").Value) = yr
If Application.WorksheetFunction. _
Weekday(Range("a1").Value) < 1 Then
ActiveSheet.PrintPreview
End If
Range("a1").Value = Range("a1").Value + 1
Loop
End Sub




--
Regards Ron de Bruin
http://www.rondebruin.nl


"Megan" wrote in message ...
I have a spreadsheet in excell that I want to print with todays date on it as
a header and then some how be able to print one for each day for the rest of
the year. I dont want to have to print it each day, or make a copy of it and
change the date everyday. I want to be able to print the whole thing today
with just this one copy that I have in excell. Please help.






  #6   Report Post  
Posted to microsoft.public.excel.misc
Ron de Bruin
 
Posts: n/a
Default print spreadsheet with each coming day dated on it for 2006.

Hi Megan

Insert the first date in A1 first


Alt-F11
InsertModule from the menubar
paste the sub in there
Alt-Q to go back to Excel

If you do Alt-F8 you get a list of your macro's
Select "PrintCopies_ActiveSheet" and press Run


--
Regards Ron de Bruin
http://www.rondebruin.nl


"Megan" wrote in message ...
Ron iwas not creating a macro never have do I need to do this to make this
possable.

"Ron de Bruin" wrote:

Try this one

Enter the first day in A1 before you run the macro
If it is working correct change PrintPreview to PrintOut

This example will not print the sunday's

Sub PrintCopies_ActiveSheet()
Dim yr As Integer
yr = Year(Range("a1").Value)
Do While Year(Range("a1").Value) = yr
If Application.WorksheetFunction. _
Weekday(Range("a1").Value) < 1 Then
ActiveSheet.PrintPreview
End If
Range("a1").Value = Range("a1").Value + 1
Loop
End Sub




--
Regards Ron de Bruin
http://www.rondebruin.nl


"Megan" wrote in message ...
I have a spreadsheet in excell that I want to print with todays date on it as
a header and then some how be able to print one for each day for the rest of
the year. I dont want to have to print it each day, or make a copy of it and
change the date everyday. I want to be able to print the whole thing today
with just this one copy that I have in excell. Please help.






  #7   Report Post  
Posted to microsoft.public.excel.misc
Megan
 
Posts: n/a
Default print spreadsheet with each coming day dated on it for 2006.

whats the sub?

"Ron de Bruin" wrote:

Hi Megan

Insert the first date in A1 first


Alt-F11
InsertModule from the menubar
paste the sub in there
Alt-Q to go back to Excel

If you do Alt-F8 you get a list of your macro's
Select "PrintCopies_ActiveSheet" and press Run


--
Regards Ron de Bruin
http://www.rondebruin.nl


"Megan" wrote in message ...
Ron iwas not creating a macro never have do I need to do this to make this
possable.

"Ron de Bruin" wrote:

Try this one

Enter the first day in A1 before you run the macro
If it is working correct change PrintPreview to PrintOut

This example will not print the sunday's

Sub PrintCopies_ActiveSheet()
Dim yr As Integer
yr = Year(Range("a1").Value)
Do While Year(Range("a1").Value) = yr
If Application.WorksheetFunction. _
Weekday(Range("a1").Value) < 1 Then
ActiveSheet.PrintPreview
End If
Range("a1").Value = Range("a1").Value + 1
Loop
End Sub




--
Regards Ron de Bruin
http://www.rondebruin.nl


"Megan" wrote in message ...
I have a spreadsheet in excell that I want to print with todays date on it as
a header and then some how be able to print one for each day for the rest of
the year. I dont want to have to print it each day, or make a copy of it and
change the date everyday. I want to be able to print the whole thing today
with just this one copy that I have in excell. Please help.






  #8   Report Post  
Posted to microsoft.public.excel.misc
Multiple speadsheets
 
Posts: n/a
Default print spreadsheet with each coming day dated on it for 2006.

I'm actually in the same office as Megan, trying to help her w/ this.

What do you mean by "paste the sub in there". I've got everything else
figured out, except this.

"Ron de Bruin" wrote:

Hi Megan

Insert the first date in A1 first


Alt-F11
InsertModule from the menubar
paste the sub in there
Alt-Q to go back to Excel

If you do Alt-F8 you get a list of your macro's
Select "PrintCopies_ActiveSheet" and press Run


--
Regards Ron de Bruin
http://www.rondebruin.nl


"Megan" wrote in message ...
Ron iwas not creating a macro never have do I need to do this to make this
possable.

"Ron de Bruin" wrote:

Try this one

Enter the first day in A1 before you run the macro
If it is working correct change PrintPreview to PrintOut

This example will not print the sunday's

Sub PrintCopies_ActiveSheet()
Dim yr As Integer
yr = Year(Range("a1").Value)
Do While Year(Range("a1").Value) = yr
If Application.WorksheetFunction. _
Weekday(Range("a1").Value) < 1 Then
ActiveSheet.PrintPreview
End If
Range("a1").Value = Range("a1").Value + 1
Loop
End Sub




--
Regards Ron de Bruin
http://www.rondebruin.nl


"Megan" wrote in message ...
I have a spreadsheet in excell that I want to print with todays date on it as
a header and then some how be able to print one for each day for the rest of
the year. I dont want to have to print it each day, or make a copy of it and
change the date everyday. I want to be able to print the whole thing today
with just this one copy that I have in excell. Please help.






  #9   Report Post  
Posted to microsoft.public.excel.misc
Ron de Bruin
 
Posts: n/a
Default print spreadsheet with each coming day dated on it for 2006.

Sub (subroutine) is the macro

Sub PrintCopies_ActiveSheet()
Dim yr As Integer
yr = Year(Range("a1").Value)
Do While Year(Range("a1").Value) = yr
If Application.WorksheetFunction. _
Weekday(Range("a1").Value) < 1 Then
ActiveSheet.PrintPreview
End If
Range("a1").Value = Range("a1").Value + 1
Loop
End Sub

--
Regards Ron de Bruin
http://www.rondebruin.nl


"Multiple speadsheets" wrote in message
...
I'm actually in the same office as Megan, trying to help her w/ this.

What do you mean by "paste the sub in there". I've got everything else
figured out, except this.

"Ron de Bruin" wrote:

Hi Megan

Insert the first date in A1 first


Alt-F11
InsertModule from the menubar
paste the sub in there
Alt-Q to go back to Excel

If you do Alt-F8 you get a list of your macro's
Select "PrintCopies_ActiveSheet" and press Run


--
Regards Ron de Bruin
http://www.rondebruin.nl


"Megan" wrote in message ...
Ron iwas not creating a macro never have do I need to do this to make this
possable.

"Ron de Bruin" wrote:

Try this one

Enter the first day in A1 before you run the macro
If it is working correct change PrintPreview to PrintOut

This example will not print the sunday's

Sub PrintCopies_ActiveSheet()
Dim yr As Integer
yr = Year(Range("a1").Value)
Do While Year(Range("a1").Value) = yr
If Application.WorksheetFunction. _
Weekday(Range("a1").Value) < 1 Then
ActiveSheet.PrintPreview
End If
Range("a1").Value = Range("a1").Value + 1
Loop
End Sub




--
Regards Ron de Bruin
http://www.rondebruin.nl


"Megan" wrote in message ...
I have a spreadsheet in excell that I want to print with todays date on it as
a header and then some how be able to print one for each day for the rest of
the year. I dont want to have to print it each day, or make a copy of it and
change the date everyday. I want to be able to print the whole thing today
with just this one copy that I have in excell. Please help.








  #10   Report Post  
Posted to microsoft.public.excel.misc
Crystal
 
Posts: n/a
Default print spreadsheet with each coming day dated on it for 2006.

If I understand your request then in your header type the following...
&[DATE]

Good Luck!!

"Megan" wrote:

I have a spreadsheet in excell that I want to print with todays date on it as
a header and then some how be able to print one for each day for the rest of
the year. I dont want to have to print it each day, or make a copy of it and
change the date everyday. I want to be able to print the whole thing today
with just this one copy that I have in excell. Please help.



Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
I cant see my excel spreadsheet but only in Print Preview? Karyn H Excel Worksheet Functions 1 January 7th 06 12:54 AM
how do I make rows and columns appear when I print a spreadsheet Debbie Excel Worksheet Functions 3 November 17th 05 01:08 PM
A cell in an excel spreadsheet that does not print but shows in pr aji Excel Discussion (Misc queries) 1 September 5th 05 09:46 PM
How can I print long lists of data from an Excel spreadsheet? sonic_d_hog Excel Discussion (Misc queries) 1 December 22nd 04 09:31 PM
How do I print something off of a spreadsheet? kristin Excel Discussion (Misc queries) 6 December 14th 04 11:35 PM


All times are GMT +1. The time now is 12:03 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"