選択しているセルの数を知りたい

質問

選択しているセルの数、もしくは行の数を知りたい場合はどうすればよいのでしょうか？
連続しているセルを選択している場合でも、引き算をしないといけないのでたいへんです。
ましてやCtrlキーを押しながら複数のセルを選択した場合は、眼でかぞえるしかありません。
よろしくお願いします。

回答No.2

imogasi · ベストアンサー

セル数はオートカルクでは出ないようなので（データ数はでる）
ＶＢＡでやって見ました。
Ｓｈｅｅｔにテキストボックスを１つ貼りつける（注）。
そしてＳｈｅｅｔの Worksheet_SelectionChangeイベントプロシージュアに
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim cl As Range
c = 0
For Each cl In Target
c = c + 1
Next
ActiveSheet.TextBox1.Text = c
End Sub
を貼りつける。
デザインモードを脱する。VBE画面の実行メニューの「鉛筆と定規のアイコン」の凹みをクリックしてなくす。
シーとで範囲指定して、（ＣＴＲＬを使って飛び飛びの範囲でも良い）マウスをアップした時にセル数がテキストボックスに入る。
（注）メニューの余白部で右クリック。
コントロールツールボックスをクリック。
テキストボックスをクリックして、シート上でマウスポインタ部で擦るようにする。
ツール－マクロ－ＶＢＥ画面で、左の▼をクリックして
「Worksheet」右の▼をクリックして「SelectionChange」をクリックして選ぶ。その中間に上記をコピペする。

回答No.5

telescope

データや数式が入ったセルなら、
ステータスバーに表示させることができます。
ステータスバーで右クリックして「データの個数」を選択しておきます。
http://www.microsoft.com/japan/users/tips/Excel/002.asp

連続した空白セルでしたら、選択中に名前ボックスに表示されます。
マウスボタンを離すと消えます。
5R × 2C　のような表示になります。この場合は、5行、2列の計10個のセルを選択した状態です。
Ctrlキーを押しながら複数のセルを選択した場合は、それぞれを足します。

ステータスバー、名前ボックスなどの場所は、こちらをご参考に。
http://t_shun.at.infoseek.co.jp/My_Page/Excel-REF/ref_top.htm

参考URL：

http://www.microsoft.com/japan/users/tips/Excel/002.asp,http://t_shun.at.infoseek.co.jp/My_Page/Excel-REF/ref_top.htm

回答No.4

cucsna

たびたびすみません。No3です。

No3での回答の中で、
Selection.Count　がセルの数ですが、
これを、
Selection.Columns.Count　にすると列の数
Selection.Rows.Count　にすると行の数
になると思います。

VBAでやれば方法がありますが、
それ以外の方法は、ちょっと思いつきません。
すみません。

回答No.3

cucsna

行の数については、パッと思いつきませんが、
単純にセルの個数を知るだけであれば、VBAで、

Sub セルの個数表示()
　MsgBox Selection.Count
End Sub

で表示はできると思います。
Selection.Countが、選択しているセルの個数です。
ここでは、MsgBoxで表示してみました。

Ctrlキーを押しながら複数のセルを選択した場合でも大丈夫です。

回答No.1

hana-hana3

下記の「オートカルク」はいかがでしょうか？

参考URL：

http://homepage1.nifty.com/kenzo30/ex_kisonyu/ex_ks_nyumon6.htm