[[20060824144317]] 『罫線だめならオートシェイプ?』(しんちゃん) ページの最後に飛ぶ

[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]

 

『罫線だめならオートシェイプ?』(しんちゃん)

 エクセル2000、OS:Win98を使用しています。

 任意のセル(例:E5)にオートシェイプで線を描きたいと思っています。
 マクロにて自動的に線を引きたいと思っています。
 どんな線を描くかというと、セルの右側に上から下まで線を引きたいのですが
 座標の計算がいまいちわからず困っています。

 罫線にしない理由はA5〜G5とH5〜N5まで結合されたセルで、
 テキストが入っています。
 とある条件から、E列とK列以外を非表示にするのですが
 そうするとセルの両脇の罫線が消えてしまいます。印刷するとセル脇の罫線が
 消えているのでオートシェイプで線を引いて印刷しようと思ったのです。

 ここで非表示にしている列は条件によって変動します。

 いい方法が思いつかなかったので、良い知恵があればお願いします。


 マクロでないといけない理由が分かりません。
 Altを押しながらオートシェイプを描くと、(結合されているとしても)罫線に沿ってひけますが?
 セル幅を変更してもオートシェイプのプロパティでセルに合わせて・・・にチェックが入って
 いれば、問題ないと思いますが?
 (ROUGE)

 回答ありがとうございます。

 実は非表示となる列は、ユーザーフォームを使用して、ユーザーが任意に条件を
 選択しています。選択された列(条件)以外を非表示にするといったマクロを
 作成しています。

 条件入力後、ユーザーフォームに印刷ボタンを置いてあり、印刷ボタンを押すと
 マクロで綺麗にA4に入るよう設定しています。
 つまりユーザーは印刷設定を何もせず、印刷できるようにしているわけですが、
 罫線が消えてしまっては、表としておかしいので、なんとかしたいと思っている
 わけです。オートシェイプも自動でマクロで描いてあげれば、ユーザーの
 煩わしい作業をなくすことができると思っています。

 乱文申し訳ないですが、宜しくお願いします。

 RangeオブジェクトのTopプロパティ、Leftプロパティを使えばできそうです。
 (ROUGE)

 A5〜G5とH5〜N5の前に一列挿入して
 A5・B5〜H5・I5〜O5・J5
 として、A5とJ5の右と左に罫線を引いておいて
 印刷範囲にも含めておく

 なんてのじゃ・・・だめですよね。

 (HANA)

コメント返信:

[ 一覧(最新更新順) ]


YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki. Modified by kazu.