並べ替えのマクロで対象行の範囲を行を増やした分だけ可変にして増やしたい。
マクロ超初心者です。エクセル2003においての質問です。
作成した〔日付順〕のボタンを押すことで並べ替えをしたいと思い，以下のマクロを「記録」から作成したのですが，
9行～153行の間に行を挿入した場合，並べ替えの対象となる行も同じように増えてほしいのですが，常に9行～153行のままで増えてくれません。
可能なら9行より前に行を挿入した場合も同じように可変して欲しいです。
全くのマクロ初心者でどう変えればいいのか分かりません。
また，「記録」から作成したマクロには操作内容が全て存在するようなのですが，
消してもいい不要な部分も分からないので教えて頂ければありがたいです。
よろしくお願いします。
(出来れば以下を書き直して全て貼り付けて頂けるとかなり助かります。)
sub 日付順()
Rows("9:153").Select
Selection.Sort Key1:=Range("I9")，Order1:=xlAscending，Key2:=Range("J9") _
，Order2:=xlDescending，Header:=xlGuess，OrderCustom:=1，MatchCase:= _
False,Orientation:=xlTopToBottom，SortMethod:=xlPinYin，DataOption1:= _
xlSortNormal，DataOption2:=lxSortNormal
Selection.Sort Key1:=Range("H9")，Order1:=xlAscending，Key2:=Range("B9") _
，Order2:=xlDescending，Key3:=Range("M9")，Order3:=xlAscending，Header _
:=xlGuess，OrderCustom:=1，MatchCase:=False,Orientation:=xlTopToBottom _
，SortMethod:=xlPinYin，DataOption1:=xlSortNormal，DataOption2:= _
xlSortNormal，DataOption3:=lxSortNormal
End Sub
![その他([技術者向] コンピューター) イメージ](https://gazo.okwave.jp/okwave/spn/images/related_qa/c205_4_thumbnail_img_sm.png)
お礼
参考にします。ありがとうございました。