文字を置き換えるマクロが知りたいです

こんばんは！会社で使用しているエクセルシートで困っていることがあります。 sheet１に各年度毎の表が作成されています（A列は平成25年度、B列は平成26年度…） sheet2の特定のセルに年度を入力すると、sheet2のA列に入力されている数式「=Sheet１!A○」の"A"を"B"等に置き換えるマクロが知りたいです。 分かりづらい説明で申し訳ありませんが、よろしくお願いします。