はじめまして、みーと申します。

現在Webの開発をしているのですが、ASPからCOMを呼び出し、COM内でExcelの編集を行って
います。
作成したExcelの帳票はシートが３枚あり、それぞれ1ページづつ出力されるようにExcelに
印刷ボタンを設けています。


Private xlApp               As Excel.Application    'Excelアプリケーション
Private xlBook              As Excel.Workbook       'ワークブック
Private xlSheet             As Excel.Worksheet      'シート

'■Excelの起動
　　Set xlApp = CreateObject("Excel.Application")
    
'Excelを開く
    Set xlBook = xlApp.Workbooks.Open(sAllPath)

'1シート目の書込み
Set xlSheet = xlBook.Worksheets(CNST_PR2)
　　　　　　　　・

　　　　　　　　・
　　　　　　　　・

'2シート目の書込み
Set xlSheet = xlBook.Worksheets(CNST_PR2)
'ヘッダーに1シート目の"D7"の値をセット
xlSheet.PageSetup.RightHeader = xlBook.Worksheets(CNST_PR1).Range("D7").Value & "　" & Format(Date, "yyyy/mm/dd")

という形で、ヘッダーを設定しています。
自社の環境では、VB6.0 sp5でExcel2000、Excel97でこの設定はうまくいくのですが
お客様のところでは

"PageSetupクラスのRightHeaderプロパティを設定できません"
というエラーが発生しています。
環境はVB6.0 sp5でExcel97です。
自社で再現ができずに困っています。

どなたか解決策をお教えくださいませんか？

ちょっと気になったのですが
> 自社の環境では、VB6.0 sp5でExcel2000、Excel97でこの設定はうまくいくのですが
Excel2000とExcel97が共存しているのでしょうか


お客様の環境は下記ですよね
> 環境はVB6.0 sp5でExcel97です。

作成された時の参照設定は Excel2000 ですか？
なら Excel97 にチェックして見たらいかがでしょうか？

上記と違うなら？？？です。<m(__)m>　

花ちゃんさん、早速の回答ありがとうございます。

> ちょっと気になったのですが
> > 自社の環境では、VB6.0 sp5でExcel2000、Excel97でこの設定はうまくいくのですが
> Excel2000とExcel97が共存しているのでしょうか
　共存はしておりません。
　もともと、Excel2000が入っていました。で、Excel2000で検証し、エラーが発生しません
　でしたので、Office2000を削除し、Excel97をインストールし検証をしてみました。


> お客様の環境は下記ですよね
> > 環境はVB6.0 sp5でExcel97です。
　はい。

> 作成された時の参照設定は Excel2000 ですか？
> なら Excel97 にチェックして見たらいかがでしょうか？
　試してみます。

ありがとうございました。

お聞きします。

>> 作成された時の参照設定は Excel2000 ですか？
> なら Excel97 にチェックして見たらいかがでしょうか？
　Excel2000が入っているのでMicrosoft Excel 9.0 Object Libraryに
　チェックをつけていました。
　Office2000を消去し、Excel97をインストールし
　Microsoft Excel 8.0 Object Libraryにチェックをつけるということ
　でしょうか？

よろしくお願いいたします。

お客様の環境はExcel97 なのでExcel 8.0 Object Libraryにチェックを入れた
ものでないとエラーが発生します。
又は実行時バインディングにしてみるとか！

> お客様の環境はExcel97 なのでExcel 8.0 Object Libraryにチェックを入れた
> ものでないとエラーが発生します。
> 又は実行時バインディングにしてみるとか！
　もう一度、お客様のところの環境を聞いてみます。
　・・・昨日、環境を作り変えたようなことを言われてましたので・・・・・