著作一覧 |
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の取得に時間がかかるのかなという疑いもある(たとえばいちいちプリンターとネゴシエーションしているとか。さすがにそれは無いか……)。
ジェズイットを見習え |