Submit button Macro

Closed
ECuda - Aug 25, 2011 at 05:13 PM
venkat1926 Posts 1863 Registration date Sunday June 14, 2009 Status Contributor Last seen August 7, 2021 - Aug 26, 2011 at 07:16 AM
Hello,

I need a macro that will be assigned to a "Submit" button that will move data from Column H on my "Data_Entry" sheet to a different column each week on my "Database" sheet. The "Database" columns are titled by weekly dates. The information is input in the data entry table every Tuesday then I need the data for THAT date to be posted over on the database table in the appropriate column. Or, it could be the next "EMPTY" column. The database will start with Column B. I would like to set it for 1 complete year. Please help if possible. I am fairly new at macros and I really need the help. Thanks.

1 response

venkat1926 Posts 1863 Registration date Sunday June 14, 2009 Status Contributor Last seen August 7, 2021 811
Aug 26, 2011 at 07:16 AM
try this macro

Sub test()
With Worksheets("data entry")
.Columns("H:H").Copy
With Worksheets("database")
.Cells(1, Columns.Count).End(xlToLeft).Offset(0, 1).PasteSpecial
End With
End With
Application.CutCopyMode = False
End Sub
0