現在、Accessで読み込み→VB上で編集→Excelで印刷という処理を作っています。
Excel上に吐き出した時の１ページ目に
番号・名前・住所etcの各セル毎のタイトルをセル位置指定で打ってました。
（xlSheet.Cells(X, X) = "氏名"という感じです。）
そして次の行からレコードセットの.RecordCountの数字分、実際にデータを入れてたのですが、
この方法だと２ページ目以降はデータだけでタイトルは出ません。
２ページ目以降にもタイトルを入れる方法を教えてください。

１ページあたりの行数指定は出来ないです。
文字やセルの大きさ、余白を変えれる仕様なので１ページに表示される行数が可変なので。

(シートの)PageSetup プロパティに対して、PrintTitleRows を指定するか、
または LeftHeader / CenterHeader / RightHeader を割り当ててみるとか。

＞魔界の仮面弁士様
PageSetupプロパティのPrintTitleRowsで解決致しました。

この関数を使った場合、２行目以降のタイトルのセルの高さや、
タイトル行のセルの装飾(タイトル下は２重線にしてます)
も１ページ目の手打ちした行と変わらないんですよね？

印刷プレビューでは変わらないのが確認出来たのですが、
今、プリンターが使えない状況なので実際に印刷出来ないので。