Excel VBA質問箱 IV

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

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


60926 / 76732 ←次へ | 前へ→

【20433】Re:数字の個数について
回答  かみちゃん  - 04/12/9(木) 6:46 -

引用なし
パスワード
   こんにちは。かみちゃん です。

>C列に1,2,3,4,5と数字がいろいろならんでいるとします。
>
>そのとき、C列に1が何個あるか、C列に2が何個あるか、C列に3が何個あるか・・・

一般操作関数のCOUNTIFでできませんか?
ちなみに、特定の文字列の中から特定の文字の個数を探すのであれば、次のような感じでできると思います。

Option Explicit

Sub Macro1()
 Dim strTmp As String, FindChar As String
 
 FindChar = "1"
 strTmp = Range("C1").Value
 If strTmp <> "" Then
  MsgBox strTmp & " の中にある" & vbCrLf & _
       FindChar & " の個数は" & vbCrLf & _
        UBound(Split(strTmp, FindChar)) & "個です"
 Else
  MsgBox "文字列がありません"
 End If
End Sub

このコードは、セルC1の値の中に「1」が何個あるかを表示します。
1 hits

【20432】数字の個数について キラー 04/12/9(木) 2:16 質問
【20433】Re:数字の個数について かみちゃん 04/12/9(木) 6:46 回答
【20439】Re:数字の個数について キラー 04/12/9(木) 11:44 質問
【20440】Re:数字の個数について IROC 04/12/9(木) 11:53 回答
【20444】Re:数字の個数について キラー 04/12/9(木) 12:28 お礼
【20445】Re:数字の個数について かみちゃん 04/12/9(木) 12:32 発言
【20446】Re:数字の個数について キラー 04/12/9(木) 12:39 質問
【20448】Re:数字の個数について かみちゃん 04/12/9(木) 12:42 回答
【20451】Re:数字の個数について キラー 04/12/9(木) 15:59 お礼
【20452】Re:数字の個数について Kein 04/12/9(木) 16:38 回答
【20457】Re:数字の個数について キラー 04/12/9(木) 18:07 お礼
【20590】Re:数字の個数について カルキン 04/12/13(月) 0:26 質問
【20591】Re:数字の個数について Asaki 04/12/13(月) 0:30 発言
【20596】Re:数字の個数について かみちゃん 04/12/13(月) 6:36 発言
【20597】Re:数字の個数について Asaki 04/12/13(月) 8:54 発言
【20606】Re:数字の個数について カルキン 04/12/13(月) 12:55 質問
【20608】Re:数字の個数について Asaki 04/12/13(月) 13:04 回答

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