[リストへもどる]
一括表示
投稿時間：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

投稿時間：2003/03/23(Sun) 23:59
投稿者名：Starfish
Ｅメール：
ＵＲＬ　：
タイトル：Re: VB6からのEXCELの印刷設定について
> というエラーがでてしまいます。参照設定は、Microsft Office 9.0 Object Libraryです。

　Microsft Excel 9.0 Object Library　ですね。

投稿時間：2003/03/24(Mon) 00:01
投稿者名：謎（’’
Ｅメール：
ＵＲＬ　：
タイトル：Re^2: VB6からのEXCELの印刷設定について
> > というエラーがでてしまいます。参照設定は、Microsft Office 9.0 Object Libraryです。
>
> 　Microsft Excel 9.0 Object Library　ですね。

そのとうりでした。とゆうわけで解決しました。
ありがとうございました。