2014-03-18
ExcelVBA覚書 Workbookのつくり方
Application.Workbooks.Add
で新規ブックを作ることはできるのだが、2003バージョンで上限が6.5万行ぐらいのシートができてしまった。
これを強制的に100万行対応のファイルにできないものかと思っていたところ、
Dim def As XlFileFormat ‘DefaultSaveFormat 保管場所
With Application
def = .DefaultSaveFormat
.DefaultSaveFormat = xlExcel12 ’50 Excel2007-
.Workbooks.Add
End With
というふうにApplication.DefaultSaveFormatプロパティを一時的に変えてから新規ブックを作成してやればよいことがわかった。
処理の最後に、また元の値(def)に戻してやればよい。