Insert Multiple Rows & Insert Data per other wksht

ARich4JC

New Member
Joined
Nov 28, 2009
Messages
6
I have a good one here. I have a Table of (GetPivotData items). However, to update the Table to include (new) Freeport & Baton Rouge, I must first:

1) Add the new site info (col. A), With the Years to insert (col. C and along with the Quarters (col. F - I: see pattern)
2)Tell it how many additional rows needed (col. E) in the Mstr Table.
3) Insert # of Rows, Copy/Paste Special Values in the Columns A, C & D) of the Mstr_GPD_Table. Has a Pattern of each Consignee per # of Year(s) (listed in Table) w/ 4 Qtrs to each year.

Harder to explain...Easier to show.


My Input Table (Consignee Data Table):
Excel Workbook
ABCDEFGHI
1Consignee NumberConsignee NameYear StartYear EndRows NeededQuarter1Quarter2Quarter3Quarter4
275-2778918CKCookeville2006201644Q1Q2Q3Q4
375-2778918LBLynchburg2006201644Q1Q2Q3Q4
475-2778918LVLouisville2006201644Q1Q2Q3Q4
575-2778918PTPittsburgh2006201644Q1Q2Q3Q4
675-2778918RLRaleigh2006201644Q1Q2Q3Q4
775-2778918SPSpringville2006201644Q1Q2Q3Q4
875-2778918SSSulphur Springs2006201644Q1Q2Q3Q4
975-2778918WVWoodlands2006201644Q1Q2Q3Q4
1075-2779018FVFreeport2006201644Q1Q2Q3Q4
1175-2778918BRBaton Rouge2007200912Q1Q2Q3Q4
Consignee Macro Data Table
Excel 2007
Cell Formulas
RangeFormula
A2=IF(ISBLANK(ConsigneeInfoTable[[#This Row],[Consignee Number]]),"",ConsigneeInfoTable[[#This Row],[Consignee Number]])
A3=IF(ISBLANK(ConsigneeInfoTable[[#This Row],[Consignee Number]]),"",ConsigneeInfoTable[[#This Row],[Consignee Number]])
A4=IF(ISBLANK(ConsigneeInfoTable[[#This Row],[Consignee Number]]),"",ConsigneeInfoTable[[#This Row],[Consignee Number]])
A5=IF(ISBLANK(ConsigneeInfoTable[[#This Row],[Consignee Number]]),"",ConsigneeInfoTable[[#This Row],[Consignee Number]])
A6=IF(ISBLANK(ConsigneeInfoTable[[#This Row],[Consignee Number]]),"",ConsigneeInfoTable[[#This Row],[Consignee Number]])
A7=IF(ISBLANK(ConsigneeInfoTable[[#This Row],[Consignee Number]]),"",ConsigneeInfoTable[[#This Row],[Consignee Number]])
A8=IF(ISBLANK(ConsigneeInfoTable[[#This Row],[Consignee Number]]),"",ConsigneeInfoTable[[#This Row],[Consignee Number]])
A9=IF(ISBLANK(ConsigneeInfoTable[[#This Row],[Consignee Number]]),"",ConsigneeInfoTable[[#This Row],[Consignee Number]])
A10=IF(ISBLANK(ConsigneeInfoTable[[#This Row],[Consignee Number]]),"",ConsigneeInfoTable[[#This Row],[Consignee Number]])
A11=IF(ISBLANK(ConsigneeInfoTable[[#This Row],[Consignee Number]]),"",ConsigneeInfoTable[[#This Row],[Consignee Number]])
B2=IFERROR(VLOOKUP(A2,ConsigneeInfoTable,2,0),"")
B3=IFERROR(VLOOKUP(A3,ConsigneeInfoTable,2,0),"")
B4=IFERROR(VLOOKUP(A4,ConsigneeInfoTable,2,0),"")
B5=IFERROR(VLOOKUP(A5,ConsigneeInfoTable,2,0),"")
B6=IFERROR(VLOOKUP(A6,ConsigneeInfoTable,2,0),"")
B7=IFERROR(VLOOKUP(A7,ConsigneeInfoTable,2,0),"")
B8=IFERROR(VLOOKUP(A8,ConsigneeInfoTable,2,0),"")
B9=IFERROR(VLOOKUP(A9,ConsigneeInfoTable,2,0),"")
B10=IFERROR(VLOOKUP(A10,ConsigneeInfoTable,2,0),"")
B11=IFERROR(VLOOKUP(A11,ConsigneeInfoTable,2,0),"")
E2=((D2-C2)*4)+4
E3=((D3-C3)*4)+4
E4=((D4-C4)*4)+4
E5=((D5-C5)*4)+4
E6=((D6-C6)*4)+4
E7=((D7-C7)*4)+4
E8=((D8-C8)*4)+4
E9=((D9-C9)*4)+4
E10=((D10-C10)*4)+4
E11=((D11-C11)*4)+4



My Input Table (Mstr_GPD_Table): Must INSERT the # of rows per the above table first and add the info in colums A, C and D. Column B is a VLookup formula.
Excel Workbook
ABCD
1Consignee NumberConsignee NameYearQuarter
275-2778918WVWoodlands2006Q1
375-2778918WVWoodlands2006Q2
475-2778918WVWoodlands2006Q3
575-2778918WVWoodlands2006Q4
675-2778918WVWoodlands2007Q1
775-2778918WVWoodlands2007Q2
875-2778918WVWoodlands2007Q3
975-2778918WVWoodlands2007Q4
1075-2778918WVWoodlands2008Q1
1175-2778918WVWoodlands2008Q2
1275-2778918WVWoodlands2008Q3
1375-2778918WVWoodlands2008Q4
1475-2778918WVWoodlands2009Q1
1575-2778918WVWoodlands2009Q2
1675-2778918WVWoodlands2009Q3
1775-2778918WVWoodlands2009Q4
18
19
Mstr_GPD_Table
Excel 2007
Cell Formulas
RangeFormula
B2=VLOOKUP($A2,'[2007 - MASTER REPORT - EntryRpt.ACE.FCD.xlsm]Consignee Info'!A:B,2)
B3=VLOOKUP($A3,'[2007 - MASTER REPORT - EntryRpt.ACE.FCD.xlsm]Consignee Info'!A:B,2)
B4=VLOOKUP($A4,'[2007 - MASTER REPORT - EntryRpt.ACE.FCD.xlsm]Consignee Info'!A:B,2)
B5=VLOOKUP($A5,'[2007 - MASTER REPORT - EntryRpt.ACE.FCD.xlsm]Consignee Info'!A:B,2)
B6=VLOOKUP($A6,'[2007 - MASTER REPORT - EntryRpt.ACE.FCD.xlsm]Consignee Info'!A:B,2)
B7=VLOOKUP($A7,'[2007 - MASTER REPORT - EntryRpt.ACE.FCD.xlsm]Consignee Info'!A:B,2)
B8=VLOOKUP($A8,'[2007 - MASTER REPORT - EntryRpt.ACE.FCD.xlsm]Consignee Info'!A:B,2)
B9=VLOOKUP($A9,'[2007 - MASTER REPORT - EntryRpt.ACE.FCD.xlsm]Consignee Info'!A:B,2)
B10=VLOOKUP($A10,'[2007 - MASTER REPORT - EntryRpt.ACE.FCD.xlsm]Consignee Info'!A:B,2)
B11=VLOOKUP($A11,'[2007 - MASTER REPORT - EntryRpt.ACE.FCD.xlsm]Consignee Info'!A:B,2)
B12=VLOOKUP($A12,'[2007 - MASTER REPORT - EntryRpt.ACE.FCD.xlsm]Consignee Info'!A:B,2)
B13=VLOOKUP($A13,'[2007 - MASTER REPORT - EntryRpt.ACE.FCD.xlsm]Consignee Info'!A:B,2)
B14=VLOOKUP($A14,'[2007 - MASTER REPORT - EntryRpt.ACE.FCD.xlsm]Consignee Info'!A:B,2)
B15=VLOOKUP($A15,'[2007 - MASTER REPORT - EntryRpt.ACE.FCD.xlsm]Consignee Info'!A:B,2)
B16=VLOOKUP($A16,'[2007 - MASTER REPORT - EntryRpt.ACE.FCD.xlsm]Consignee Info'!A:B,2)
B17=VLOOKUP($A17,'[2007 - MASTER REPORT - EntryRpt.ACE.FCD.xlsm]Consignee Info'!A:B,2)



Thanks For Your Help In Advance,
 

Excel Facts

Add Bullets to Range
Select range. Press Ctrl+1. On Number tab, choose Custom. Type Alt+7 then space then @ sign (using 7 on numeric keypad)

Forum statistics

Threads
1,224,911
Messages
6,181,689
Members
453,062
Latest member
blackyblack

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