マクロ(VBA)で非表示のシートを再表示するには
  Worksheets(”シート名”).Visible=True
  でできます。
  * “シート名”はシート番号でもよい。
 ただ,再表示するシート名が事前にはわからないので,とりあえず,
すべてのシートを表示してしまえばいいと思います。
 NoWorksheets = Worksheets.Count    'Worksheet数を取得
 For i = 1 to NoWorksheets
    Worksheets(i).Visible = true    'シート再表示
 next i
以上で,すべてのワークシートを再表示できます。この後に,他の処理を
記述してください。
 なお,作成したマクロのアドインとしての保存や使用法は次のサイトを
参考にしてください。
http://www.geocities.jp/ttak_ask/office_docu/ef10.html