AzureRX-7さん、こんにちは。
パスポートNo.を忘れてしまったため、「ポコ」→「ぽこ」に変わりました。

遅くなりましたが、コメントありがとうございます。

＞＞Worksheets.Add after:=Worksheets(Worksheets.Count)
＞＞
＞既存のブックに保存するのでしたら、
＞それに上記の処理を記述したマクロを用意して、
＞PBからそのマクロを実行させるってのはどうでしょう。

今回は既存のブックではなく、またＰＢからのマクロの実行がよく分からなかったため、
以下のような方法でシートの挿入を行いました。

OLEObject lole_excel,lole_book
lole_excel = CREATE OLEObject
lole_book = lole_excel.Application.ActiveWorkbook
---省略---
//シート追加
lole_book.Worksheets.Add(lole_book.Worksheets[lole_book.Worksheets.Count])
---省略---
//最後尾シート削除
lole_excel.Application.DisplayAlerts = False
lole_book.Worksheets[lole_book.Worksheets.Count].Delete
lole_excel.Application.DisplayAlerts = True

上記の方法では、最後尾のシートの前に新しいシートを挿入していき、
最後に最後尾のシートを削除するという無理矢理な方法ですが、
どうにか思い通りのExcelブックを作成することが出来ました。

まだまだ勉強不足ですが、これからもよろしくお願いします。