Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


10977 / 13644 ツリー ←次へ | 前へ→

【18798】UserFormの表示場所の変更 ヨチヨチ歩き 04/10/12(火) 11:41 質問[未読]
【18799】Re:UserFormの表示場所の変更 IROC 04/10/12(火) 13:19 回答[未読]
【18837】Re:UserFormの表示場所の変更 ヨチヨチ 04/10/14(木) 10:01 質問[未読]
【18838】Re:UserFormの表示場所の変更 IROC 04/10/14(木) 10:18 回答[未読]
【18841】Re:UserFormの表示場所の変更 Jaka 04/10/14(木) 11:15 発言[未読]
【18849】Re:UserFormの表示場所の変更 ヨチヨチ 04/10/14(木) 11:39 お礼[未読]

【18798】UserFormの表示場所の変更
質問  ヨチヨチ歩き  - 04/10/12(火) 11:41 -

引用なし
パスワード
   エクセル画面上に、自分で作成したUserFormを(ShowModal=Falseで)表示しました。
UserFormでは、エクセル画面の情報を参照しながらデータを入力したいですが、
UserFormがエクセル画面上の情報を覆い隠すため、UserFormを手動で移動させる必要があります。 UserFormの表示場所として、画面の中央・左上隅等の指定ができますが、
もっと細かく、画面座標の指定を行なう方法がありませんか?
(と言うより、指定したセルの(エクセル上の座標ではなく、画面座標が取得できればいいのですが)

【18799】Re:UserFormの表示場所の変更
回答  IROC  - 04/10/12(火) 13:19 -

引用なし
パスワード
   Top,Left プロパティで指定できますよ。

【18837】Re:UserFormの表示場所の変更
質問  ヨチヨチ  - 04/10/14(木) 10:01 -

引用なし
パスワード
   ▼IROC さん:
>Top,Left プロパティで指定できますよ。
回答ありがとう御座います。
質問の仕方がまずく、申し訳ありません。
UserFormの表示場所の変更(Top,Left)方法は理解していますが、画面上の何処に
表示すれば良いのか?
つまり、あるセルの座標(ワークシート上の座標ではなく物理画面上の座標)を
取得し、そのセルの行を避けてUserFormを表示したいのですが できませんか?
宜しく、ご教示ください。

【18838】Re:UserFormの表示場所の変更
回答  IROC  - 04/10/14(木) 10:18 -

引用なし
パスワード
   >セルの座標(ワークシート上の座標ではなく物理画面上の座標)を取得

ちょっと私には構想すら思いつかないですね。

たとえば、 セルA65536 を選択した状態で、
セル A1 の座標を考えると、Windowの範囲外になりますから、
物理画面上の座標というのは存在しないので、
取得できるようには思えません。

【18841】Re:UserFormの表示場所の変更
発言  Jaka  - 04/10/14(木) 11:15 -

引用なし
パスワード
   こんにちは。

これで現在表示シートの左上のセルが解ります。少し加工が必要です。
(他のまともなやつもあったと思うんですが、忘れました。)
MsgBox Application.Evaluate("=INFO(""origin"")")

それと、↓ここで使っているPointsToScreenPixelsXを応用されたらどうでしょうか?
http://www.vbalab.net/vbaqa/c-board.cgi?cmd=ntr;tree=57;id=FAQ
ポイントとピクセルの違いで多少ずれると思います。

因みに現在のWin2000 & EXL97だと、コンパイルエラーになって使えなくなってしまいました。
(Win98 & EXL97の時は動いていました。)
ぶっ壊れる寸前のCDROMドライブで、HDをフォーマットしてインストールし直したせいだと思います。
Officeインストール中もおかしかったし、その後のアップデート中にフリーズしたりとインストールに失敗した性かもしれませんが....。

【18849】Re:UserFormの表示場所の変更
お礼  ヨチヨチ  - 04/10/14(木) 11:39 -

引用なし
パスワード
   IROCさん、jakaさん どうもありがとう御座います。
ご教示頂いた内容を見ながら、挑戦してみます。
(私には、ちょっと難しいかも?  頑張ります!)
途中で、不明な事があれば、また質問させて下さい。
宜しくお願い致します。

10977 / 13644 ツリー ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free