Need VBA code to copy entire row into monthly worksheets from a master register with same headers

boochang

New Member
Joined
Feb 22, 2017
Messages
12
Hello-

I would like a macro to copy an entire row of data, based on month of transaction.
I have identical headers from Row 1-6 and column A, on the register sheet and each month sheet (January, February, March, etc"
Data is in sheet "Register" from B7:AC500. The date for each transaction is listed in column B.
I want all transactions for the month of December moved to the "December" worksheet in the same workbook.
Starting the pasting at B7 on "December" worksheet. Once an entry is moved from the register sheet, it should only be in the December sheet. Additional December entries need to added below any entries previously moved.
Can anyone help me???[TABLE="width: 500"]
<tbody>[TR]
[TD][TABLE="width: 2556"]
<tbody>[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]Name[/TD]
[TD="colspan: 4"][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]Period[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]Name[/TD]
[TD="colspan: 4, align: right"]0[/TD]
[TD][/TD]
[TD][/TD]
[TD]Period[/TD]
[TD="colspan: 2"][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD="colspan: 3"]EXPENSE REPORT[/TD]
[TD]Location[/TD]
[TD="colspan: 4"][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD="colspan: 3"]EXPENSE REPORT[/TD]
[TD]Location[/TD]
[TD="colspan: 4, align: right"]0[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]Line No.[/TD]
[TD]Date[/TD]
[TD]Miles Driven[/TD]
[TD]Fuel[/TD]
[TD]Auto Rental / Tolls / Parking / Taxi[/TD]
[TD]Air Fares[/TD]
[TD]Hotel[/TD]
[TD]Personal & Business Meals[/TD]
[TD]Entertain-ment[/TD]
[TD]Office Supplies[/TD]
[TD]Office & Cell Tele / Internet[/TD]
[TD]Postage[/TD]
[TD]Other $[/TD]
[TD]Other Describe Expense ([/TD]
[TD]Total Amount[/TD]
[TD]Line No.[/TD]
[TD]Date[/TD]
[TD="colspan: 3"]Participants[/TD]
[TD="colspan: 9"]Descriptions[/TD]
[/TR]
[TR]
[TD="align: right"]1[/TD]
[TD="align: right"]12/2/2017[/TD]
[TD] 2[/TD]
[TD] $ 1.07[/TD]
[TD] 1.00[/TD]
[TD] 2.00[/TD]
[TD] 3.00[/TD]
[TD] 4.00[/TD]
[TD] 5.00[/TD]
[TD] 6.00[/TD]
[TD] 7.00[/TD]
[TD] 8.00[/TD]
[TD] 9.00[/TD]
[TD][/TD]
[TD="align: right"]$46.07[/TD]
[TD]1[/TD]
[TD="align: right"]12/2/2017[/TD]
[TD="colspan: 3"][/TD]
[TD="colspan: 9"][/TD]
[/TR]
[TR]
[TD="align: right"]2[/TD]
[TD="align: right"]12/4/2017[/TD]
[TD] 4[/TD]
[TD] $ 2.14[/TD]
[TD] 1.00[/TD]
[TD] 2.00[/TD]
[TD] 3.00[/TD]
[TD] 4.00[/TD]
[TD] 5.00[/TD]
[TD] 6.00[/TD]
[TD] 7.00[/TD]
[TD] 8.00[/TD]
[TD] 9.00[/TD]
[TD][/TD]
[TD="align: right"]$47.14[/TD]
[TD]2[/TD]
[TD="align: right"]12/4/2017[/TD]
[TD="colspan: 3"][/TD]
[TD="colspan: 9"][/TD]
[/TR]
[TR]
[TD="align: right"]3[/TD]
[TD="align: right"]12/6/2017[/TD]
[TD] 6[/TD]
[TD] $ 3.21[/TD]
[TD] 1.00[/TD]
[TD] 2.00[/TD]
[TD] 3.00[/TD]
[TD] 4.00[/TD]
[TD] 5.00[/TD]
[TD] 6.00[/TD]
[TD] 7.00[/TD]
[TD] 8.00[/TD]
[TD] 9.00[/TD]
[TD][/TD]
[TD="align: right"]$48.21[/TD]
[TD]3[/TD]
[TD="align: right"]12/6/2017[/TD]
[TD="colspan: 3"][/TD]
[TD="colspan: 9"][/TD]
[/TR]
[TR]
[TD="align: right"]4[/TD]
[TD="align: right"]12/8/2017[/TD]
[TD] 8[/TD]
[TD] $ 4.28[/TD]
[TD] 1.00[/TD]
[TD] 2.00[/TD]
[TD] 3.00[/TD]
[TD] 4.00[/TD]
[TD] 5.00[/TD]
[TD] 6.00[/TD]
[TD] 7.00[/TD]
[TD] 8.00[/TD]
[TD] 9.00[/TD]
[TD][/TD]
[TD="align: right"]$49.28[/TD]
[TD]4[/TD]
[TD="align: right"]12/8/2017[/TD]
[TD="colspan: 3"][/TD]
[TD="colspan: 9"][/TD]
[/TR]
[TR]
[TD="align: right"]5[/TD]
[TD="align: right"]12/10/2017[/TD]
[TD] 10[/TD]
[TD] $ 5.35[/TD]
[TD] 1.00[/TD]
[TD] 2.00[/TD]
[TD] 3.00[/TD]
[TD] 4.00[/TD]
[TD] 5.00[/TD]
[TD] 6.00[/TD]
[TD] 7.00[/TD]
[TD] 8.00[/TD]
[TD] 9.00[/TD]
[TD][/TD]
[TD="align: right"]$50.35[/TD]
[TD]5[/TD]
[TD="align: right"]12/10/2017[/TD]
[TD="colspan: 3"][/TD]
[TD="colspan: 9"][/TD]
[/TR]
[TR]
[TD="align: right"]6[/TD]
[TD="align: right"]12/12/2017[/TD]
[TD] 12[/TD]
[TD] $ 6.42[/TD]
[TD] 1.00[/TD]
[TD] 2.00[/TD]
[TD] 3.00[/TD]
[TD] 4.00[/TD]
[TD] 5.00[/TD]
[TD] 6.00[/TD]
[TD] 7.00[/TD]
[TD] 8.00[/TD]
[TD] 9.00[/TD]
[TD][/TD]
[TD="align: right"]$51.42[/TD]
[TD]6[/TD]
[TD="align: right"]12/12/2017[/TD]
[TD="colspan: 3"][/TD]
[TD="colspan: 9"][/TD]
[/TR]
[TR]
[TD="align: right"]7[/TD]
[TD="align: right"]12/14/2017[/TD]
[TD] 14[/TD]
[TD] $ 7.49[/TD]
[TD] 1.00[/TD]
[TD] 2.00[/TD]
[TD] 3.00[/TD]
[TD] 4.00[/TD]
[TD] 5.00[/TD]
[TD] 6.00[/TD]
[TD] 7.00[/TD]
[TD] 8.00[/TD]
[TD] 9.00[/TD]
[TD][/TD]
[TD="align: right"]$52.49[/TD]
[TD]7[/TD]
[TD="align: right"]12/14/2017[/TD]
[TD="colspan: 3"][/TD]
[TD="colspan: 9"][/TD]
[/TR]
[TR]
[TD="align: right"]8[/TD]
[TD="align: right"]5/4/2018[/TD]
[TD] 15[/TD]
[TD] $ 8.03[/TD]
[TD] 1.00[/TD]
[TD] 2.00[/TD]
[TD] 3.00[/TD]
[TD] 4.00[/TD]
[TD] 5.00[/TD]
[TD] 6.00[/TD]
[TD] 7.00[/TD]
[TD] 8.00[/TD]
[TD] 9.00[/TD]
[TD][/TD]
[TD="align: right"]$53.03[/TD]
[TD]8[/TD]
[TD="align: right"]5/4/2018[/TD]
[TD="colspan: 3"][/TD]
[TD="colspan: 9"][/TD]
[/TR]
[TR]
[TD="align: right"]9[/TD]
[TD="align: right"]12/12/2017[/TD]
[TD] 16[/TD]
[TD] $ 8.56[/TD]
[TD] 1.00[/TD]
[TD] 2.00[/TD]
[TD] 3.00[/TD]
[TD] 4.00[/TD]
[TD] 5.00[/TD]
[TD] 6.00[/TD]
[TD] 7.00[/TD]
[TD] 8.00[/TD]
[TD] 9.00[/TD]
[TD][/TD]
[TD="align: right"]$53.56[/TD]
[TD]9[/TD]
[TD="align: right"]12/12/2017[/TD]
[TD="colspan: 3"][/TD]
[TD="colspan: 9"][/TD]
[/TR]
[TR]
[TD="align: right"]10[/TD]
[TD="align: right"]12/14/2017[/TD]
[TD] 17[/TD]
[TD] $ 9.10[/TD]
[TD] 1.00[/TD]
[TD] 2.00[/TD]
[TD] 3.00[/TD]
[TD] 4.00[/TD]
[TD] 5.00[/TD]
[TD] 6.00[/TD]
[TD] 7.00[/TD]
[TD] 8.00[/TD]
[TD] 9.00[/TD]
[TD][/TD]
[TD="align: right"]$54.10[/TD]
[TD]10[/TD]
[TD="align: right"]12/14/2017[/TD]
[TD="colspan: 3"][/TD]
[TD="colspan: 9"][/TD]
[/TR]
[TR]
[TD="align: right"]11[/TD]
[TD="align: right"]6/8/2017[/TD]
[TD] 18[/TD]
[TD] $ 9.63[/TD]
[TD] 1.00[/TD]
[TD] 2.00[/TD]
[TD] 3.00[/TD]
[TD] 4.00[/TD]
[TD] 5.00[/TD]
[TD] 6.00[/TD]
[TD] 7.00[/TD]
[TD] 8.00[/TD]
[TD] 9.00[/TD]
[TD][/TD]
[TD="align: right"]$54.63[/TD]
[TD]11[/TD]
[TD="align: right"]6/8/2017[/TD]
[TD="colspan: 3"][/TD]
[TD="colspan: 9"][/TD]
[/TR]
[TR]
[TD="align: right"]12[/TD]
[TD="align: right"]6/9/2017[/TD]
[TD] 19[/TD]
[TD] $ 10.17[/TD]
[TD] 1.00[/TD]
[TD] 2.00[/TD]
[TD] 3.00[/TD]
[TD] 4.00[/TD]
[TD] 5.00[/TD]
[TD] 6.00[/TD]
[TD] 7.00[/TD]
[TD] 8.00[/TD]
[TD] 9.00[/TD]
[TD][/TD]
[TD="align: right"]$55.17[/TD]
[TD]12[/TD]
[TD="align: right"]6/9/2017[/TD]
[TD="colspan: 3"][/TD]
[TD="colspan: 9"][/TD]
[/TR]
[TR]
[TD="align: right"]13[/TD]
[TD="align: right"]3/25/2017[/TD]
[TD] 20[/TD]
[TD] $ 10.70[/TD]
[TD] 1.00[/TD]
[TD] 2.00[/TD]
[TD] 3.00[/TD]
[TD] 4.00[/TD]
[TD] 5.00[/TD]
[TD] 6.00[/TD]
[TD] 7.00[/TD]
[TD] 8.00[/TD]
[TD] 9.00[/TD]
[TD][/TD]
[TD="align: right"]$55.70[/TD]
[TD]13[/TD]
[TD="align: right"]3/25/2017[/TD]
[TD="colspan: 3"][/TD]
[TD="colspan: 9"][/TD]
[/TR]
[TR]
[TD="align: right"]14[/TD]
[TD="align: right"]4/5/2017[/TD]
[TD] 21[/TD]
[TD] $ 11.24[/TD]
[TD] 1.00[/TD]
[TD] 2.00[/TD]
[TD] 3.00[/TD]
[TD] 4.00[/TD]
[TD] 5.00[/TD]
[TD] 6.00[/TD]
[TD] 7.00[/TD]
[TD] 8.00[/TD]
[TD] 9.00[/TD]
[TD][/TD]
[TD="align: right"]$56.24[/TD]
[TD]14[/TD]
[TD="align: right"]4/5/2017[/TD]
[TD="colspan: 3"][/TD]
[TD="colspan: 9"][/TD]
[/TR]
</tbody>[/TABLE]
[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
</tbody>[/TABLE]
 

Excel Facts

What does custom number format of ;;; mean?
Three semi-colons will hide the value in the cell. Although most people use white font instead.
Well this script will copy all your data to the proper sheets assuming you already have the sheets created.
And they all have full month names like "December" "January" "May"

Now I did not have the script clear the original sheet.

Was not sure what you wanted to happen next.

Seemed like you then wanted each row of data immediately copied to proper sheet when row was created on "Register" sheet but was not sure of that.
Code:
Sub Get_Month()
Dim ans As Variant
Dim anss As Long
Application.ScreenUpdating = False
Dim i As Long
Dim Lastrow As Long
Sheets("Register").Activate
Lastrow = Sheets("Register").Cells(Rows.Count, "B").End(xlUp).Row
    For i = 7 To Lastrow
        ans = Format(Cells(i, 2), "MMMM")
        anss = Sheets(ans).Cells(Rows.Count, "B").End(xlUp).Row + 1
        If anss < 7 Then anss = 7
        Rows(i).Copy Sheets(ans).Rows(anss)
    Next
Application.ScreenUpdating = True
End Sub
 
Upvote 0

Forum statistics

Threads
1,223,227
Messages
6,170,849
Members
452,361
Latest member
d3ad3y3

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top