Submit button Macro Closed

Question

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.

Configuration: Windows XP / Internet Explorer 7.0

venkat1926 · Answer

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

Submit button Macro

1 response

Similar discussions

Subscribe To Our Newsletter!