>こうじゃない？
うん。だから COM の解放の観点では
>    Book = ExcelApp.WorkBooks.Add()
はマズイよね。WorkBooks オブジェクトが呼び出されているのに解放する
手段が無いから。

じゃんぬさんのサイトのコードで言えば、
> Dim xlBooks As Excel.Workbooks = xlApplication.Workbooks
> Dim xlBook As Excel.Workbook = xlBooks.Add()
この2行に分解してやらないといけません。
結果、左辺にも右辺にもピリオドは1個になります。