VB6.0用掲示板の過去のログ(No.1)−VBレスキュー(花ちゃん)
[記事リスト] [新規投稿] [新着記事] [ワード検索] [過去ログ] [管理用]

投稿日： 2003/03/23(Sun) 22:57
投稿者： 謎（’’
Ｅメール：
ＵＲＬ：
タイトル： VB6からのEXCELの印刷設定について

こんばんわ。初めての投稿です
VB6からEXCEL2000のページ設定をしたいのですが、
.Orientation = xlLandscapeのところで　”xlLandscapeは宣言されていません”
というエラーがでてしまいます。参照設定は、Microsft Office 9.0 Object Libraryです。
どなたか解決法をご教授お願いします。

Dim xlApp   As Object
Dim xlBook As Object
Dim xlSheet As Object

Set xlApp = CreateObject("Excel.Application")
Set xlBook = xlApp.Workbooks.Add
Set xlSheet = xlBook.Worksheets(1)

    With xlSheet.PageSetup
        .Orientation = xlLandscape　'←ここでエラーになります。
        .PaperSize = xlPaperA4
        .FirstPageNumber = xlAutomatic
        .Order = xlDownThenOver
        .BlackAndWhite = False
        .Zoom = 100
    End With

- 関連一覧ツリー （★ をクリックするとツリー全体を一括表示します）
- 返信フォーム （この記事に返信する場合は下記フォームから投稿して下さい）

- Web Forum -