| 著作一覧 |
For i = 1 To Worksheets.Count
With WorkSheets(i).PageSetup
.LeftFooter = "foo"
.CenterFooter = "&Cbar" & vbCrLf & "&Cbaz"
.RightFooter = "&P/&N"
End With
Next
が、Macだとんがんがくらいで終るのだが(1んがで、1シート)、Winだとちょっと一服、また一服くらいかかる(500んがで1シートくらいの体感速度)。
何が何でも変だと思うのだが、もし、Win32のExcelのVBAが外部プロセスからのAutomationであればそんなものかなと納得もする。
でも、PageSetupを使ってない似たような処理(たとえばインデックスページの生成とかも同様に全シートをトラバースする)には、ここまでひどい遅延は生じない。
実は。.PageSetupの取得に時間がかかるのかなという疑いもある(たとえばいちいちプリンターとネゴシエーションしているとか。さすがにそれは無いか……)。
ジェズイットを見習え |