エクセルで、マクロボタンの表示位置を固定

解決済

質問者：yuukoron
質問日時：2010/06/12 02:01
回答数：2件

エクセルで、マクロボタンの表示位置を固定
することはできますか？
例えば、アクティブセルを移動させると、マクロボタンは画面からきえてしまいます。それを常に画面の右上に表示させたいのです。
ウィンドウ枠の固定をしない方法でお願いします。
どなたかよろしくお願いします。

通報する

この質問への回答は締め切られました。

質問の本文を隠す

回答 (2件)

ベストアンサー優先
最新から表示
回答順に表示

No.2ベストアンサー

回答者： xls88
回答日時：2010/06/27 07:03

＞回答番号：No.1 この回答への補足

対象シートのシートモジュールにそっくりコピペしてください。
シート見出しを右クリック＞コードの表示でVBEが起動します。
対象シートのシートモジュールのコードウインドウが表示されています。

対象シート上でカーソルを移動する（SelectionChangeですね）とマクロが実行されます。

ワークシートのイベントプロシージャ
http://excelvba.pc-users.net/fol3/3_6.html

- 0
- 件

通報する

この回答へのお礼

お礼が遅くなりまして、申し訳ありませんでした。
せっかく回答いただきましたが、わたしの求める動きとは違いました。

もっと勉強してから、再度質問させていただきたいと思います。
ありがとうございました。m(_　_)m

通報する

お礼日時：2010/07/12 01:58

No.1

回答者： xls88
回答日時：2010/06/12 06:35

マクロの例です。

シート見出しを右クリックからコードの表示でVBEを表示
VBEのコードウインドウに下記マクロをコピペ

Excelの表示倍率が100以外だと期待した位置よりずれて表示されます。
補正するコードを付け加えなければなりません。

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
With ActiveWindow.VisibleRange
Me.Shapes(1).Left = .Width - Me.Shapes(1).Width - 5
Me.Shapes(1).Top = .Top + 5
End With
End Sub

この回答への補足

回答ありがとうございます。
ごめんなさい、超初心者です、教えてください。

わたしのつくった、マクロ
Sub　○○（）
○○○
End　Sub
の中にどのようにコピーすればよろしいですか？
最初や、最後にそのままくっつけてみましたが、マクロボタンは、画面から消えてしまいました。
よろしくお願いします。

補足日時：2010/06/13 23:08

通報する