Excel VBA質問箱 IV

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

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


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

【4930】コンボボックスの配置位置について POPPY 03/4/14(月) 14:44 質問
【4932】Re:コンボボックスの配置位置について ポンタ 03/4/14(月) 15:12 回答
【4946】Re:コンボボックスの配置位置について POPPY 03/4/14(月) 23:39 お礼

【4930】コンボボックスの配置位置について
質問  POPPY  - 03/4/14(月) 14:44 -

引用なし
パスワード
   あるセルにコンボボックスを配置していますが行の挿入などを繰り返すうちに
コンボボックスが配置されてるセルの位置がわからなくなってしまいます。

セルに名前をつければ良いのかもしれませんが、
コンボボックスや図形などのTOP(左上)が配置されているセルの位置を求める
方法ってあるんでしょうか? どなたか教えてください。

【4932】Re:コンボボックスの配置位置について
回答  ポンタ  - 03/4/14(月) 15:12 -

引用なし
パスワード
   こういうことでしょうか?

名前は適切に書き直してください。

Sub test()
  Dim sh As Shape
  Set sh = ActiveSheet.Shapes("ドロップ 1")
  MsgBox (sh.TopLeftCell.Address)
End Sub

【4946】Re:コンボボックスの配置位置について
お礼  POPPY  - 03/4/14(月) 23:39 -

引用なし
パスワード
   ▼ポンタ さん:
どうもありがとうございます。質問箱にはいつも助けられています。
またよろしくお願いします。 ・・・ POPPY

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