Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
10990 / 13657 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【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の時は動いていました。）
ぶっ壊れる寸前のＣＤＲＯＭドライブで、ＨＤをフォーマットしてインストールし直したせいだと思います。
Officeインストール中もおかしかったし、その後のアップデート中にフリーズしたりとインストールに失敗した性かもしれませんが....。
【18849】Re:UserFormの表示場所の変更
お礼  ヨチヨチ  - 04/10/14(木) 11:39 -
引用なし
パスワード
   IROCさん、jakaさん　どうもありがとう御座います。
ご教示頂いた内容を見ながら、挑戦してみます。
(私には、ちょっと難しいかも？　　頑張ります！)
途中で、不明な事があれば、また質問させて下さい。
宜しくお願い致します。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
10990 / 13657 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free