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)に戻してやればよい。

Tags:,

Add a Comment

メールアドレスが公開されることはありません。 が付いている欄は必須項目です

このサイトはスパムを低減するために Akismet を使っています。コメントデータの処理方法の詳細はこちらをご覧ください