Help with formula macro

B

Blauv

Board Regular
Joined
Mar 26, 2010
Messages
126
Hello,
I have the below macro that places alot of formulas into a WS. It works as it is, but it is very slow. Is there something that can be done to make this execute quicker?


Code: 
Sub SetFormulas()Sheets("OpenOrder Data").Activate
GetOpenSummaryReport


        Dim LastRow As Long
        
    LastRow = Range("F" & Rows.Count).End(xlUp).row
    Range("L2:BA" & LastRow).ClearContents
    Range("A2:BA" & LastRow).Select
    ClearBordersOpenOrder
    
        'Shipping Info
    Range("L2").Value = "=IFERROR(LOOKUP(2,1/(RC[2]:RC[41]<>""""),RC[2]:RC[41]),"""")"
    Range("L2").Copy Range("L2:L" & LastRow)


    '1
        Range("N2").Value = "=IFERROR(INDEX(Data!C[-9],MATCH(RC6,Data!C,0)) & ""   -   "" &INDEX(Data!C[-8],MATCH(RC6,Data!C,0))& ""   -   "" &INDEX(Data!C[1],MATCH(RC6,Data!C,0))& ""   -   "" &INDEX(Data!C[-11],MATCH(RC6,Data!C,0)),"""")"
    Range("N2").Copy Range("N2:N" & LastRow)
    
    '2
        Range("O2").Value = "=IFERROR(INDEX(Data!C[6],MATCH(RC6,Data!C[15],0)) & ""   -   "" &INDEX(Data!C[7],MATCH(RC6,Data!C[15],0))& ""   -   "" &INDEX(Data!R[-1]C[16],MATCH(RC6,Data!C[15],0))& ""   -   "" &INDEX(Data!C[4],MATCH(RC6,Data!C[15],0)),"""")"
    Range("O2").Copy Range("O2:O" & LastRow)
    '3
        Range("P2").Value = "=IFERROR(INDEX(Data!C[21],MATCH(RC6,Data!C[30],0)) & ""   -   "" &INDEX(Data!C[22],MATCH(RC6,Data!C[30],0))& ""   -   "" &INDEX(Data!C[31],MATCH(RC6,Data!C[30],0))& ""   -   "" &INDEX(Data!C[19],MATCH(RC6,Data!C[30],0)),"""")"
    Range("P2").Copy Range("P2:P" & LastRow)
    '4
        Range("Q2").Value = "=IFERROR(INDEX(Data!C[36],MATCH(RC6,Data!C[45],0)) & ""   -   "" &INDEX(Data!C[37],MATCH(RC6,Data!C[45],0))& ""   -   "" &INDEX(Data!C[46],MATCH(RC6,Data!C[45],0))& ""   -   "" &INDEX(Data!C[34],MATCH(RC6,Data!C[45],0)),"""")"
    Range("Q2").Copy Range("Q2:Q" & LastRow)
    '5
        Range("R2").Value = "=IFERROR(INDEX(Data!C[51],MATCH(RC6,Data!C[60],0)) & ""   -   "" &INDEX(Data!C[52],MATCH(RC6,Data!C[60],0))& ""   -   "" &INDEX(Data!C[61],MATCH(RC6,Data!C[60],0))& ""   -   "" &INDEX(Data!C[49],MATCH(RC6,Data!C[60],0)),"""")"
    Range("R2").Copy Range("R2:R" & LastRow)
    '6
        Range("S2").Value = "=IFERROR(INDEX(Data!C[66],MATCH(RC6,Data!C[75],0)) & ""   -   "" &INDEX(Data!C[67],MATCH(RC6,Data!C[75],0))& ""   -   "" &INDEX(Data!C[76],MATCH(RC6,Data!C[75],0))& ""   -   "" &INDEX(Data!C[64],MATCH(RC6,Data!C[75],0)),"""")"
    Range("S2").Copy Range("S2:S" & LastRow)
    '7
        Range("T2").Value = "=IFERROR(INDEX(Data!C[81],MATCH(RC6,Data!C[90],0)) & ""   -   "" &INDEX(Data!C[82],MATCH(RC6,Data!C[90],0))& ""   -   "" &INDEX(Data!C[91],MATCH(RC6,Data!C[90],0))& ""   -   "" &INDEX(Data!C[79],MATCH(RC6,Data!C[90],0)),"""")"
    Range("T2").Copy Range("T2:T" & LastRow)
    '8
        Range("U2").Value = "=IFERROR(INDEX(Data!C[96],MATCH(RC6,Data!C[105],0)) & ""   -   "" &INDEX(Data!C[97],MATCH(RC6,Data!C[105],0))& ""   -   "" &INDEX(Data!C[106],MATCH(RC6,Data!C[105],0))& ""   -   "" &INDEX(Data!C[94],MATCH(RC6,Data!C[105],0)),"""")"
    Range("U2").Copy Range("U2:U" & LastRow)
    '9
        Range("V2").Value = "=IFERROR(INDEX(Data!C[111],MATCH(RC6,Data!C[120],0)) & ""   -   "" &INDEX(Data!C[112],MATCH(RC6,Data!C[120],0))& ""   -   "" &INDEX(Data!C[121],MATCH(RC6,Data!C[120],0))& ""   -   "" &INDEX(Data!C[109],MATCH(RC6,Data!C[120],0)),"""")"
    Range("V2").Copy Range("V2:V" & LastRow)
    '10
        Range("W2").Value = "=IFERROR(INDEX(Data!C[126],MATCH(RC6,Data!C[135],0)) & ""   -   "" &INDEX(Data!C[127],MATCH(RC6,Data!C[135],0))& ""   -   "" &INDEX(Data!C[136],MATCH(RC6,Data!C[135],0))& ""   -   "" &INDEX(Data!C[124],MATCH(RC6,Data!C[135],0)),"""")"
    Range("W2").Copy Range("W2:W" & LastRow)
    '11
        Range("X2").Value = "=IFERROR(INDEX(Data!C[141],MATCH(RC6,Data!C[150],0)) & ""   -   "" &INDEX(Data!C[142],MATCH(RC6,Data!C[150],0))& ""   -   "" &INDEX(Data!C[151],MATCH(RC6,Data!C[150],0))& ""   -   "" &INDEX(Data!C[139],MATCH(RC6,Data!C[150],0)),"""")"
    Range("X2").Copy Range("X2:X" & LastRow)
    '12
        Range("Y2").Value = "=IFERROR(INDEX(Data!C[156],MATCH(RC6,Data!C[165],0)) & ""   -   "" &INDEX(Data!C[157],MATCH(RC6,Data!C[165],0))& ""   -   "" &INDEX(Data!C[166],MATCH(RC6,Data!C[165],0))& ""   -   "" &INDEX(Data!C[154],MATCH(RC6,Data!C[165],0)),"""")"
    Range("Y2").Copy Range("Y2:Y" & LastRow)
    '13
        Range("Z2").Value = "=IFERROR(INDEX(Data!C[171],MATCH(RC6,Data!C[180],0)) & ""   -   "" &INDEX(Data!C[172],MATCH(RC6,Data!C[180],0))& ""   -   "" &INDEX(Data!C[181],MATCH(RC6,Data!C[180],0))& ""   -   "" &INDEX(Data!C[169],MATCH(RC6,Data!C[180],0)),"""")"
    Range("Z2").Copy Range("Z2:Z" & LastRow)
    '14
        Range("AA2").Value = "=IFERROR(INDEX(Data!C[186],MATCH(RC6,Data!C[195],0)) & ""   -   "" &INDEX(Data!C[187],MATCH(RC6,Data!C[195],0))& ""   -   "" &INDEX(Data!C[196],MATCH(RC6,Data!C[195],0))& ""   -   "" &INDEX(Data!C[184],MATCH(RC6,Data!C[195],0)),"""")"
    Range("AA2").Copy Range("AA2:AA" & LastRow)
    '15
        Range("AB2").Value = "=IFERROR(INDEX(Data!C[201],MATCH(RC6,Data!C[210],0)) & ""   -   "" &INDEX(Data!C[202],MATCH(RC6,Data!C[210],0))& ""   -   "" &INDEX(Data!C[211],MATCH(RC6,Data!C[210],0))& ""   -   "" &INDEX(Data!C[199],MATCH(RC6,Data!C[210],0)),"""")"
    Range("AB2").Copy Range("AB2:AB" & LastRow)
    '16
        Range("AC2").Value = "=IFERROR(INDEX(Data!C[216],MATCH(RC6,Data!C[227],0)) & ""   -   "" &INDEX(Data!C[217],MATCH(RC6,Data!C[227],0))& ""   -   "" &INDEX(Data!C[228],MATCH(RC6,Data!C[227],0))& ""   -   "" &INDEX(Data!C[214],MATCH(RC6,Data!C[227],0)),"""")"
    Range("AC2").Copy Range("AC2:AC" & LastRow)
    '17
        Range("AD2").Value = "=IFERROR(INDEX(Data!C[216],MATCH(RC6,Data!C[225],0)) & ""   -   "" &INDEX(Data!C[217],MATCH(RC6,Data!C[225],0))& ""   -   "" &INDEX(Data!C[226],MATCH(RC6,Data!C[225],0))& ""   -   "" &INDEX(Data!C[214],MATCH(RC6,Data!C[225],0)),"""")"
    Range("AD2").Copy Range("AD2:AD" & LastRow)
    '18
        Range("AE2").Value = "=IFERROR(INDEX(Data!C[231],MATCH(RC6,Data!C[240],0)) & ""   -   "" &INDEX(Data!C[232],MATCH(RC6,Data!C[240],0))& ""   -   "" &INDEX(Data!C[241],MATCH(RC6,Data!C[240],0))& ""   -   "" &INDEX(Data!C[229],MATCH(RC6,Data!C[240],0)),"""")"
    Range("AE2").Copy Range("AE2:AE" & LastRow)
    '19
        Range("AF2").Value = "=IFERROR(INDEX(Data!C[246],MATCH(RC6,Data!C[255],0)) & ""   -   "" &INDEX(Data!C[247],MATCH(RC6,Data!C[255],0))& ""   -   "" &INDEX(Data!C[256],MATCH(RC6,Data!C[255],0))& ""   -   "" &INDEX(Data!C[244],MATCH(RC6,Data!C[255],0)),"""")"
    Range("AF2").Copy Range("AF2:AD" & LastRow)
    '20
        Range("AG2").Value = "=IFERROR(INDEX(Data!C[261],MATCH(RC6,Data!C[270],0)) & ""   -   "" &INDEX(Data!C[262],MATCH(RC6,Data!C[270],0))& ""   -   "" &INDEX(Data!C[271],MATCH(RC6,Data!C[270],0))& ""   -   "" &INDEX(Data!C[259],MATCH(RC6,Data!C[270],0)),"""")"
    Range("AG2").Copy Range("AG2:AG" & LastRow)
    '21
        Range("AH2").Value = "=IFERROR(INDEX(Data!C[276],MATCH(RC6,Data!C[285],0)) & ""   -   "" &INDEX(Data!C[277],MATCH(RC6,Data!C[285],0))& ""   -   "" &INDEX(Data!C[286],MATCH(RC6,Data!C[285],0))& ""   -   "" &INDEX(Data!C[274],MATCH(RC6,Data!C[285],0)),"""")"
    Range("AH2").Copy Range("AH2:AH" & LastRow)
    '22
        Range("AI2").Value = "=IFERROR(INDEX(Data!C[306],MATCH(RC6,Data!C[315],0)) & ""   -   "" &INDEX(Data!C[307],MATCH(RC6,Data!C[315],0))& ""   -   "" &INDEX(Data!C[316],MATCH(RC6,Data!C[315],0))& ""   -   "" &INDEX(Data!C[304],MATCH(RC6,Data!C[315],0)),"""")"
    Range("AI2").Copy Range("AI2:AI" & LastRow)
    '23
        Range("AJ2").Value = "=IFERROR(INDEX(Data!C[321],MATCH(RC6,Data!C[330],0)) & ""   -   "" &INDEX(Data!C[322],MATCH(RC6,Data!C[330],0))& ""   -   "" &INDEX(Data!C[331],MATCH(RC6,Data!C[330],0))& ""   -   "" &INDEX(Data!C[319],MATCH(RC6,Data!C[330],0)),"""")"
    Range("AJ2").Copy Range("AJ2:AJ" & LastRow)
    '24
        Range("AK2").Value = "=IFERROR(INDEX(Data!C[336],MATCH(RC6,Data!C[345],0)) & ""   -   "" &INDEX(Data!C[337],MATCH(RC6,Data!C[345],0))& ""   -   "" &INDEX(Data!C[346],MATCH(RC6,Data!C[345],0))& ""   -   "" &INDEX(Data!C[334],MATCH(RC6,Data!C[345],0)),"""")"
    Range("AK2").Copy Range("AK2:AK" & LastRow)
    '25
        Range("AL2").Value = "=IFERROR(INDEX(Data!C[351],MATCH(RC6,Data!C[360],0)) & ""   -   "" &INDEX(Data!C[352],MATCH(RC6,Data!C[360],0))& ""   -   "" &INDEX(Data!C[361],MATCH(RC6,Data!C[360],0))& ""   -   "" &INDEX(Data!C[349],MATCH(RC6,Data!C[360],0)),"""")"
    Range("AL2").Copy Range("AL2:AL" & LastRow)
    '26
        Range("AM2").Value = "=IFERROR(INDEX(Data!C[366],MATCH(RC6,Data!C[375],0)) & ""   -   "" &INDEX(Data!C[367],MATCH(RC6,Data!C[375],0))& ""   -   "" &INDEX(Data!C[376],MATCH(RC6,Data!C[375],0))& ""   -   "" &INDEX(Data!C[364],MATCH(RC6,Data!C[375],0)),"""")"
    Range("AM2").Copy Range("AM2:AM" & LastRow)
    '27
        Range("AN2").Value = "=IFERROR(INDEX(Data!C[381],MATCH(RC6,Data!C[390],0)) & ""   -   "" &INDEX(Data!C[382],MATCH(RC6,Data!C[390],0))& ""   -   "" &INDEX(Data!C[391],MATCH(RC6,Data!C[390],0))& ""   -   "" &INDEX(Data!C[379],MATCH(RC6,Data!C[390],0)),"""")"
    Range("AN2").Copy Range("AN2:AN" & LastRow)
    '28
        Range("AO2").Value = "=IFERROR(INDEX(Data!C[412],MATCH(RC6,Data!C[421],0)) & ""   -   "" &INDEX(Data!C[413],MATCH(RC6,Data!C[421],0))& ""   -   "" &INDEX(Data!C[422],MATCH(RC6,Data!C[421],0))& ""   -   "" &INDEX(Data!C[410],MATCH(RC6,Data!C[421],0)),"""")"
    Range("AO2").Copy Range("AO2:AO" & LastRow)
    '29
        Range("AP2").Value = "=IFERROR(INDEX(Data!C[427],MATCH(RC6,Data!C[436],0)) & ""   -   "" &INDEX(Data!C[428],MATCH(RC6,Data!C[436],0))& ""   -   "" &INDEX(Data!C[437],MATCH(RC6,Data!C[436],0))& ""   -   "" &INDEX(Data!C[425],MATCH(RC6,Data!C[436],0)),"""")"
    Range("AP2").Copy Range("AP2:AP" & LastRow)
    '30
        Range("AQ2").Value = "=IFERROR(INDEX(Data!C[442],MATCH(RC6,Data!C[451],0)) & ""   -   "" &INDEX(Data!C[443],MATCH(RC6,Data!C[451],0))& ""   -   "" &INDEX(Data!C[452],MATCH(RC6,Data!C[451],0))& ""   -   "" &INDEX(Data!C[440],MATCH(RC6,Data!C[451],0)),"""")"
    Range("AQ2").Copy Range("AQ2:AQ" & LastRow)
    '31
        Range("AR2").Value = "=IFERROR(INDEX(Data!C[457],MATCH(RC6,Data!C[466],0)) & ""   -   "" &INDEX(Data!C[458],MATCH(RC6,Data!C[466],0))& ""   -   "" &INDEX(Data!C[467],MATCH(RC6,Data!C[466],0))& ""   -   "" &INDEX(Data!C[455],MATCH(RC6,Data!C[466],0)),"""")"
    Range("AR2").Copy Range("AR2:AR" & LastRow)
    '32
        Range("AS2").Value = "=IFERROR(INDEX(Data!C[472],MATCH(RC6,Data!C[481],0)) & ""   -   "" &INDEX(Data!C[473],MATCH(RC6,Data!C[481],0))& ""   -   "" &INDEX(Data!C[482],MATCH(RC6,Data!C[481],0))& ""   -   "" &INDEX(Data!C[470],MATCH(RC6,Data!C[481],0)),"""")"
    Range("AS2").Copy Range("AS2:AS" & LastRow)
    '33
        Range("AT2").Value = "=IFERROR(INDEX(Data!C[487],MATCH(RC6,Data!C[496],0)) & ""   -   "" &INDEX(Data!C[488],MATCH(RC6,Data!C[496],0))& ""   -   "" &INDEX(Data!C[497],MATCH(RC6,Data!C[496],0))& ""   -   "" &INDEX(Data!C[485],MATCH(RC6,Data!C[496],0)),"""")"
    Range("AT2").Copy Range("AT2:AT" & LastRow)
    '34
        Range("AU2").Value = "=IFERROR(INDEX(Data!C[502],MATCH(RC6,Data!C[511],0)) & ""   -   "" &INDEX(Data!C[503],MATCH(RC6,Data!C[511],0))& ""   -   "" &INDEX(Data!C[512],MATCH(RC6,Data!C[511],0))& ""   -   "" &INDEX(Data!C[500],MATCH(RC6,Data!C[511],0)),"""")"
    Range("AU2").Copy Range("AU2:AU" & LastRow)
    '35
        Range("AV2").Value = "=IFERROR(INDEX(Data!C[517],MATCH(RC6,Data!C[526],0)) & ""   -   "" &INDEX(Data!C[518],MATCH(RC6,Data!C[526],0))& ""   -   "" &INDEX(Data!C[527],MATCH(RC6,Data!C[526],0))& ""   -   "" &INDEX(Data!C[515],MATCH(RC6,Data!C[526],0)),"""")"
    Range("AV2").Copy Range("AV2:AV" & LastRow)
    '36
        Range("AW2").Value = "=IFERROR(INDEX(Data!C[532],MATCH(RC6,Data!C[541],0)) & ""   -   "" &INDEX(Data!C[533],MATCH(RC6,Data!C[541],0))& ""   -   "" &INDEX(Data!C[542],MATCH(RC6,Data!C[541],0))& ""   -   "" &INDEX(Data!C[530],MATCH(RC6,Data!C[541],0)),"""")"
    Range("AW2").Copy Range("AW2:AW" & LastRow)
    '37
        Range("AX2").Value = "=IFERROR(INDEX(Data!C[547],MATCH(RC6,Data!C[556],0)) & ""   -   "" &INDEX(Data!C[548],MATCH(RC6,Data!C[556],0))& ""   -   "" &INDEX(Data!C[557],MATCH(RC6,Data!C[556],0))& ""   -   "" &INDEX(Data!C[545],MATCH(RC6,Data!C[556],0)),"""")"
    Range("AX2").Copy Range("AX2:AX" & LastRow)
    '38
        Range("AY2").Value = "=IFERROR(INDEX(Data!C[562],MATCH(RC6,Data!C[571],0)) & ""   -   "" &INDEX(Data!C[563],MATCH(RC6,Data!C[571],0))& ""   -   "" &INDEX(Data!C[572],MATCH(RC6,Data!C[571],0))& ""   -   "" &INDEX(Data!C[560],MATCH(RC6,Data!C[571],0)),"""")"
    Range("AY2").Copy Range("AY2:AY" & LastRow)
    '39
        Range("AZ2").Value = "=IFERROR(INDEX(Data!C[577],MATCH(RC6,Data!C[586],0)) & ""   -   "" &INDEX(Data!C[578],MATCH(RC6,Data!C[586],0))& ""   -   "" &INDEX(Data!C[587],MATCH(RC6,Data!C[586],0))& ""   -   "" &INDEX(Data!C[575],MATCH(RC6,Data!C[586],0)),"""")"
    Range("AZ2").Copy Range("AZ2:AZ" & LastRow)
    '40
        Range("BA2").Value = "=IFERROR(INDEX(Data!C[592],MATCH(RC6,Data!C[601],0)) & ""   -   "" &INDEX(Data!C[593],MATCH(RC6,Data!C[601],0))& ""   -   "" &INDEX(Data!C[602],MATCH(RC6,Data!C[601],0))& ""   -   "" &INDEX(Data!C[590],MATCH(RC6,Data!C[601],0)),"""")"
    Range("BA2").Copy Range("BA2:BA" & LastRow)
    '41
        Range("BB2").Value = "=IFERROR(INDEX(Data!C[607],MATCH(RC6,Data!C[616],0)) & ""   -   "" &INDEX(Data!C[608],MATCH(RC6,Data!C[616],0))& ""   -   "" &INDEX(Data!C[617],MATCH(RC6,Data!C[616],0))& ""   -   "" &INDEX(Data!C[605],MATCH(RC6,Data!C[616],0)),"""")"
    Range("BB2").Copy Range("BB2:BB" & LastRow)
    '42
        Range("BC2").Value = "=IFERROR(INDEX(Data!C[622],MATCH(RC6,Data!C[631],0)) & ""   -   "" &INDEX(Data!C[623],MATCH(RC6,Data!C[631],0))& ""   -   "" &INDEX(Data!C[632],MATCH(RC6,Data!C[631],0))& ""   -   "" &INDEX(Data!C[620],MATCH(RC6,Data!C[631],0)),"""")"
    Range("BC2").Copy Range("BC2:BC" & LastRow)
    '43
        Range("BD2").Value = "=IFERROR(INDEX(Data!C[637],MATCH(RC6,Data!C[646],0)) & ""   -   "" &INDEX(Data!C[638],MATCH(RC6,Data!C[646],0))& ""   -   "" &INDEX(Data!C[647],MATCH(RC6,Data!C[646],0))& ""   -   "" &INDEX(Data!C[635],MATCH(RC6,Data!C[646],0)),"""")"
    Range("BD2").Copy Range("BD2:BD" & LastRow)
    '44
        Range("BE2").Value = "=IFERROR(INDEX(Data!C[652],MATCH(RC6,Data!C[661],0)) & ""   -   "" &INDEX(Data!C[653],MATCH(RC6,Data!C[661],0))& ""   -   "" &INDEX(Data!C[662],MATCH(RC6,Data!C[661],0))& ""   -   "" &INDEX(Data!C[650],MATCH(RC6,Data!C[661],0)),"""")"
    Range("BE2").Copy Range("BE2:BE" & LastRow)
    '45
        Range("BF2").Value = "=IFERROR(INDEX(Data!C[667],MATCH(RC6,Data!C[676],0)) & ""   -   "" &INDEX(Data!C[668],MATCH(RC6,Data!C[676],0))& ""   -   "" &INDEX(Data!C[677],MATCH(RC6,Data!C[676],0))& ""   -   "" &INDEX(Data!C[665],MATCH(RC6,Data!C[676],0)),"""")"
    Range("BF2").Copy Range("BF2:BF" & LastRow)
    '46
        Range("BG2").Value = "=IFERROR(INDEX(Data!C[682],MATCH(RC6,Data!C[691],0)) & ""   -   "" &INDEX(Data!C[683],MATCH(RC6,Data!C[691],0))& ""   -   "" &INDEX(Data!C[692],MATCH(RC6,Data!C[691],0))& ""   -   "" &INDEX(Data!C[680],MATCH(RC6,Data!C[691],0)),"""")"
    Range("BG2").Copy Range("BG2:BG" & LastRow)
    '47
        Range("BH2").Value = "=IFERROR(INDEX(Data!C[697],MATCH(RC6,Data!C[706],0)) & ""   -   "" &INDEX(Data!C[698],MATCH(RC6,Data!C[706],0))& ""   -   "" &INDEX(Data!C[707],MATCH(RC6,Data!C[706],0))& ""   -   "" &INDEX(Data!C[695],MATCH(RC6,Data!C[706],0)),"""")"
    Range("BH2").Copy Range("BH2:BH" & LastRow)
    '48
        Range("BI2").Value = "=IFERROR(INDEX(Data!C[712],MATCH(RC6,Data!C[721],0)) & ""   -   "" &INDEX(Data!C[713],MATCH(RC6,Data!C[721],0))& ""   -   "" &INDEX(Data!C[722],MATCH(RC6,Data!C[721],0))& ""   -   "" &INDEX(Data!C[710],MATCH(RC6,Data!C[721],0)),"""")"
    Range("BI2").Copy Range("BI2:BI" & LastRow)
    '49
        Range("BJ2").Value = "=IFERROR(INDEX(Data!C[727],MATCH(RC6,Data!C[736],0)) & ""   -   "" &INDEX(Data!C[728],MATCH(RC6,Data!C[736],0))& ""   -   "" &INDEX(Data!C[737],MATCH(RC6,Data!C[736],0))& ""   -   "" &INDEX(Data!C[725],MATCH(RC6,Data!C[736],0)),"""")"
    Range("BJ2").Copy Range("BJ2:BJ" & LastRow)
    '50
        Range("BK2").Value = "=IFERROR(INDEX(Data!C[742],MATCH(RC6,Data!C[751],0)) & ""   -   "" &INDEX(Data!C[743],MATCH(RC6,Data!C[751],0))& ""   -   "" &INDEX(Data!C[752],MATCH(RC6,Data!C[751],0))& ""   -   "" &INDEX(Data!C[740],MATCH(RC6,Data!C[751],0)),"""")"
    Range("BK2").Copy Range("BK2:BK" & LastRow)
    
FormatSheets


    
    ActiveSheet.Calculate


End Sub
 

Excel Facts

Excel Can Read to You
Customize Quick Access Toolbar. From All Commands, add Speak Cells or Speak Cells on Enter to QAT. Select cells. Press Speak Cells.
Sort by date Sort by votes
try:

Code: 
Sub SetFormulas()Sheets("OpenOrder Data").Activate
GetOpenSummaryReport

Application.ScreenUpdating = False
Application.Calculation = xlCalculationManual


        Dim LastRow As Long
        
    LastRow = Range("F" & Rows.Count).End(xlUp).row
    Range("L2:BA" & LastRow).ClearContents
    Range("A2:BA" & LastRow).Select
    ClearBordersOpenOrder
    
        'Shipping Info
    Range("L2").Value = "=IFERROR(LOOKUP(2,1/(RC[2]:RC[41]<>""""),RC[2]:RC[41]),"""")"
    Range("L2").Copy Range("L2:L" & LastRow)


    '1
        Range("N2").Value =  "=IFERROR(INDEX(Data!C[-9],MATCH(RC6,Data!C,0)) & ""   -   ""  &INDEX(Data!C[-8],MATCH(RC6,Data!C,0))& ""   -   ""  &INDEX(Data!C[1],MATCH(RC6,Data!C,0))& ""   -   ""  &INDEX(Data!C[-11],MATCH(RC6,Data!C,0)),"""")"
    Range("N2").Copy Range("N2:N" & LastRow)
    
    '2
        Range("O2").Value =  "=IFERROR(INDEX(Data!C[6],MATCH(RC6,Data!C[15],0)) & ""   -   ""  &INDEX(Data!C[7],MATCH(RC6,Data!C[15],0))& ""   -   ""  &INDEX(Data!R[-1]C[16],MATCH(RC6,Data!C[15],0))& ""   -   ""  &INDEX(Data!C[4],MATCH(RC6,Data!C[15],0)),"""")"
    Range("O2").Copy Range("O2:O" & LastRow)
    '3
        Range("P2").Value =  "=IFERROR(INDEX(Data!C[21],MATCH(RC6,Data!C[30],0)) & ""   -   ""  &INDEX(Data!C[22],MATCH(RC6,Data!C[30],0))& ""   -   ""  &INDEX(Data!C[31],MATCH(RC6,Data!C[30],0))& ""   -   ""  &INDEX(Data!C[19],MATCH(RC6,Data!C[30],0)),"""")"
    Range("P2").Copy Range("P2:P" & LastRow)
    '4
        Range("Q2").Value =  "=IFERROR(INDEX(Data!C[36],MATCH(RC6,Data!C[45],0)) & ""   -   ""  &INDEX(Data!C[37],MATCH(RC6,Data!C[45],0))& ""   -   ""  &INDEX(Data!C[46],MATCH(RC6,Data!C[45],0))& ""   -   ""  &INDEX(Data!C[34],MATCH(RC6,Data!C[45],0)),"""")"
    Range("Q2").Copy Range("Q2:Q" & LastRow)
    '5
        Range("R2").Value =  "=IFERROR(INDEX(Data!C[51],MATCH(RC6,Data!C[60],0)) & ""   -   ""  &INDEX(Data!C[52],MATCH(RC6,Data!C[60],0))& ""   -   ""  &INDEX(Data!C[61],MATCH(RC6,Data!C[60],0))& ""   -   ""  &INDEX(Data!C[49],MATCH(RC6,Data!C[60],0)),"""")"
    Range("R2").Copy Range("R2:R" & LastRow)
    '6
        Range("S2").Value =  "=IFERROR(INDEX(Data!C[66],MATCH(RC6,Data!C[75],0)) & ""   -   ""  &INDEX(Data!C[67],MATCH(RC6,Data!C[75],0))& ""   -   ""  &INDEX(Data!C[76],MATCH(RC6,Data!C[75],0))& ""   -   ""  &INDEX(Data!C[64],MATCH(RC6,Data!C[75],0)),"""")"
    Range("S2").Copy Range("S2:S" & LastRow)
    '7
        Range("T2").Value =  "=IFERROR(INDEX(Data!C[81],MATCH(RC6,Data!C[90],0)) & ""   -   ""  &INDEX(Data!C[82],MATCH(RC6,Data!C[90],0))& ""   -   ""  &INDEX(Data!C[91],MATCH(RC6,Data!C[90],0))& ""   -   ""  &INDEX(Data!C[79],MATCH(RC6,Data!C[90],0)),"""")"
    Range("T2").Copy Range("T2:T" & LastRow)
    '8
        Range("U2").Value =  "=IFERROR(INDEX(Data!C[96],MATCH(RC6,Data!C[105],0)) & ""   -   ""  &INDEX(Data!C[97],MATCH(RC6,Data!C[105],0))& ""   -   ""  &INDEX(Data!C[106],MATCH(RC6,Data!C[105],0))& ""   -   ""  &INDEX(Data!C[94],MATCH(RC6,Data!C[105],0)),"""")"
    Range("U2").Copy Range("U2:U" & LastRow)
    '9
        Range("V2").Value =  "=IFERROR(INDEX(Data!C[111],MATCH(RC6,Data!C[120],0)) & ""   -   ""  &INDEX(Data!C[112],MATCH(RC6,Data!C[120],0))& ""   -   ""  &INDEX(Data!C[121],MATCH(RC6,Data!C[120],0))& ""   -   ""  &INDEX(Data!C[109],MATCH(RC6,Data!C[120],0)),"""")"
    Range("V2").Copy Range("V2:V" & LastRow)
    '10
        Range("W2").Value =  "=IFERROR(INDEX(Data!C[126],MATCH(RC6,Data!C[135],0)) & ""   -   ""  &INDEX(Data!C[127],MATCH(RC6,Data!C[135],0))& ""   -   ""  &INDEX(Data!C[136],MATCH(RC6,Data!C[135],0))& ""   -   ""  &INDEX(Data!C[124],MATCH(RC6,Data!C[135],0)),"""")"
    Range("W2").Copy Range("W2:W" & LastRow)
    '11
        Range("X2").Value =  "=IFERROR(INDEX(Data!C[141],MATCH(RC6,Data!C[150],0)) & ""   -   ""  &INDEX(Data!C[142],MATCH(RC6,Data!C[150],0))& ""   -   ""  &INDEX(Data!C[151],MATCH(RC6,Data!C[150],0))& ""   -   ""  &INDEX(Data!C[139],MATCH(RC6,Data!C[150],0)),"""")"
    Range("X2").Copy Range("X2:X" & LastRow)
    '12
        Range("Y2").Value =  "=IFERROR(INDEX(Data!C[156],MATCH(RC6,Data!C[165],0)) & ""   -   ""  &INDEX(Data!C[157],MATCH(RC6,Data!C[165],0))& ""   -   ""  &INDEX(Data!C[166],MATCH(RC6,Data!C[165],0))& ""   -   ""  &INDEX(Data!C[154],MATCH(RC6,Data!C[165],0)),"""")"
    Range("Y2").Copy Range("Y2:Y" & LastRow)
    '13
        Range("Z2").Value =  "=IFERROR(INDEX(Data!C[171],MATCH(RC6,Data!C[180],0)) & ""   -   ""  &INDEX(Data!C[172],MATCH(RC6,Data!C[180],0))& ""   -   ""  &INDEX(Data!C[181],MATCH(RC6,Data!C[180],0))& ""   -   ""  &INDEX(Data!C[169],MATCH(RC6,Data!C[180],0)),"""")"
    Range("Z2").Copy Range("Z2:Z" & LastRow)
    '14
        Range("AA2").Value =  "=IFERROR(INDEX(Data!C[186],MATCH(RC6,Data!C[195],0)) & ""   -   ""  &INDEX(Data!C[187],MATCH(RC6,Data!C[195],0))& ""   -   ""  &INDEX(Data!C[196],MATCH(RC6,Data!C[195],0))& ""   -   ""  &INDEX(Data!C[184],MATCH(RC6,Data!C[195],0)),"""")"
    Range("AA2").Copy Range("AA2:AA" & LastRow)
    '15
        Range("AB2").Value =  "=IFERROR(INDEX(Data!C[201],MATCH(RC6,Data!C[210],0)) & ""   -   ""  &INDEX(Data!C[202],MATCH(RC6,Data!C[210],0))& ""   -   ""  &INDEX(Data!C[211],MATCH(RC6,Data!C[210],0))& ""   -   ""  &INDEX(Data!C[199],MATCH(RC6,Data!C[210],0)),"""")"
    Range("AB2").Copy Range("AB2:AB" & LastRow)
    '16
        Range("AC2").Value =  "=IFERROR(INDEX(Data!C[216],MATCH(RC6,Data!C[227],0)) & ""   -   ""  &INDEX(Data!C[217],MATCH(RC6,Data!C[227],0))& ""   -   ""  &INDEX(Data!C[228],MATCH(RC6,Data!C[227],0))& ""   -   ""  &INDEX(Data!C[214],MATCH(RC6,Data!C[227],0)),"""")"
    Range("AC2").Copy Range("AC2:AC" & LastRow)
    '17
        Range("AD2").Value =  "=IFERROR(INDEX(Data!C[216],MATCH(RC6,Data!C[225],0)) & ""   -   ""  &INDEX(Data!C[217],MATCH(RC6,Data!C[225],0))& ""   -   ""  &INDEX(Data!C[226],MATCH(RC6,Data!C[225],0))& ""   -   ""  &INDEX(Data!C[214],MATCH(RC6,Data!C[225],0)),"""")"
    Range("AD2").Copy Range("AD2:AD" & LastRow)
    '18
        Range("AE2").Value =  "=IFERROR(INDEX(Data!C[231],MATCH(RC6,Data!C[240],0)) & ""   -   ""  &INDEX(Data!C[232],MATCH(RC6,Data!C[240],0))& ""   -   ""  &INDEX(Data!C[241],MATCH(RC6,Data!C[240],0))& ""   -   ""  &INDEX(Data!C[229],MATCH(RC6,Data!C[240],0)),"""")"
    Range("AE2").Copy Range("AE2:AE" & LastRow)
    '19
        Range("AF2").Value =  "=IFERROR(INDEX(Data!C[246],MATCH(RC6,Data!C[255],0)) & ""   -   ""  &INDEX(Data!C[247],MATCH(RC6,Data!C[255],0))& ""   -   ""  &INDEX(Data!C[256],MATCH(RC6,Data!C[255],0))& ""   -   ""  &INDEX(Data!C[244],MATCH(RC6,Data!C[255],0)),"""")"
    Range("AF2").Copy Range("AF2:AD" & LastRow)
    '20
        Range("AG2").Value =  "=IFERROR(INDEX(Data!C[261],MATCH(RC6,Data!C[270],0)) & ""   -   ""  &INDEX(Data!C[262],MATCH(RC6,Data!C[270],0))& ""   -   ""  &INDEX(Data!C[271],MATCH(RC6,Data!C[270],0))& ""   -   ""  &INDEX(Data!C[259],MATCH(RC6,Data!C[270],0)),"""")"
    Range("AG2").Copy Range("AG2:AG" & LastRow)
    '21
        Range("AH2").Value =  "=IFERROR(INDEX(Data!C[276],MATCH(RC6,Data!C[285],0)) & ""   -   ""  &INDEX(Data!C[277],MATCH(RC6,Data!C[285],0))& ""   -   ""  &INDEX(Data!C[286],MATCH(RC6,Data!C[285],0))& ""   -   ""  &INDEX(Data!C[274],MATCH(RC6,Data!C[285],0)),"""")"
    Range("AH2").Copy Range("AH2:AH" & LastRow)
    '22
        Range("AI2").Value =  "=IFERROR(INDEX(Data!C[306],MATCH(RC6,Data!C[315],0)) & ""   -   ""  &INDEX(Data!C[307],MATCH(RC6,Data!C[315],0))& ""   -   ""  &INDEX(Data!C[316],MATCH(RC6,Data!C[315],0))& ""   -   ""  &INDEX(Data!C[304],MATCH(RC6,Data!C[315],0)),"""")"
    Range("AI2").Copy Range("AI2:AI" & LastRow)
    '23
        Range("AJ2").Value =  "=IFERROR(INDEX(Data!C[321],MATCH(RC6,Data!C[330],0)) & ""   -   ""  &INDEX(Data!C[322],MATCH(RC6,Data!C[330],0))& ""   -   ""  &INDEX(Data!C[331],MATCH(RC6,Data!C[330],0))& ""   -   ""  &INDEX(Data!C[319],MATCH(RC6,Data!C[330],0)),"""")"
    Range("AJ2").Copy Range("AJ2:AJ" & LastRow)
    '24
        Range("AK2").Value =  "=IFERROR(INDEX(Data!C[336],MATCH(RC6,Data!C[345],0)) & ""   -   ""  &INDEX(Data!C[337],MATCH(RC6,Data!C[345],0))& ""   -   ""  &INDEX(Data!C[346],MATCH(RC6,Data!C[345],0))& ""   -   ""  &INDEX(Data!C[334],MATCH(RC6,Data!C[345],0)),"""")"
    Range("AK2").Copy Range("AK2:AK" & LastRow)
    '25
        Range("AL2").Value =  "=IFERROR(INDEX(Data!C[351],MATCH(RC6,Data!C[360],0)) & ""   -   ""  &INDEX(Data!C[352],MATCH(RC6,Data!C[360],0))& ""   -   ""  &INDEX(Data!C[361],MATCH(RC6,Data!C[360],0))& ""   -   ""  &INDEX(Data!C[349],MATCH(RC6,Data!C[360],0)),"""")"
    Range("AL2").Copy Range("AL2:AL" & LastRow)
    '26
        Range("AM2").Value =  "=IFERROR(INDEX(Data!C[366],MATCH(RC6,Data!C[375],0)) & ""   -   ""  &INDEX(Data!C[367],MATCH(RC6,Data!C[375],0))& ""   -   ""  &INDEX(Data!C[376],MATCH(RC6,Data!C[375],0))& ""   -   ""  &INDEX(Data!C[364],MATCH(RC6,Data!C[375],0)),"""")"
    Range("AM2").Copy Range("AM2:AM" & LastRow)
    '27
        Range("AN2").Value =  "=IFERROR(INDEX(Data!C[381],MATCH(RC6,Data!C[390],0)) & ""   -   ""  &INDEX(Data!C[382],MATCH(RC6,Data!C[390],0))& ""   -   ""  &INDEX(Data!C[391],MATCH(RC6,Data!C[390],0))& ""   -   ""  &INDEX(Data!C[379],MATCH(RC6,Data!C[390],0)),"""")"
    Range("AN2").Copy Range("AN2:AN" & LastRow)
    '28
        Range("AO2").Value =  "=IFERROR(INDEX(Data!C[412],MATCH(RC6,Data!C[421],0)) & ""   -   ""  &INDEX(Data!C[413],MATCH(RC6,Data!C[421],0))& ""   -   ""  &INDEX(Data!C[422],MATCH(RC6,Data!C[421],0))& ""   -   ""  &INDEX(Data!C[410],MATCH(RC6,Data!C[421],0)),"""")"
    Range("AO2").Copy Range("AO2:AO" & LastRow)
    '29
        Range("AP2").Value =  "=IFERROR(INDEX(Data!C[427],MATCH(RC6,Data!C[436],0)) & ""   -   ""  &INDEX(Data!C[428],MATCH(RC6,Data!C[436],0))& ""   -   ""  &INDEX(Data!C[437],MATCH(RC6,Data!C[436],0))& ""   -   ""  &INDEX(Data!C[425],MATCH(RC6,Data!C[436],0)),"""")"
    Range("AP2").Copy Range("AP2:AP" & LastRow)
    '30
        Range("AQ2").Value =  "=IFERROR(INDEX(Data!C[442],MATCH(RC6,Data!C[451],0)) & ""   -   ""  &INDEX(Data!C[443],MATCH(RC6,Data!C[451],0))& ""   -   ""  &INDEX(Data!C[452],MATCH(RC6,Data!C[451],0))& ""   -   ""  &INDEX(Data!C[440],MATCH(RC6,Data!C[451],0)),"""")"
    Range("AQ2").Copy Range("AQ2:AQ" & LastRow)
    '31
        Range("AR2").Value =  "=IFERROR(INDEX(Data!C[457],MATCH(RC6,Data!C[466],0)) & ""   -   ""  &INDEX(Data!C[458],MATCH(RC6,Data!C[466],0))& ""   -   ""  &INDEX(Data!C[467],MATCH(RC6,Data!C[466],0))& ""   -   ""  &INDEX(Data!C[455],MATCH(RC6,Data!C[466],0)),"""")"
    Range("AR2").Copy Range("AR2:AR" & LastRow)
    '32
        Range("AS2").Value =  "=IFERROR(INDEX(Data!C[472],MATCH(RC6,Data!C[481],0)) & ""   -   ""  &INDEX(Data!C[473],MATCH(RC6,Data!C[481],0))& ""   -   ""  &INDEX(Data!C[482],MATCH(RC6,Data!C[481],0))& ""   -   ""  &INDEX(Data!C[470],MATCH(RC6,Data!C[481],0)),"""")"
    Range("AS2").Copy Range("AS2:AS" & LastRow)
    '33
        Range("AT2").Value =  "=IFERROR(INDEX(Data!C[487],MATCH(RC6,Data!C[496],0)) & ""   -   ""  &INDEX(Data!C[488],MATCH(RC6,Data!C[496],0))& ""   -   ""  &INDEX(Data!C[497],MATCH(RC6,Data!C[496],0))& ""   -   ""  &INDEX(Data!C[485],MATCH(RC6,Data!C[496],0)),"""")"
    Range("AT2").Copy Range("AT2:AT" & LastRow)
    '34
        Range("AU2").Value =  "=IFERROR(INDEX(Data!C[502],MATCH(RC6,Data!C[511],0)) & ""   -   ""  &INDEX(Data!C[503],MATCH(RC6,Data!C[511],0))& ""   -   ""  &INDEX(Data!C[512],MATCH(RC6,Data!C[511],0))& ""   -   ""  &INDEX(Data!C[500],MATCH(RC6,Data!C[511],0)),"""")"
    Range("AU2").Copy Range("AU2:AU" & LastRow)
    '35
        Range("AV2").Value =  "=IFERROR(INDEX(Data!C[517],MATCH(RC6,Data!C[526],0)) & ""   -   ""  &INDEX(Data!C[518],MATCH(RC6,Data!C[526],0))& ""   -   ""  &INDEX(Data!C[527],MATCH(RC6,Data!C[526],0))& ""   -   ""  &INDEX(Data!C[515],MATCH(RC6,Data!C[526],0)),"""")"
    Range("AV2").Copy Range("AV2:AV" & LastRow)
    '36
        Range("AW2").Value =  "=IFERROR(INDEX(Data!C[532],MATCH(RC6,Data!C[541],0)) & ""   -   ""  &INDEX(Data!C[533],MATCH(RC6,Data!C[541],0))& ""   -   ""  &INDEX(Data!C[542],MATCH(RC6,Data!C[541],0))& ""   -   ""  &INDEX(Data!C[530],MATCH(RC6,Data!C[541],0)),"""")"
    Range("AW2").Copy Range("AW2:AW" & LastRow)
    '37
        Range("AX2").Value =  "=IFERROR(INDEX(Data!C[547],MATCH(RC6,Data!C[556],0)) & ""   -   ""  &INDEX(Data!C[548],MATCH(RC6,Data!C[556],0))& ""   -   ""  &INDEX(Data!C[557],MATCH(RC6,Data!C[556],0))& ""   -   ""  &INDEX(Data!C[545],MATCH(RC6,Data!C[556],0)),"""")"
    Range("AX2").Copy Range("AX2:AX" & LastRow)
    '38
        Range("AY2").Value =  "=IFERROR(INDEX(Data!C[562],MATCH(RC6,Data!C[571],0)) & ""   -   ""  &INDEX(Data!C[563],MATCH(RC6,Data!C[571],0))& ""   -   ""  &INDEX(Data!C[572],MATCH(RC6,Data!C[571],0))& ""   -   ""  &INDEX(Data!C[560],MATCH(RC6,Data!C[571],0)),"""")"
    Range("AY2").Copy Range("AY2:AY" & LastRow)
    '39
        Range("AZ2").Value =  "=IFERROR(INDEX(Data!C[577],MATCH(RC6,Data!C[586],0)) & ""   -   ""  &INDEX(Data!C[578],MATCH(RC6,Data!C[586],0))& ""   -   ""  &INDEX(Data!C[587],MATCH(RC6,Data!C[586],0))& ""   -   ""  &INDEX(Data!C[575],MATCH(RC6,Data!C[586],0)),"""")"
    Range("AZ2").Copy Range("AZ2:AZ" & LastRow)
    '40
        Range("BA2").Value =  "=IFERROR(INDEX(Data!C[592],MATCH(RC6,Data!C[601],0)) & ""   -   ""  &INDEX(Data!C[593],MATCH(RC6,Data!C[601],0))& ""   -   ""  &INDEX(Data!C[602],MATCH(RC6,Data!C[601],0))& ""   -   ""  &INDEX(Data!C[590],MATCH(RC6,Data!C[601],0)),"""")"
    Range("BA2").Copy Range("BA2:BA" & LastRow)
    '41
        Range("BB2").Value =  "=IFERROR(INDEX(Data!C[607],MATCH(RC6,Data!C[616],0)) & ""   -   ""  &INDEX(Data!C[608],MATCH(RC6,Data!C[616],0))& ""   -   ""  &INDEX(Data!C[617],MATCH(RC6,Data!C[616],0))& ""   -   ""  &INDEX(Data!C[605],MATCH(RC6,Data!C[616],0)),"""")"
    Range("BB2").Copy Range("BB2:BB" & LastRow)
    '42
        Range("BC2").Value =  "=IFERROR(INDEX(Data!C[622],MATCH(RC6,Data!C[631],0)) & ""   -   ""  &INDEX(Data!C[623],MATCH(RC6,Data!C[631],0))& ""   -   ""  &INDEX(Data!C[632],MATCH(RC6,Data!C[631],0))& ""   -   ""  &INDEX(Data!C[620],MATCH(RC6,Data!C[631],0)),"""")"
    Range("BC2").Copy Range("BC2:BC" & LastRow)
    '43
        Range("BD2").Value =  "=IFERROR(INDEX(Data!C[637],MATCH(RC6,Data!C[646],0)) & ""   -   ""  &INDEX(Data!C[638],MATCH(RC6,Data!C[646],0))& ""   -   ""  &INDEX(Data!C[647],MATCH(RC6,Data!C[646],0))& ""   -   ""  &INDEX(Data!C[635],MATCH(RC6,Data!C[646],0)),"""")"
    Range("BD2").Copy Range("BD2:BD" & LastRow)
    '44
        Range("BE2").Value =  "=IFERROR(INDEX(Data!C[652],MATCH(RC6,Data!C[661],0)) & ""   -   ""  &INDEX(Data!C[653],MATCH(RC6,Data!C[661],0))& ""   -   ""  &INDEX(Data!C[662],MATCH(RC6,Data!C[661],0))& ""   -   ""  &INDEX(Data!C[650],MATCH(RC6,Data!C[661],0)),"""")"
    Range("BE2").Copy Range("BE2:BE" & LastRow)
    '45
        Range("BF2").Value =  "=IFERROR(INDEX(Data!C[667],MATCH(RC6,Data!C[676],0)) & ""   -   ""  &INDEX(Data!C[668],MATCH(RC6,Data!C[676],0))& ""   -   ""  &INDEX(Data!C[677],MATCH(RC6,Data!C[676],0))& ""   -   ""  &INDEX(Data!C[665],MATCH(RC6,Data!C[676],0)),"""")"
    Range("BF2").Copy Range("BF2:BF" & LastRow)
    '46
        Range("BG2").Value =  "=IFERROR(INDEX(Data!C[682],MATCH(RC6,Data!C[691],0)) & ""   -   ""  &INDEX(Data!C[683],MATCH(RC6,Data!C[691],0))& ""   -   ""  &INDEX(Data!C[692],MATCH(RC6,Data!C[691],0))& ""   -   ""  &INDEX(Data!C[680],MATCH(RC6,Data!C[691],0)),"""")"
    Range("BG2").Copy Range("BG2:BG" & LastRow)
    '47
        Range("BH2").Value =  "=IFERROR(INDEX(Data!C[697],MATCH(RC6,Data!C[706],0)) & ""   -   ""  &INDEX(Data!C[698],MATCH(RC6,Data!C[706],0))& ""   -   ""  &INDEX(Data!C[707],MATCH(RC6,Data!C[706],0))& ""   -   ""  &INDEX(Data!C[695],MATCH(RC6,Data!C[706],0)),"""")"
    Range("BH2").Copy Range("BH2:BH" & LastRow)
    '48
        Range("BI2").Value =  "=IFERROR(INDEX(Data!C[712],MATCH(RC6,Data!C[721],0)) & ""   -   ""  &INDEX(Data!C[713],MATCH(RC6,Data!C[721],0))& ""   -   ""  &INDEX(Data!C[722],MATCH(RC6,Data!C[721],0))& ""   -   ""  &INDEX(Data!C[710],MATCH(RC6,Data!C[721],0)),"""")"
    Range("BI2").Copy Range("BI2:BI" & LastRow)
    '49
        Range("BJ2").Value =  "=IFERROR(INDEX(Data!C[727],MATCH(RC6,Data!C[736],0)) & ""   -   ""  &INDEX(Data!C[728],MATCH(RC6,Data!C[736],0))& ""   -   ""  &INDEX(Data!C[737],MATCH(RC6,Data!C[736],0))& ""   -   ""  &INDEX(Data!C[725],MATCH(RC6,Data!C[736],0)),"""")"
    Range("BJ2").Copy Range("BJ2:BJ" & LastRow)
    '50
        Range("BK2").Value =  "=IFERROR(INDEX(Data!C[742],MATCH(RC6,Data!C[751],0)) & ""   -   ""  &INDEX(Data!C[743],MATCH(RC6,Data!C[751],0))& ""   -   ""  &INDEX(Data!C[752],MATCH(RC6,Data!C[751],0))& ""   -   ""  &INDEX(Data!C[740],MATCH(RC6,Data!C[751],0)),"""")"
    Range("BK2").Copy Range("BK2:BK" & LastRow)
    
FormatSheets


Application.Calculation = xlCalculationAutomatic
Application.ScreenUpdating = True
    
    ActiveSheet.Calculate


End Sub
 
Last edited:
Upvote 0
You must log in or register to reply here.

Similar threads

S
  • Question
Error message when executing macro
Replies
3
Views
176
rlv01
R
J
  • Solved
trending value projections without counting sundays
Replies
2
Views
138
KRice
K
H
  • Solved
Macro to display message end of Code where Col D contains blanks
Replies
7
Views
348
howard
H
G
  • Question
VBA - add formula to cell when created
Replies
2
Views
310
Golaidron
G
A
  • Question
index match drag the formula again
Replies
2
Views
192
AYSHANA
A

Forum statistics

Threads
1,215,480
Messages
6,125,047
Members
449,206
Latest member
Healthydogs

Share this page

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