dポイントプレゼントキャンペーン実施中!

ASPにおいてエクセルの中央寄せ・右寄せができません。

xlsSheetWrk.Range("B7:C7").HorizontalAlignment = xlRight
(xlsSheetWrkはシートのオブジェクト)
みたいなことをしているのですが。無理です。。。

何かいい方法はないでしょうか??
本当に困っています!!!!!
よろしくお願いします。

A 回答 (3件)

こんにちは。



xlCenterは-4108となってました・・・。
MSDNの検索から、定数一覧が見れましたよ。
(^^ゞ
    • good
    • 0
この回答へのお礼

本当に助かりました!!!!

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

また機会があればよろしくお願いします!!!!

お礼日時:2005/02/01 14:37

こんにちは。



うーん・・・、
xlsSheetWrk.Range("B7:C7").HorizontalAlignment = xlRight

xlsSheetWrk.Range("B7:C7").HorizontalAlignment = -4152
としてみてください・・・。

定数合ってたかな???
(^^ゞ
    • good
    • 0
この回答へのお礼

お~!!!!うまくいきました!!!!

本当にありがとうございます!!!!!

あつかましいですが、中央寄せの値はわかりますか??

やはり、ASPにおいてはエクセルマクロにおいての
定数は使えないみたいですね。今回みたいな-4152などの
一覧のあるサイトなどはあるのでしょうか??

わからなくてもいいので返事をいただけるとありがたいです。
締め切りのタイミングが難しくなるので。。。

それでは本当にありがとうございました!!!感謝します!!!

お礼日時:2005/02/01 13:40

こんにちは。



>>何かいい方法はないでしょうか??
ここだけ見れば合ってますので、これ以上の方法はないかと・・・。

>>xlsSheetWrk.Range("B7:C7").HorizontalAlignment = xlRight
だけが無視されている状態なんですよね?
(それ以外は全く問題がない)

できれば変数定義から、オブジェクトのセットの部分なども載せて頂けるとありがたいです・・・。
(^^ゞ

この回答への補足

早速の回答ありがとうございます!!!

とりあえずソースを載せます。

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

Dim xlsApp
Dim xlsBookWrk
Dim xlsSheetWrk

'エクセルの起動
Set xlsApp = CreateObject("Excel.Application")
Set xlsBookWrk = xlsApp.Workbooks.Add

'シートの追加
Set xlsSheetWrk = xlsBookWrk.Worksheets.Add

xlsSheetWrk.Range("B7:C7").HorizontalAlignment = xlRight

<JavaScriptエラー内容>
Range クラスの HorizontalAlignment プロパティを設定できません。

補足日時:2005/02/01 11:55
    • good
    • 0

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!