kinさん、見てますか?？
例の、ExcelのマクロのHowToです。
データはすでに入っているものとして、デザインを調整します。

-------------------------------------------------------------
\'画面を更新させないようにして、実行速度を向上させる
Application.ScreenUpdating = False

\'カラムの幅を自動調整する
Cells.Select
Cells.EntireColumn.AutoFit

Range(\"A1\").Select
\'データの終わりのセルを見つける
Selection.End(xlDown).Select
Selection.End(xlToRight).Select
ls_AddrEnd = ActiveCell.Address
\'MsgBox ls_AddrEnd
\'データのある範囲を選択
Range(\"A1\", ls_AddrEnd).Select

\'（ここに適当な処理を書く）

Range(\"A1\").Select
\'画面を更新
Application.ScreenUpdating = True

-------------------------------------------------------------

あとはマクロの記録をとりながらヘッダのフォントを変えるなり、
罫線を引くなりして、そのマクロを挿入すればオッケーです。
それでは！