Duplication Macro
 

Hi all

I started an all inclusive workbook for touring artists based on my
experience on the road for 30 Years. My intention, when it is completed, is
to make available to all Touring performance artist young and old free of
charge.

The layouts are all done. The formula are nearly all done, when does it end!!

I have done this almost without using Macro, which I find difficult at this
stage. This will be my next projected.

My question relates to the Cash accounting sheet, within each workbook, 5 in
total, all linked to the €œoffice managers Workbook€� Road Cash Accounting
worksheet.

It has approx 30000 rows of repetitive, on units of 103 rows per day.
Because a tour cannot be commonly defined date wise I have made this 300
days long for each workbook. This makes it only possible to have two
workbooks open at the one time and has understandably slowed down the whole
process

General Question. Is it possible that a macro that could be written which
duplicates all formats and formula but not data of say A10:AO112 when the
date, which is held , in A1O:A112 gets to be within 2 days of todays date.
Above A10:AO10 are all titles and totals.

I.e. A days cash accounting is added every day, two days before it is needed.

The cash accounting sheet in each work book is the only one that uses a
macro which is to do with Scan prompts. This was provided from this
Discussion group.

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column < 30 And Target.Column < 2 Or Target.Row < 10 Then
Exit Sub
If Target < "" Then
Application.EnableEvents = False
Target = Target & " (Receipt Number " & Target.Row & ")"
Application.EnableEvents = True

End If
End Sub

If it is possible then perhaps somebody would be prepared to work with me on
it as no doublt it will not be straight forward.

I could not have got to this near the finish line without this discussion
group. Thank you

Thanks for Looking

Stew