Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
13491 / 13646 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【5157】カウント baby 03/4/23(水) 19:47 質問
【5158】Re:カウント ichinose 03/4/23(水) 19:55 発言
【5159】Re:カウント motomo 03/4/23(水) 21:26 回答
【5170】Re:カウント baby 03/4/24(木) 9:57 発言
【5171】Re:カウント ichinose 03/4/24(木) 10:05 回答
【5174】Re:カウント baby 03/4/24(木) 10:52 発言
【5176】Re:カウント つん 03/4/24(木) 11:19 回答
【5177】Re:カウント baby 03/4/24(木) 11:48 お礼
【5157】カウント
質問  baby  - 03/4/23(水) 19:47 -
引用なし
パスワード
   いくつかの数値などが縦に並んでいるところに
指定した数値がいくつあるか数えるには
どうしたらいいですか？

countというのを使って何度もやっているのですが
できないもので。。。
【5158】Re:カウント
発言  ichinose  - 03/4/23(水) 19:55 -
引用なし
パスワード
   ▼baby さん：
こんばんは。

>いくつかの数値などが縦に並んでいるところに
>指定した数値がいくつあるか数えるには
>どうしたらいいですか？
>
>countというのを使って何度もやっているのですが
>できないもので。。。
Count関数で良いと思いますが、どういう指定をしたのでしょうか？
具体的な内容を記述して下さい。
【5159】Re:カウント
回答  motomo  - 03/4/23(水) 21:26 -
引用なし
パスワード
   babyさん,ichinoseさん　こんばんは。

横レスにて失敬。
COUNTIF関数でいいと思います。

セル"A1"に、
=COUNTIF(A2:A10,3)
と記述すると、

A2〜A10の間で、数字の3が入力されている個数がA1に入ります。

的を外してたらゴメンナサイ。
【5170】Re:カウント
発言  baby  - 03/4/24(木) 9:57 -
引用なし
パスワード
   cnt = CountIf(Range("E1:F10", 80)
のようにマクロで書きたいのですが、
うまくいきませんどのように書いたら
いいのでしょうか？
【5171】Re:カウント
回答  ichinose  - 03/4/24(木) 10:05 -
引用なし
パスワード
   ▼baby さん：
おはようございます。
>cnt = CountIf(Range("E1:F10", 80)
>のようにマクロで書きたいのですが、
>うまくいきませんどのように書いたら
>いいのでしょうか？
マクロの中でワークシート関数を使うと言う事なら、

　　MsgBox WorksheetFunction.CountIf(Range("e1:f10"), 80)

こんな感じです。
【5174】Re:カウント
発言  baby  - 03/4/24(木) 10:52 -
引用なし
パスワード
   ありがとうございます。
>　　MsgBox WorksheetFunction.CountIf(Range("e1:f10"), 80)
例えば
Range("e1:f10")の部分を
cellsでやろうとするときは
どうしたらできますか？

それができれば完璧です。
【5176】Re:カウント
回答  つん E-MAIL  - 03/4/24(木) 11:19 -
引用なし
パスワード
   おはようございます。
横から失礼します〜

>>　　MsgBox WorksheetFunction.CountIf(Range("e1:f10"), 80)
>例えば
>Range("e1:f10")の部分を
>cellsでやろうとするときは
>どうしたらできますか？

MsgBox WorksheetFunction.CountIf(Range(Cells(1, 5), Cells(10, 7)), 80)

こんな感じです。
【5177】Re:カウント
お礼  baby  - 03/4/24(木) 11:48 -
引用なし
パスワード
   つんさん
どうもありがとうです。

考えていた通り完璧にできました。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
13491 / 13646 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free