[[20060715183342]]　『オートシェイプをスクロールしても固定したい』（ヤスオ）　ページの最後に飛ぶ

『オートシェイプをスクロールしても固定したい』（ヤスオ）

[オートシェイプで作った図をスクロールしてもコメント画面のように固定したい]

教えて下さい。スクロールするとオートシェイプで作った図が上に上がってしまい、いちいち下にずらしながら作業をしています。それでオートシェイプで作った図をコメント画面のように固定し、スクロールしても動かない用にして作業していきたいのですが・・・。又、コメント画面の作り方も分かりません。マクロは、全くわかりません。良い方法を教えて下さい。申し訳ありませんが、何卒よろしくお願い致します。

 コメント画面って何のことを言われているのでしょうか？？？
 どれくらいの大きさなのかわかりませんが私が思いつく方法を３案提示します。
 １．「ウィンドウ枠の固定」で固定される領域にオートシェイプを配置する。
 ２．「新しいウィンドウを開く」で片方にオートシェイプを表示してウィンドウを並べて表示する。
 ３．オートシェイプを画像にして、ユーザーフォーム上に配置しモーダレスでユーザーフォームを表示する。
 （やっちん）

やっちん様ありがとう御座います。コメント画面（入力が間違ってます）とかの感じで四角いコマンドボックスという感じのです。３．オートシェイプを画像にして、ユーザーフォーム上に配置しモーダレスでユーザーフォームを表示する。やり方を教えて頂けませんか。よろしくお願い致します。

 ヤスオさんが言われているコメント画面とはMSGBOXのことですね。
 MSGBOXは文字以外は表示できなくて、表示中は他の操作を受け付けないので今回の事例では適しません。

 まず画像の作り方ですが、オートシェイプをコピーして「ペイント」等の画像処理ソフトに貼り付けて
 必要な部分だけの大きさで保存します。

 次にユーザーフォームですがリンク先を参考にして作ってください。
http://www.moug.net/skillup/buef/vy010-2.htm
 コントロールを配置するの前までできたら
 「▼　図02-05　ツールボックス」の一番右の上から３番目をユーザーフォーム上に配置してください。
 「▼　図02-07　プロパティウィンドウ」のPictureの右側の「...」を押して画像を選択します。

 最後に
 「▼　図02-02　VBエディタ」の中の左上の「ThisWorkbook」をダブルクリックすると
 右側にVBAコードを記述することができる領域が表示されるのでそこに下のコードを貼り付けてください。

 Private Sub Workbook_Open()
    UserForm1.Show vbModeless
 End Sub

 一度保存して開きなおしてみてください。
 これだけでは完璧ではないのですが、とりあえず。
 （やっちん）

（やっちん）様、有難う御座います。頑張ってみます。

コメント返信：

[ 一覧(最新更新順) ]

[[20060715183342]] 『オートシェイプをスクロールしても固定したい』（ヤスオ） ページの最後に飛ぶ

[[20060715183342]]　『オートシェイプをスクロールしても固定したい』（ヤスオ）　ページの最後に飛ぶ