Copying Data from Sheet 1 to Sheet 2 and adding rows- Code Needed

bamaisgreat

Well-known Member
Joined
Jan 23, 2012
Messages
821
Office Version
  1. 365
Platform
  1. Windows
Starting at A17 on Sheet 1 I have a row of data that I need the data from columns A,B,C,D and G (Column B is a specific ship date) copied to one of the ranges in sheet 2 that contain the 4 quaters of the year. The date in coulmn B determines which range of the quartely ranges it goes into. On sheet 2 the 4 quaters of the year 1st Quater Jan-March 2024 Range A4-Q4, 2nd Quarter April-June 2024 Range A6-Q6, 3rd Quarter July-Sep 2024 Range A8-Q8, 4th Quarter Oct-Dec 2024 Range A8-Q10. Once the data has been entered on sheet 1 I need it add another row with the same formatting as the row above it so the next line of data can be entered. On sheet 2 I also need a row added with the same formatting as the row above it to which ever quaterly ranges the data was copied into.
 

Excel Facts

How can you automate Excel?
Press Alt+F11 from Windows Excel to open the Visual Basic for Applications (VBA) editor.
Starting at A17 on Sheet 1 I have a row of data that I need the data from columns A,B,C,D and G (Column B is a specific ship date) copied to one of the ranges in sheet 2 that contain the 4 quaters of the year. The date in coulmn B determines which range of the quartely ranges it goes into. On sheet 2 the 4 quaters of the year 1st Quater Jan-March 2024 Range A4-Q4, 2nd Quarter April-June 2024 Range A6-Q6, 3rd Quarter July-Sep 2024 Range A8-Q8, 4th Quarter Oct-Dec 2024 Range A8-Q10. Once the data has been entered on sheet 1 I need it add another row with the same formatting as the row above it so the next line of data can be entered. On sheet 2 I also need a row added with the same formatting as the row above it to which ever quaterly ranges the data was copied into.
WORKING ON Franklin Job Review .xlsm
ABCDEFGHIJKLMNO
15F- Jobs
16ProjectShip DateCustomerJob Type Status% CompNotes CONTRACT PRICEInvoiced %AMOUNT BILLED TO DATEMargin ESTIMATED GROSS PROFITCOSTS TO DATEFMI Cost GG Cost
17F3685Dec-24BigBeeF3685-PTW LineShipped / Not Closed Complete95%$0.00
18
19
20
21
22
23
24
25
26
Sheet 1
Cell Formulas
RangeFormula
J17J17=H17*I17


WORKING ON Franklin Job Review .xlsm
ABCDEFGHIJKLMNOPQ
1FMI's Current Backlong of Major Projects
2ProjectShip DateCustomerJob Type Status% CompNotes EngineeringPurchasing Machine ShopFab ShopAssembly
31st Quarter Jan-Mar 2024
4
52nd Quarter April-June 2024
6
73rd Quarter July-Sep 2024
8
94th Quarter Oct-Dec 2024
10
11
Sheet 2
Cells with Conditional Formatting
CellConditionCell FormatStop If True
O4Other TypeColor scaleNO
O4Other TypeColor scaleNO
O4Other TypeColor scaleNO
O4Other TypeColor scaleNO
O4Other TypeColor scaleNO
O4Other TypeColor scaleNO
Q4Other TypeColor scaleNO
Q4Other TypeColor scaleNO
Q4Other TypeColor scaleNO
Q4Other TypeColor scaleNO
Q4Other TypeColor scaleNO
Q4Other TypeColor scaleNO
M4Other TypeColor scaleNO
M4Other TypeColor scaleNO
M4Other TypeColor scaleNO
M4Other TypeColor scaleNO
M4Other TypeColor scaleNO
M4Other TypeColor scaleNO
K4Other TypeColor scaleNO
K4Other TypeColor scaleNO
K4Other TypeColor scaleNO
K4Other TypeColor scaleNO
K4Other TypeColor scaleNO
K4Other TypeColor scaleNO
I4Other TypeColor scaleNO
I4Other TypeColor scaleNO
I4Other TypeColor scaleNO
I4Other TypeColor scaleNO
I4Other TypeColor scaleNO
I4Other TypeColor scaleNO
I4Other TypeColor scaleNO
I4Other TypeColor scaleNO
I4Other TypeColor scaleNO
I4Cell Value=1textNO
K4Other TypeColor scaleNO
K4Other TypeColor scaleNO
K4Other TypeColor scaleNO
K4Cell Value=1textNO
M4Other TypeColor scaleNO
M4Other TypeColor scaleNO
M4Other TypeColor scaleNO
M4Cell Value=1textNO
O4Other TypeColor scaleNO
O4Other TypeColor scaleNO
O4Other TypeColor scaleNO
O4Cell Value=1textNO
Q4Other TypeColor scaleNO
Q4Other TypeColor scaleNO
Q4Other TypeColor scaleNO
Q4Cell Value=1textNO
 
Upvote 0
I'm not sure I understood correctly, but try:
VBA Code:
Sub CopyData()
    Application.ScreenUpdating = False
    Dim rng As Range, Val As String, fnd As Range, srcWS As Worksheet, desWS As Worksheet
    Set srcWS = Sheets("Sheet1")
    Set desWS = Sheets("Sheet2")
    For Each rng In srcWS.Range("B17", srcWS.Range("B" & Rows.Count).End(xlUp))
        If rng >= DateSerial(Year(rng), 1, 1) And rng <= DateSerial(Year(rng), 3, 31) Then
            Val = "1st"
        ElseIf rng >= DateSerial(Year(rng), 4, 1) And rng <= DateSerial(Year(rng), 6, 30) Then
            Val = "2nd"
        ElseIf rng >= DateSerial(Year(rng), 7, 1) And rng <= DateSerial(Year(rng), 9, 30) Then
            Val = "3rd"
        ElseIf rng >= DateSerial(Year(rng), 10, 1) And rng <= DateSerial(Year(rng), 12, 31) Then
            Val = "4th"
        End If
        With desWS
            Set fnd = .Range("G:G").Find(Val, LookIn:=xlValues, lookat:=xlPart)
            .Rows(fnd.Row + 1).EntireRow.Insert
            .Range("A" & fnd.Row + 1).Resize(, 4).Value = srcWS.Range("A" & rng.Row).Resize(, 4).Value
            .Range("G" & fnd.Row + 1).Value = srcWS.Range("G" & rng.Row).Value
        End With
    Next rng
    Application.ScreenUpdating = True
End Sub
 
Upvote 0
Please disregard I had it saved as a workbook that didnt accept macros.

Sorry about that

Thank you for your reply. Im a little rusty on properly explaining. I entered the code into a module but im not seeing it copy the cells to sheet 2. I re-entered the data on sheet 1 row 17 and entered the ship date in B17 but it didnt put it in any of yearly quater on sheet 2. Should I copy the code you provided into the sheet code? Not sure what Im missing but im sure its the way I was explaining it.

Thanks
 
Last edited:
Upvote 0
I used the two sheets you posted. I placed the macro into a regular code module, ran it and it worked properly. Did you run the macro manually?
 
Upvote 0
I used the two sheets you posted. I placed the macro into a regular code module, ran it and it worked properly. Did you run the macro manually?
I spoke to soon. I was thinking it would do it automatically but when I actually ran the macro it worked as intended. Im assuming I could change the Application.ScreenUpdating to true and it would run when i entered the date but Im guessing if I dont have all the data put into the cells that are to be copied they will just be blank
 
Upvote 0
You could have the data copied over automatically after you enter the date. You would have to enter all the other data first and the date last. Is this what you want?
 
Upvote 0
I think its doing a few things that I didnt think about. Im going to enter some data and see if I can explain a couple things that might could be tweaked in the code.

Thanks again mumps for you help I will be back intouch tomorrow
 
Upvote 0
After entering several lines of data and run the code Ive seen a few things Its doing that I didnt think about. If you could modify code that would be great. I will add copies of the mini sheets below that hava data in them so you see how the sheet will grow overtime. Here is the things I see.

*Could the trigger the code to run when the date is enter in column B?

*On sheet1 there will be more data added to each row dailey so when the code runs it needs to only copy the data from that row in Columns A,B,C & D to sheet 2

* When the code adds the next row on sheet 2 could it copy the formatting that the data came from on sheet1 instead or copying the formatting from the row above it.

*Sometimes I may have to edit some of the data on one of the rows in sheet1, could you have it where it will only update that same row of data in sheet2 when the date is re-entered without it copying all the rows that have the date in it again?



WORKING ON Franklin Job Review .xlsm
ABCDEFGHIJKLMNO
1FMI's Current Backlong of Projects
2ProjectShip DateCustomerJob Type Status% CompNotes CONTRACT PRICEInvoiced %AMOUNT BILLED TO DATEMargin ESTIMATED GROSS PROFITCOSTS TO DATEFMI Cost GG Cost
3Ret- Jobs
4F2048-RET2Allied Lock
5F2559AL-RET2
6F2612-RET5
7F2646-RET3
8F3105-RET4
9F3208-RET4
10F3348-RET5
11F3544-RET2
12F3616A-RET1
13
14
15F- Jobs
16ProjectShip DateCustomerJob Type Status% CompNotes CONTRACT PRICEInvoiced %AMOUNT BILLED TO DATEMargin ESTIMATED GROSS PROFITCOSTS TO DATEFMI Cost GG Cost
17F3685Dec-24BigBeeF3685-PTW LineShipped / Not Closed Roll Tide95%$0.00
18F3668Dec-23AceroF3668-Material Handling Line Shipped / Not Closed Load containers next week50%
19F3669Apr-24ACEROF3669-20" Flange LinesFab/ Machine50%$0.00
20F3670Feb-24ACEROF3670-PTW LineIn Machine Shop50%$0.00
21F3697Jan-24New MilleniumF3697-4330 Angle ShearIn Machine Shopbegin 35%$0.00
22F3699May-24Standard StructuresF3699- PTW 72FabReleased with F367035%$0.00
23F3700May-24Standard StructuresF3700-Plasma System Fab35%$0.00
24F3701May-24Standard StructuresF3701-Plate/Flange FabReleased with F369035%$0.00
25F3703Jan-24CNH IndustriesF3703-Angle LineIn Machine Shop60%$0.00
26F3704Apr-24Ideal SteelF3704-PTW Fab/ Machine35%$0.00
27F3705Feb-24Chief BuildingsF3705- Plate/Flange LineFab/ Machine35%$0.00
28F3707Mar-24ASTA DoorF3707-Angle Line with CoopersProgramming 35%$0.00
29F3710Nov-24Lucas MetalsF3710-PTW 72Engineering35%$0.00
30F3711Nov-24Lucas MetalsF3711-Plasma SystemEngineering35%$0.00
31F3712Nov-24Lucas MetalsF3712-Plate/Flange Line Engineering35%$0.00
32F3713Dec-24Valley JoistF3713-Valley Joist Angle LineEngineering35%$0.00
33F3714Dec-24Vulcraft - TexasF3714-Long Span Angle LineEngineering35%$0.00
34F3715Jan-25Central States F3715-Plasma LineEngineering35%$0.00
35F3716Jan-25Central States F3716-PTW 72Engineering35%$0.00
36F3717Jan-25Central States F3717-Plate/Flange Line Engineering35%$0.00
37F3718Aug-24SiemansF3718-BusBarProgramming 20%$0.00
38F3719Aug-24SiemansF3719-BusBarEngineering20%$0.00
39F3720Aug-24SiemansF3720-BusBarEngineering20%$0.00
40F3721Aug-24SiemansF3721-BusBarEngineering20%$0.00
41F3722Oct-24SiemansF3722-BusBarEngineering20%$0.00
42F3723Oct-24SiemansF3723-BusBarEngineering20%$0.00
43F3724Oct-24SiemansF3724-BusBarEngineering20%$0.00
44F3725Mar-24Bham Rail F3725 - Rail PressEngineering35%$0.00
45F3727Mar-25ACI Buildings ExpansionF3727-72x240 slat table Engineering35%$0.00
46F3728Mar-25ACI Buildings ExpansionF3728-Plate/Flange LineEngineering35%$0.00
47F3729Mar-25ACI Buildings ExpansionF3729- PTW 72Engineering35%$0.00
48F3730Jan-24SBS BuildingsF3730- Web seamersEngineering35%$0.00
49F3731Dec-24AIG ControlsF3731- Shears / Nothers / PunchesEngineering$0.00
50
51
52
53
54
55
56
57
58
59
60
61
Sheet1
Cell Formulas
RangeFormula
J17,J19:J49J17=H17*I17


WORKING ON Franklin Job Review .xlsm
ABCDEFGHIJKLMNOPQ
1FMI's Current Backlong of Major Projects
2ProjectShip DateCustomerJob Type Status% CompNotes EngineeringPurchasing Machine ShopFab ShopAssembly
31st Quarter Jan-Mar 2024
4F3730Jan-24SBS BuildingsF3730- Web seamers
5F3729Mar-25ACI Buildings ExpansionF3729- PTW 72
6F3728Mar-25ACI Buildings ExpansionF3728-Plate/Flange Line
7F3727Mar-25ACI Buildings ExpansionF3727-72x240 slat table
8F3725Mar-24Bham Rail F3725 - Rail Press
9F3717Jan-25Central States F3717-Plate/Flange Line
10F3716Jan-25Central States F3716-PTW 72
11F3715Jan-25Central States F3715-Plasma Line
12F3707Mar-24ASTA DoorF3707-Angle Line with Coopers
13F3705Feb-24Chief BuildingsF3705- Plate/Flange Line
14F3703Jan-24CNH IndustriesF3703-Angle Line
15F3697Jan-24New MilleniumF3697-4330 Angle Shearbegin
16F3670Feb-24ACEROF3670-PTW Line
17
182nd Quarter April-June 2024
19F3704Apr-24Ideal SteelF3704-PTW
20F3701May-24Standard StructuresF3701-Plate/Flange Released with F3690
21F3700May-24Standard StructuresF3700-Plasma System
22F3699May-24Standard StructuresF3699- PTW 72Released with F3670
23F3669Apr-24ACEROF3669-20" Flange Lines
24
253rd Quarter July-Sep 2024
26F3721Aug-24SiemansF3721-BusBar
27F3720Aug-24SiemansF3720-BusBar
28F3719Aug-24SiemansF3719-BusBar
29F3718Aug-24SiemansF3718-BusBar
30
314th Quarter Oct-Dec 2024
32F3731Dec-24AIG ControlsF3731- Shears / Nothers / Punches
33F3724Oct-24SiemansF3724-BusBar
34F3723Oct-24SiemansF3723-BusBar
35F3722Oct-24SiemansF3722-BusBar
36F3714Dec-24Vulcraft - TexasF3714-Long Span Angle Line
37F3713Dec-24Valley JoistF3713-Valley Joist Angle Line
38F3712Nov-24Lucas MetalsF3712-Plate/Flange Line
39F3711Nov-24Lucas MetalsF3711-Plasma System
40F3710Nov-24Lucas MetalsF3710-PTW 72
41F3668Dec-23AceroF3668-Material Handling Line Load containers next week
42F3685Dec-24BigBeeF3685-PTW LineComplete
43
44
45
46
47
Sheet2
Cells with Conditional Formatting
CellConditionCell FormatStop If True
O4:O16Other TypeColor scaleNO
O4:O16Other TypeColor scaleNO
O4:O16Other TypeColor scaleNO
O4:O16Other TypeColor scaleNO
O4:O16Other TypeColor scaleNO
O4:O16Other TypeColor scaleNO
Q4:Q16Other TypeColor scaleNO
Q4:Q16Other TypeColor scaleNO
Q4:Q16Other TypeColor scaleNO
Q4:Q16Other TypeColor scaleNO
Q4:Q16Other TypeColor scaleNO
Q4:Q16Other TypeColor scaleNO
M4:M16Other TypeColor scaleNO
M4:M16Other TypeColor scaleNO
M4:M16Other TypeColor scaleNO
M4:M16Other TypeColor scaleNO
M4:M16Other TypeColor scaleNO
M4:M16Other TypeColor scaleNO
K4:K16Other TypeColor scaleNO
K4:K16Other TypeColor scaleNO
K4:K16Other TypeColor scaleNO
K4:K16Other TypeColor scaleNO
K4:K16Other TypeColor scaleNO
K4:K16Other TypeColor scaleNO
I4:I16Other TypeColor scaleNO
I4:I16Other TypeColor scaleNO
I4:I16Other TypeColor scaleNO
I4:I16Other TypeColor scaleNO
I4:I16Other TypeColor scaleNO
I4:I16Other TypeColor scaleNO
I4:I16Other TypeColor scaleNO
I4:I16Other TypeColor scaleNO
I4:I16Other TypeColor scaleNO
I4:I16Cell Value=1textNO
K4:K16Other TypeColor scaleNO
K4:K16Other TypeColor scaleNO
K4:K16Other TypeColor scaleNO
K4:K16Cell Value=1textNO
M4:M16Other TypeColor scaleNO
M4:M16Other TypeColor scaleNO
M4:M16Other TypeColor scaleNO
M4:M16Cell Value=1textNO
O4:O16Other TypeColor scaleNO
O4:O16Other TypeColor scaleNO
O4:O16Other TypeColor scaleNO
O4:O16Cell Value=1textNO
Q4:Q16Other TypeColor scaleNO
Q4:Q16Other TypeColor scaleNO
Q4:Q16Other TypeColor scaleNO
Q4:Q16Cell Value=1textNO
O26:O29Other TypeColor scaleNO
O26:O29Other TypeColor scaleNO
O26:O29Other TypeColor scaleNO
O26:O29Other TypeColor scaleNO
O26:O29Other TypeColor scaleNO
O26:O29Other TypeColor scaleNO
Q26:Q29Other TypeColor scaleNO
Q26:Q29Other TypeColor scaleNO
Q26:Q29Other TypeColor scaleNO
Q26:Q29Other TypeColor scaleNO
Q26:Q29Other TypeColor scaleNO
Q26:Q29Other TypeColor scaleNO
M26:M29Other TypeColor scaleNO
M26:M29Other TypeColor scaleNO
M26:M29Other TypeColor scaleNO
M26:M29Other TypeColor scaleNO
M26:M29Other TypeColor scaleNO
M26:M29Other TypeColor scaleNO
K26:K29Other TypeColor scaleNO
K26:K29Other TypeColor scaleNO
K26:K29Other TypeColor scaleNO
K26:K29Other TypeColor scaleNO
K26:K29Other TypeColor scaleNO
K26:K29Other TypeColor scaleNO
I26:I29Other TypeColor scaleNO
I26:I29Other TypeColor scaleNO
I26:I29Other TypeColor scaleNO
I26:I29Other TypeColor scaleNO
I26:I29Other TypeColor scaleNO
I26:I29Other TypeColor scaleNO
I26:I29Other TypeColor scaleNO
I26:I29Other TypeColor scaleNO
I26:I29Other TypeColor scaleNO
I26:I29Cell Value=1textNO
K26:K29Other TypeColor scaleNO
K26:K29Other TypeColor scaleNO
K26:K29Other TypeColor scaleNO
K26:K29Cell Value=1textNO
M26:M29Other TypeColor scaleNO
M26:M29Other TypeColor scaleNO
M26:M29Other TypeColor scaleNO
M26:M29Cell Value=1textNO
O26:O29Other TypeColor scaleNO
O26:O29Other TypeColor scaleNO
O26:O29Other TypeColor scaleNO
O26:O29Cell Value=1textNO
Q26:Q29Other TypeColor scaleNO
Q26:Q29Other TypeColor scaleNO
Q26:Q29Other TypeColor scaleNO
Q26:Q29Cell Value=1textNO
O19:O23Other TypeColor scaleNO
O19:O23Other TypeColor scaleNO
O19:O23Other TypeColor scaleNO
O19:O23Other TypeColor scaleNO
O19:O23Other TypeColor scaleNO
O19:O23Other TypeColor scaleNO
Q19:Q23Other TypeColor scaleNO
Q19:Q23Other TypeColor scaleNO
Q19:Q23Other TypeColor scaleNO
Q19:Q23Other TypeColor scaleNO
Q19:Q23Other TypeColor scaleNO
Q19:Q23Other TypeColor scaleNO
M19:M23Other TypeColor scaleNO
M19:M23Other TypeColor scaleNO
M19:M23Other TypeColor scaleNO
M19:M23Other TypeColor scaleNO
M19:M23Other TypeColor scaleNO
M19:M23Other TypeColor scaleNO
K19:K23Other TypeColor scaleNO
K19:K23Other TypeColor scaleNO
K19:K23Other TypeColor scaleNO
K19:K23Other TypeColor scaleNO
K19:K23Other TypeColor scaleNO
K19:K23Other TypeColor scaleNO
I19:I23Other TypeColor scaleNO
I19:I23Other TypeColor scaleNO
I19:I23Other TypeColor scaleNO
I19:I23Other TypeColor scaleNO
I19:I23Other TypeColor scaleNO
I19:I23Other TypeColor scaleNO
I19:I23Other TypeColor scaleNO
I19:I23Other TypeColor scaleNO
I19:I23Other TypeColor scaleNO
I19:I23Cell Value=1textNO
K19:K23Other TypeColor scaleNO
K19:K23Other TypeColor scaleNO
K19:K23Other TypeColor scaleNO
K19:K23Cell Value=1textNO
M19:M23Other TypeColor scaleNO
M19:M23Other TypeColor scaleNO
M19:M23Other TypeColor scaleNO
M19:M23Cell Value=1textNO
O19:O23Other TypeColor scaleNO
O19:O23Other TypeColor scaleNO
O19:O23Other TypeColor scaleNO
O19:O23Cell Value=1textNO
Q19:Q23Other TypeColor scaleNO
Q19:Q23Other TypeColor scaleNO
Q19:Q23Other TypeColor scaleNO
Q19:Q23Cell Value=1textNO
O32:O43Other TypeColor scaleNO
O32:O43Other TypeColor scaleNO
O32:O43Other TypeColor scaleNO
O32:O43Other TypeColor scaleNO
O32:O43Other TypeColor scaleNO
O32:O43Other TypeColor scaleNO
Q32:Q43Other TypeColor scaleNO
Q32:Q43Other TypeColor scaleNO
Q32:Q43Other TypeColor scaleNO
Q32:Q43Other TypeColor scaleNO
Q32:Q43Other TypeColor scaleNO
Q32:Q43Other TypeColor scaleNO
M32:M43Other TypeColor scaleNO
M32:M43Other TypeColor scaleNO
M32:M43Other TypeColor scaleNO
M32:M43Other TypeColor scaleNO
M32:M43Other TypeColor scaleNO
M32:M43Other TypeColor scaleNO
K32:K43Other TypeColor scaleNO
K32:K43Other TypeColor scaleNO
K32:K43Other TypeColor scaleNO
K32:K43Other TypeColor scaleNO
K32:K43Other TypeColor scaleNO
K32:K43Other TypeColor scaleNO
I32:I43Other TypeColor scaleNO
I32:I43Other TypeColor scaleNO
I32:I43Other TypeColor scaleNO
I32:I43Other TypeColor scaleNO
I32:I43Other TypeColor scaleNO
I32:I43Other TypeColor scaleNO
I32:I43Other TypeColor scaleNO
I32:I43Other TypeColor scaleNO
I32:I43Other TypeColor scaleNO
I32:I43Cell Value=1textNO
K32:K43Other TypeColor scaleNO
K32:K43Other TypeColor scaleNO
K32:K43Other TypeColor scaleNO
K32:K43Cell Value=1textNO
M32:M43Other TypeColor scaleNO
M32:M43Other TypeColor scaleNO
M32:M43Other TypeColor scaleNO
M32:M43Cell Value=1textNO
O32:O43Other TypeColor scaleNO
O32:O43Other TypeColor scaleNO
O32:O43Other TypeColor scaleNO
O32:O43Cell Value=1textNO
Q32:Q43Other TypeColor scaleNO
Q32:Q43Other TypeColor scaleNO
Q32:Q43Other TypeColor scaleNO
Q32:Q43Cell Value=1textNO
O30Other TypeColor scaleNO
O30Other TypeColor scaleNO
O30Other TypeColor scaleNO
O30Other TypeColor scaleNO
O30Other TypeColor scaleNO
O30Other TypeColor scaleNO
Q30Other TypeColor scaleNO
Q30Other TypeColor scaleNO
Q30Other TypeColor scaleNO
Q30Other TypeColor scaleNO
Q30Other TypeColor scaleNO
Q30Other TypeColor scaleNO
M30Other TypeColor scaleNO
M30Other TypeColor scaleNO
M30Other TypeColor scaleNO
M30Other TypeColor scaleNO
M30Other TypeColor scaleNO
M30Other TypeColor scaleNO
K30Other TypeColor scaleNO
K30Other TypeColor scaleNO
K30Other TypeColor scaleNO
K30Other TypeColor scaleNO
K30Other TypeColor scaleNO
K30Other TypeColor scaleNO
I30Other TypeColor scaleNO
I30Other TypeColor scaleNO
I30Other TypeColor scaleNO
I30Other TypeColor scaleNO
I30Other TypeColor scaleNO
I30Other TypeColor scaleNO
I30Other TypeColor scaleNO
I30Other TypeColor scaleNO
I30Other TypeColor scaleNO
I30Cell Value=1textNO
K30Other TypeColor scaleNO
K30Other TypeColor scaleNO
K30Other TypeColor scaleNO
K30Cell Value=1textNO
M30Other TypeColor scaleNO
M30Other TypeColor scaleNO
M30Other TypeColor scaleNO
M30Cell Value=1textNO
O30Other TypeColor scaleNO
O30Other TypeColor scaleNO
O30Other TypeColor scaleNO
O30Cell Value=1textNO
Q30Other TypeColor scaleNO
Q30Other TypeColor scaleNO
Q30Other TypeColor scaleNO
Q30Cell Value=1textNO
O24Other TypeColor scaleNO
O24Other TypeColor scaleNO
O24Other TypeColor scaleNO
O24Other TypeColor scaleNO
O24Other TypeColor scaleNO
O24Other TypeColor scaleNO
Q24Other TypeColor scaleNO
Q24Other TypeColor scaleNO
Q24Other TypeColor scaleNO
Q24Other TypeColor scaleNO
Q24Other TypeColor scaleNO
Q24Other TypeColor scaleNO
M24Other TypeColor scaleNO
M24Other TypeColor scaleNO
M24Other TypeColor scaleNO
M24Other TypeColor scaleNO
M24Other TypeColor scaleNO
M24Other TypeColor scaleNO
K24Other TypeColor scaleNO
K24Other TypeColor scaleNO
K24Other TypeColor scaleNO
K24Other TypeColor scaleNO
K24Other TypeColor scaleNO
K24Other TypeColor scaleNO
I24Other TypeColor scaleNO
I24Other TypeColor scaleNO
I24Other TypeColor scaleNO
I24Other TypeColor scaleNO
I24Other TypeColor scaleNO
I24Other TypeColor scaleNO
I24Other TypeColor scaleNO
I24Other TypeColor scaleNO
I24Other TypeColor scaleNO
I24Cell Value=1textNO
K24Other TypeColor scaleNO
K24Other TypeColor scaleNO
K24Other TypeColor scaleNO
K24Cell Value=1textNO
M24Other TypeColor scaleNO
M24Other TypeColor scaleNO
M24Other TypeColor scaleNO
M24Cell Value=1textNO
O24Other TypeColor scaleNO
O24Other TypeColor scaleNO
O24Other TypeColor scaleNO
O24Cell Value=1textNO
Q24Other TypeColor scaleNO
Q24Other TypeColor scaleNO
Q24Other TypeColor scaleNO
Q24Cell Value=1textNO
O17Other TypeColor scaleNO
O17Other TypeColor scaleNO
O17Other TypeColor scaleNO
O17Other TypeColor scaleNO
O17Other TypeColor scaleNO
O17Other TypeColor scaleNO
Q17Other TypeColor scaleNO
Q17Other TypeColor scaleNO
Q17Other TypeColor scaleNO
Q17Other TypeColor scaleNO
Q17Other TypeColor scaleNO
Q17Other TypeColor scaleNO
M17Other TypeColor scaleNO
M17Other TypeColor scaleNO
M17Other TypeColor scaleNO
M17Other TypeColor scaleNO
M17Other TypeColor scaleNO
M17Other TypeColor scaleNO
K17Other TypeColor scaleNO
K17Other TypeColor scaleNO
K17Other TypeColor scaleNO
K17Other TypeColor scaleNO
K17Other TypeColor scaleNO
K17Other TypeColor scaleNO
I17Other TypeColor scaleNO
I17Other TypeColor scaleNO
I17Other TypeColor scaleNO
I17Other TypeColor scaleNO
I17Other TypeColor scaleNO
I17Other TypeColor scaleNO
I17Other TypeColor scaleNO
I17Other TypeColor scaleNO
I17Other TypeColor scaleNO
I17Cell Value=1textNO
K17Other TypeColor scaleNO
K17Other TypeColor scaleNO
K17Other TypeColor scaleNO
K17Cell Value=1textNO
M17Other TypeColor scaleNO
M17Other TypeColor scaleNO
M17Other TypeColor scaleNO
M17Cell Value=1textNO
O17Other TypeColor scaleNO
O17Other TypeColor scaleNO
O17Other TypeColor scaleNO
O17Cell Value=1textNO
Q17Other TypeColor scaleNO
Q17Other TypeColor scaleNO
Q17Other TypeColor scaleNO
Q17Cell Value=1textNO
 
Upvote 0
copy the data from that row in Columns A,B,C & D to sheet 2
Do you not want column G copied as well?
copy the formatting that the data came from on sheet1
Currently, the Sheet1 you posted has no formatting such as cell and font color. Does your actual Sheet1 have any kind of formatting? If it does, please re-post it with the color formatting included.

Just to confirm: You want the code to be triggered after you enter the date in column B. Is this correct? If so, each time you make any changes in Sheet1 that you want copied to Sheet2, you will have to re-enter the date.
 
Upvote 0

Forum statistics

Threads
1,215,069
Messages
6,122,959
Members
449,096
Latest member
Anshu121

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