ActiveCellの両端の列番号の得方

質問

エクセルのマクロでActiveCellの両端のセルの列番号
はどの様にして得るのでしょうか、教えて頂ければ幸い
です、宜しくお願いします。

回答No.2

kmetu · ベストアンサー

両端ということは複数選択しているセルの両端の列ということでしょうか

Selection.Column
で左端の列番号

Selection.Column + Selection.Columns.Count - 1
で右端の列番号が取得できます

お礼

本当に有り難うございました
実際に確かめてみました結果うまくいきました、
今後とも宜しくご指導ください

回答No.3

hallo-2007

ActiveCell左右に空白があるのかないのかで結果が違ってきますが。
一応、２つパターンで

Sub ボタン1_Click()
'左右に空白があって、空白の手前の列
MsgBox ActiveCell.End(xlToRight).Column
MsgBox ActiveCell.End(xlToLeft).Column
'空白があっても最も右の列
MsgBox Cells(ActiveCell.Row, 1).End(xlToRight).Column
'Ａ列が空白で、最も左側の列
MsgBox Cells(ActiveCell.Row, Columns.Count).End(xlToLeft).Column
End Sub

回答No.1

bin-chan

ActiveCell．Addressを参照
セルB3～D6を選んでたら”B3：D6”のはず

またはCurrentRegionのアドレスかも