Running two macros in one worksheet at the same time

Hello I'm inexperienced in VBA, been digging around and trying different things but I still can't figure out how to get my two macros to run at the same time in the same worksheet. If I open two different excel tabs and use the codes seperately, they each do their own purpose. But I can't figure out how to merge them in one excel worksheet. It seems it's not as easy as just deleting the "End Sub" and "Private Sub Worksheet_Change(ByVal Target As Range)" in the middle to combine them. When I enter something in cell B1 I would like it to cut and paste to the A column (starting at A2) and then also populate the date in the cell next to it. Here are the two macros:

Please Login or Register  to view this content.

Use the same "If Not" structure in the second routine as you have in the first. Include an "Exit Sub" before the last "End If" in each case ... and simply combine the routines.

You might need to consider where, if anywhere, to include the Target.Cells.Count check


Regards, TMS

Please use CODE tags when posting code.

Try this:

Please Login or Register  to view this content.

Yes, a small adjustment, makes it:

Please Login or Register  to view this content.

So you want it to take values entered in F1 on Sheet1, and write them to the next unused row in Column A of Sheet3?

Enter this code in the worksheet module for Sheet1:

Please Login or Register  to view this content.