Hollis,Virginia
HollisVJ at pgdp.usec.com
Thu Nov 6 11:45:52 CST 2003
I figured it out - if anyone ever needs this. Thanks, Va. ******************** With Worksheets("Schedule") NumCopies = .Cells(5, 20).Value For i = 1 To NumCopies If Weekday(.Cells(3, 7), 2) = 6 Or Weekday(.Cells(3, 7), 2) = 7 Then GoTo Gin ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True Gin: .Cells(2, 19).Value = i Next i End With -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Thursday, November 06, 2003 11:08 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Increment Date - Was: OT - Excel Increment Date Well, an easy way to get a list of these dates in Excel is to type your beginning date in a cell, highlight from that cell down the column to include the number of entries you wish, go to Edit/Fill/Series, choose Columns, Date, Weekday, OK. You could then use this list as the source for your loop logic. Mark -----Original Message----- From: Hollis,Virginia [mailto:HollisVJ at pgdp.usec.com] Sent: Thursday, November 06, 2003 11:44 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Increment Date - Was: OT - Excel Increment Date Ok, can't seem to figure this out in Excel so going to use good ol' Access. I need to print a report that changes the date field for each work day of the year. For example, press print & it will print 240 (or however many work days there are in a year M-F) copies of a report and the date on each copy will increment. The report is 1 page. So, I need it to print one copy, increment the date by one working day, then print another copy until all copies are printed for the year. 1st copy - Thursday, 11/06/2003 2nd copy - Friday, 11/07/2003 3rd copy - Monday, 11/10/2003 etc. P.S. If anyone has any ideas how to do this in Excel or Access it doesn't matter. I would appreciate help either way. Virginia -----Original Message----- From: Hollis,Virginia Sent: Thursday, November 06, 2003 9:28 AM To: 'Access Developers discussion and problem solving' Subject: OT - Excel Increment Date Sorry for the OT and definitely change of subject to Excel. I need to increment a date in Excel, if anyone can help please contact me off-list. Virginia hollisvj at pgdp.usec.com <mailto:hollisvj at pgdp.usec.com> _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com