[[20031009140643]]　『RangeクラスのHorizontalAlignmentプロパティ』（さかな）　ページの最後に飛ぶ

『RangeクラスのHorizontalAlignmentプロパティ』（さかな）

RangeクラスのHorizontalAlignmentプロパティを設定できません。

毎月同じ操作で一ヶ月分の日報を作成するので、操作をマクロで記録して、それを多少編集しながらExcel2002でファイルを作成しました。セルの書式設定のところで、次の様な指示(選択範囲内で中央揃え？)が書かれています。

    With Selection
　　　　　.HorizontalAlignment = xlCenterAcrossSelection

毎月社員が各個人で日報を作成するようにしたいのですが、私のパソコンはExcel2002で、他の人のパソコンにはExcel97が入っています。
そこで、Excel97でマクロを実行したところ、上の表記のところで、「実行時エラー－'1004'
RangeクラスのHorizontalAlignmentプロパティを設定できません。」というエラーメッセージが出て、とまってしまいます。
Excel2002でも、Excel97でも、選択範囲内で中央揃えの指示は同じ表記だと思うのですが、どのようなエラーがおこっているのかがよくわかりませんので、教えていただきたいと思います。よろしくお願いします。

 Excel97 に HorizontalAlignment 又は xlCenterAcrossSelection が
 定義されていない可能性があります。

 あなたの手の届く範囲にそのExcel97があるのでしょうか？
 もしあるのなら、HorizontalAlignmentのAのところをクリックしてから、F1キーを
 押してヘルプがきちんと出るか見てください。
 （もしかしたら、Helpのセットアップがされていなくて
 Office-97 のCD-ROM をよこせと[わめく]かもしれません）
（kazu）

 我が工房で動いているWindows2000ServerにExcel97が
 入っていることを思い出しました。
    Excel97 の時は xlHAlignCenterAcrossSelection
    Excel97 以外は xlCenterAcrossSelection
 切り替えて使うしかないでしょう。
 （kazu）

 [Excel97 Help]
 オブジェクトのセルに入力されている内容の配置 (横位置) を返します。
 どのオブジェクトが対象のときでも使用できる定数は、XlHAlign クラスの
 xlHAlignCenter、 xlHAlignDistributed、 xlHAlignJustify、 xlHAlignLeft、 
 xlHAlignRight のいずれかです。対象が Range オブジェクトおよび
 Style オブジェクトの場合は、さらに xlHAlignCenterAcrossSelection、
 xlHAlignFill、 xlHAlignGeneral のいずれかの定数が使用できます。
 値の取得および設定ともに可能です。長整数型 (Long) の値を使用します。

 早速のご回答ありがとうございました。
 今はExcel97の入ってイいるパソコンがすぐに使えない状態なので、明日にでもトライしてみ
 ようと思います。わかりやすく教えていただき、ありがとうございました。
  (さかな)

９７でやってみてはいませんが、kazu さんの仰せ通り、xlCenterAcrossSelection が原因であることは、ほぼ間違いないと思います。これを変えたらどうですか。xlHAlignCenter もしくは xlHAlignCenterAcrossSelection のどちらも、２００２はどうか知りませんが、少なくとも、２０００では有効ですので、２００２でも使えるでしょう。とすれば、この二つは共通利用可能です。

ご存知だとは思いますが、VB で、Ctrl + g を押すとイミディイットウインドが開きますので、ここに、selection.HorizontalAlignment=xlHAlignCenterAcrossSelectionと打ってエンターを押し、アクティブセルがセンター寄せされていれば成功です。（通りすがりの者）

 何度もすみません。Excel97でやってみました。(通りすがりの者)さんに教えていただいた
 通り、イミディイットウインドウというところで、
 selection.HorizontalAlignment=xlHAlignCenterAcrossSelectionと打ってエンターを押
 してみたところ、「実行時エラー'438'  オブジェクトは、このプロパティまたはメソッド
 をサポートしていません。」  
 というメッセージが表示されてしまいました。
 これって、無理ってことなんでしょうか？
 Excel97 で、マクロの記録を行い、セルを選択して、書式設定で"選択範囲内で中央"を
 を選択して、表記されたマクロを確認したところ、
 .HorizontalAlignment = xlCenterAcrossSelection
 という風になっていました。
 そこで、もう一度イミディイットウインドウというところで、
 selection.HorizontalAlignment=xlCenterAcrossSelectionと打ってエンターを押してみ
 たところ、アクティブセルが"選択範囲内で中央"になっていました。

 (kazu)さんに教えていただいたように、ヘルプを見てみようとしたのですが、ヘルプは使えま
 せんとのことでした。

 できれば私以外は全員Excel97なので、Excel97で使いたいのですが、Excel97でファイルを作
 成した方が良いのでしょうか?
 よろしくお願いします。
(さかな)

 一般的に低いバージョンで開発する方が簡単でしょう。

 今回のように Excel97 が比較的身近にあるのなら、Excel97 で開発して、そのあと
 あなたの Excel2002 で確認すればOKです。

 確かに他の人のコンピュータで仕事するのはやりにくいでしょうから
 Excel2002 → Excel97 → Excel2002 でもかまいません。

 （kazu）

コメント返信：

[ 一覧(最新更新順) ]

[[20031009140643]] 『RangeクラスのHorizontalAlignmentプロパティ』（さかな） ページの最後に飛ぶ

[[20031009140643]]　『RangeクラスのHorizontalAlignmentプロパティ』（さかな）　ページの最後に飛ぶ