I have a report which lists products that are going on our weekly shipment to our office in the Far East. On the report are two date cells; one shows the date that the shipment was last finalsed and dispatched and one which is meant to show the date of the next shipment. In the report is a macro which is run when the shipment is finalised. The macro copies all the data into a new dated file, applies the datestamps to the original report and then wipes the date in the report ready for the next shipment.

The shipment close date is easy as I just run
=NOW()
in the macro and this shows the date when the shipment is finalised

The date of the next shipment is trickier though.

As a rule our shipments are always dispatched on a Thursday, so I thought about running
=TODAY()+7
in the macro. That way when the shipment is run on 28th July 2011 it will give the date of the next shipment as 4th August 2011

However on some occasions the shipment is not finalised and dispatched until Friday, so the above formula would then return the date of the following Friday, instead of the Thursday.

Is there a function that will return a specific date (ie. the next Thursday) following on from the date that the shipment is run?