Excel Macro Procedure Too Large Error - Help

I am getting Procedure too Large Error when i am trying to use this macro. Kindly give a solution or smaller version.



Static old_value9 As Variant: Static old_value10 As Variant: Static old_value11 As Variant: Static old_value12 As Variant: Static old_value13 As Variant: Static old_value14 As Variant
Static old_value15 As Variant
Static old_value16 As Variant
Static old_value17 As Variant
Static old_value18 As Variant
Static old_value19 As Variant
Static old_value20 As Variant
Static old_value21 As Variant
Static old_value22 As Variant
Static old_value23 As Variant
Static old_value24 As Variant
Static old_value25 As Variant
Static old_value26 As Variant
Static old_value27 As Variant
Static old_value28 As Variant
Static old_value29 As Variant
Static old_value30 As Variant
Static old_value31 As Variant
Static old_value32 As Variant
Static old_value33 As Variant
Static old_value34 As Variant
Static old_value35 As Variant
Static old_value36 As Variant
Static old_value37 As Variant
Static old_value38 As Variant
Static old_value39 As Variant
Static old_value40 As Variant
Static old_value41 As Variant
Static old_value42 As Variant
Static old_value43 As Variant
Static old_value44 As Variant
Static old_value45 As Variant
Static old_value46 As Variant
Static old_value47 As Variant
Static old_value48 As Variant
Static old_value49 As Variant
Static old_value50 As Variant
Static old_value51 As Variant
Static old_value52 As Variant
Static old_value53 As Variant
Static old_value54 As Variant
Static old_value55 As Variant
Static old_value56 As Variant
Static old_value57 As Variant
Static old_value58 As Variant
Static old_value59 As Variant
Static old_value60 As Variant
Static old_value61 As Variant
Static old_value62 As Variant
Static old_value63 As Variant
Static old_value64 As Variant
Static old_value65 As Variant
Static old_value66 As Variant
Static old_value67 As Variant
Static old_value68 As Variant
Static old_value69 As Variant
Static old_value70 As Variant
Static old_value71 As Variant
Static old_value72 As Variant
Static old_value73 As Variant
Static old_value74 As Variant
Static old_value75 As Variant
Static old_value76 As Variant
Static old_value77 As Variant
Static old_value78 As Variant
Static old_value79 As Variant
Static old_value80 As Variant
Static old_value81 As Variant
Static old_value82 As Variant
Static old_value83 As Variant
Static old_value84 As Variant
Static old_value85 As Variant
Static old_value86 As Variant
Static old_value87 As Variant
Static old_value88 As Variant
Static old_value89 As Variant
Static old_value90 As Variant
Static old_value91 As Variant
Static old_value92 As Variant
Static old_value93 As Variant
Static old_value94 As Variant
Static old_value95 As Variant
Static old_value96 As Variant
Static old_value97 As Variant
Static old_value98 As Variant
Static old_value99 As Variant
Static old_value100 As Variant
Static old_value101 As Variant
Static old_value102 As Variant
Static old_value103 As Variant
Static old_value104 As Variant
Static old_value105 As Variant
Static old_value106 As Variant
Static old_value107 As Variant
Static old_value108 As Variant
Static old_value109 As Variant
Static old_value110 As Variant
Static old_value111 As Variant
Static old_value112 As Variant
Static old_value113 As Variant
Static old_value114 As Variant
Static old_value115 As Variant
Static old_value116 As Variant
Static old_value117 As Variant
Static old_value118 As Variant
Static old_value119 As Variant
Static old_value120 As Variant
Static old_value121 As Variant
Static old_value122 As Variant
Static old_value123 As Variant
Static old_value124 As Variant
Static old_value125 As Variant
Static old_value126 As Variant
Static old_value127 As Variant
Static old_value128 As Variant
Static old_value129 As Variant
Static old_value130 As Variant
Static old_value131 As Variant
Static old_value132 As Variant



Static old_LTP9 As Variant
Static old_LTP10 As Variant
Static old_LTP11 As Variant
Static old_LTP12 As Variant
Static old_LTP13 As Variant
Static old_LTP14 As Variant
Static old_LTP15 As Variant
Static old_LTP16 As Variant
Static old_LTP17 As Variant
Static old_LTP18 As Variant
Static old_LTP19 As Variant
Static old_LTP20 As Variant
Static old_LTP21 As Variant
Static old_LTP22 As Variant
Static old_LTP23 As Variant
Static old_LTP24 As Variant
Static old_LTP25 As Variant
Static old_LTP26 As Variant
Static old_LTP27 As Variant
Static old_LTP28 As Variant
Static old_LTP29 As Variant
Static old_LTP30 As Variant
Static old_LTP31 As Variant
Static old_LTP32 As Variant
Static old_LTP33 As Variant
Static old_LTP34 As Variant
Static old_LTP35 As Variant
Static old_LTP36 As Variant
Static old_LTP37 As Variant
Static old_LTP38 As Variant
Static old_LTP39 As Variant
Static old_LTP40 As Variant
Static old_LTP41 As Variant
Static old_LTP42 As Variant
Static old_LTP43 As Variant
Static old_LTP44 As Variant
Static old_LTP45 As Variant
Static old_LTP46 As Variant
Static old_LTP47 As Variant
Static old_LTP48 As Variant
Static old_LTP49 As Variant
Static old_LTP50 As Variant
Static old_LTP51 As Variant
Static old_LTP52 As Variant
Static old_LTP53 As Variant
Static old_LTP54 As Variant
Static old_LTP55 As Variant
Static old_LTP56 As Variant
Static old_LTP57 As Variant
Static old_LTP58 As Variant
Static old_LTP59 As Variant
Static old_LTP60 As Variant
Static old_LTP61 As Variant
Static old_LTP62 As Variant
Static old_LTP63 As Variant
Static old_LTP64 As Variant
Static old_LTP65 As Variant
Static old_LTP66 As Variant
Static old_LTP67 As Variant
Static old_LTP68 As Variant
Static old_LTP69 As Variant
Static old_LTP70 As Variant
Static old_LTP71 As Variant
Static old_LTP72 As Variant
Static old_LTP73 As Variant
Static old_LTP74 As Variant
Static old_LTP75 As Variant
Static old_LTP76 As Variant
Static old_LTP77 As Variant
Static old_LTP78 As Variant
Static old_LTP79 As Variant
Static old_LTP80 As Variant
Static old_LTP81 As Variant
Static old_LTP82 As Variant
Static old_LTP83 As Variant
Static old_LTP84 As Variant
Static old_LTP85 As Variant
Static old_LTP86 As Variant
Static old_LTP87 As Variant
Static old_LTP88 As Variant
Static old_LTP89 As Variant
Static old_LTP90 As Variant
Static old_LTP91 As Variant
Static old_LTP92 As Variant
Static old_LTP93 As Variant
Static old_LTP94 As Variant
Static old_LTP95 As Variant
Static old_LTP96 As Variant
Static old_LTP97 As Variant
Static old_LTP98 As Variant
Static old_LTP99 As Variant
Static old_LTP100 As Variant
Static old_LTP101 As Variant
Static old_LTP102 As Variant
Static old_LTP103 As Variant
Static old_LTP104 As Variant
Static old_LTP105 As Variant
Static old_LTP106 As Variant
Static old_LTP107 As Variant
Static old_LTP108 As Variant
Static old_LTP109 As Variant
Static old_LTP110 As Variant
Static old_LTP111 As Variant
Static old_LTP112 As Variant
Static old_LTP113 As Variant
Static old_LTP114 As Variant
Static old_LTP115 As Variant
Static old_LTP116 As Variant
Static old_LTP117 As Variant
Static old_LTP118 As Variant
Static old_LTP119 As Variant
Static old_LTP120 As Variant
Static old_LTP121 As Variant
Static old_LTP122 As Variant
Static old_LTP123 As Variant
Static old_LTP124 As Variant
Static old_LTP125 As Variant
Static old_LTP126 As Variant
Static old_LTP127 As Variant
Static old_LTP128 As Variant
Static old_LTP129 As Variant
Static old_LTP130 As Variant
Static old_LTP131 As Variant
Static old_LTP132 As Variant

Static old_Vol9 As Variant
Static old_Vol10 As Variant
Static old_Vol11 As Variant
Static old_Vol12 As Variant
Static old_Vol13 As Variant
Static old_Vol14 As Variant
Static old_Vol15 As Variant
Static old_Vol16 As Variant
Static old_Vol17 As Variant
Static old_Vol18 As Variant
Static old_Vol19 As Variant
Static old_Vol20 As Variant
Static old_Vol21 As Variant
Static old_Vol22 As Variant
Static old_Vol23 As Variant
Static old_Vol24 As Variant
Static old_Vol25 As Variant
Static old_Vol26 As Variant
Static old_Vol27 As Variant
Static old_Vol28 As Variant
Static old_Vol29 As Variant
Static old_Vol30 As Variant
Static old_Vol31 As Variant
Static old_Vol32 As Variant
Static old_Vol33 As Variant
Static old_Vol34 As Variant
Static old_Vol35 As Variant
Static old_Vol36 As Variant
Static old_Vol37 As Variant
Static old_Vol38 As Variant
Static old_Vol39 As Variant
Static old_Vol40 As Variant
Static old_Vol41 As Variant
Static old_Vol42 As Variant
Static old_Vol43 As Variant
Static old_Vol44 As Variant
Static old_Vol45 As Variant
Static old_Vol46 As Variant
Static old_Vol47 As Variant
Static old_Vol48 As Variant
Static old_Vol49 As Variant
Static old_Vol50 As Variant
Static old_Vol51 As Variant
Static old_Vol52 As Variant
Static old_Vol53 As Variant
Static old_Vol54 As Variant
Static old_Vol55 As Variant
Static old_Vol56 As Variant
Static old_Vol57 As Variant
Static old_Vol58 As Variant
Static old_Vol59 As Variant
Static old_Vol60 As Variant
Static old_Vol61 As Variant
Static old_Vol62 As Variant
Static old_Vol63 As Variant
Static old_Vol64 As Variant
Static old_Vol65 As Variant
Static old_Vol66 As Variant
Static old_Vol67 As Variant
Static old_Vol68 As Variant
Static old_Vol69 As Variant
Static old_Vol70 As Variant
Static old_Vol71 As Variant
Static old_Vol72 As Variant
Static old_Vol73 As Variant
Static old_Vol74 As Variant
Static old_Vol75 As Variant
Static old_Vol76 As Variant
Static old_Vol77 As Variant
Static old_Vol78 As Variant
Static old_Vol79 As Variant
Static old_Vol80 As Variant
Static old_Vol81 As Variant
Static old_Vol82 As Variant
Static old_Vol83 As Variant
Static old_Vol84 As Variant
Static old_Vol85 As Variant
Static old_Vol86 As Variant
Static old_Vol87 As Variant
Static old_Vol88 As Variant
Static old_Vol89 As Variant
Static old_Vol90 As Variant
Static old_Vol91 As Variant
Static old_Vol92 As Variant
Static old_Vol93 As Variant
Static old_Vol94 As Variant
Static old_Vol95 As Variant
Static old_Vol96 As Variant
Static old_Vol97 As Variant
Static old_Vol98 As Variant
Static old_Vol99 As Variant
Static old_Vol100 As Variant
Static old_Vol101 As Variant
Static old_Vol102 As Variant
Static old_Vol103 As Variant
Static old_Vol104 As Variant
Static old_Vol105 As Variant
Static old_Vol106 As Variant
Static old_Vol107 As Variant
Static old_Vol108 As Variant
Static old_Vol109 As Variant
Static old_Vol110 As Variant
Static old_Vol111 As Variant
Static old_Vol112 As Variant
Static old_Vol113 As Variant
Static old_Vol114 As Variant
Static old_Vol115 As Variant
Static old_Vol116 As Variant
Static old_Vol117 As Variant
Static old_Vol118 As Variant
Static old_Vol119 As Variant
Static old_Vol120 As Variant
Static old_Vol121 As Variant
Static old_Vol122 As Variant
Static old_Vol123 As Variant
Static old_Vol124 As Variant
Static old_Vol125 As Variant
Static old_Vol126 As Variant
Static old_Vol127 As Variant
Static old_Vol128 As Variant
Static old_Vol129 As Variant
Static old_Vol130 As Variant
Static old_Vol131 As Variant
Static old_Vol132 As Variant
Static OLD_TIME As Variant


Select Case Range("I9").Value
Case Is <> OLD_TIME
Range("T1").Value = Range("T1").Value + (Range("I9").Value - OLD_TIME): OLD_TIME = Range("I9").Value
End Select


Select Case Range("G9").Value
Case Is < old_value9
Range("T9").Value = Range("T9").Value + (Range("D9").Value - old_Vol9): old_Vol9 = Range("D9").Value: old_value9 = Range("G9").Value: Range("Z9").Value = Range("Z9").Value + 1
Case Is > old_value9
Range("U9").Value = Range("U9").Value + (Range("D9").Value - old_Vol9): old_Vol9 = Range("D9").Value: old_value9 = Range("G9").Value: Range("Z9").Value = Range("Z9").Value + 1
End Select

Select Case Range("G10").Value
Case Is < old_value10
Range("T10").Value = Range("T10").Value + (Range("D10").Value - old_Vol10): old_Vol10 = Range("D10").Value: old_value10 = Range("G10").Value: Range("Z10").Value = Range("Z10").Value + 1
Case Is > old_value10
Range("U10").Value = Range("U10").Value + (Range("D10").Value - old_Vol10): old_Vol10 = Range("D10").Value: old_value10 = Range("G10").Value: Range("Z10").Value = Range("Z10").Value + 1
End Select

Select Case Range("G11").Value
Case Is < old_value11
Range("T11").Value = Range("T11").Value + (Range("D11").Value - old_Vol11): old_Vol11 = Range("D11").Value: old_value11 = Range("G11").Value: Range("Z11").Value = Range("Z11").Value + 1
Case Is > old_value11
Range("U11").Value = Range("U11").Value + (Range("D11").Value - old_Vol11): old_Vol11 = Range("D11").Value: old_value11 = Range("G11").Value: Range("Z11").Value = Range("Z11").Value + 1
End Select

Select Case Range("G12").Value
Case Is < old_value12
Range("T12").Value = Range("T12").Value + (Range("D12").Value - old_Vol12): old_Vol12 = Range("D12").Value: old_value12 = Range("G12").Value: Range("Z12").Value = Range("Z12").Value + 1
Case Is > old_value12
Range("U12").Value = Range("U12").Value + (Range("D12").Value - old_Vol12): old_Vol12 = Range("D12").Value: old_value12 = Range("G12").Value: Range("Z12").Value = Range("Z12").Value + 1
End Select

Select Case Range("G13").Value
Case Is < old_value13
Range("T13").Value = Range("T13").Value + (Range("D13").Value - old_Vol13): old_Vol13 = Range("D13").Value: old_value13 = Range("G13").Value: Range("Z13").Value = Range("Z13").Value + 1
Case Is > old_value13
Range("U13").Value = Range("U13").Value + (Range("D13").Value - old_Vol13): old_Vol13 = Range("D13").Value: old_value13 = Range("G13").Value: Range("Z13").Value = Range("Z13").Value + 1
End Select



' this goes upto range 150, but i have pasted less due to limitation of charactors on this forum

End Sub