タイトル : Re^3: 範囲選択したセル情報が欲しい。 投稿日 : 2010/10/28(Thu) 18:14 投稿者 : 魔界の仮面弁士
> Private WithEvents xlWs As Excel.Worksheet > Set xlWs = xlWb.ActiveSheet そのように記述しているのであれば、xlWs 変数のイベントとして Private Sub xlWs_SelectionChange(ByVal Target As Excel.Range) が生成されるかと思います。セル範囲の選択時に、自動的にこのイベントが実行されます。 > コマンドボタンを押すとメッセージを表示して「はい」が押された時に > アクティブになっているセルの行と列を取得できるようになっています。 現在選択中の Range オブジェクトは、Selection から得られますよね。 なので後は、先のサンプルの Target As Range に対して行ったのと同じことを、 その Range に対して行えば OK です。 |