Dear All,
I have attached my working spread sheet with three sheets, a list, a data input and a storage sheet from which I will use to report. I have created an input sheet to mirror a manual job card that are completed by operatives on a daily basis and updated to a spread sheet weekly. On entering the data, by operative I was hoping to copy the input to dataStorage sheet before processing the next. I have created a recorded Macro: CopyPasteDelete to achieve this. However while it copies over the data, I am struggling to prevent the data from overwriting the first set added.
I would also like help to prevent rows being copied to dataStorage sheet the don't contain any data in cells D14:D18 on the Input sheet. The recorded Macro below clears the input data, but I was hoping that there was a way to retain the formulas in A14:C18
CopyPasteDelete
[Sub CopyPasteDelete()
Sheets("InputForm").Select
Range("A14:S18").Select
Selection.Copy
Sheets("DataStorage").Select
Range("A3:S7").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Sheets("InputForm").Select
Range("A14:S18").Select
Application.CutCopyMode = False
Selection.ClearContents
End Sub]
Any help or guidance would be great
Many thanks
Mark
Bookmarks