[[20130215103949]]　『日付が入っているセルをカウントしたい』（まぁ）　ページの最後に飛ぶ

『日付が入っているセルをカウントしたい』（まぁ）

お世話になっております。
エクセル2003を使用しています。

 　　 C　　　　　 　D　　　F
 2   2012/12/01          Ｂ-11　
 3 　　　　　　　　　　　Ｂ-12　
 4   2013/01/05　　　　　Ｂ-13
 5   2013/01/05　　　　　Ｂ-14
 6   該当しない　　　　　Ｂ-15
 7   2013/01/16　　　　　Ｂ-16
 8 　　　　　　　　　　　Ｂ-17　
 9　　　　　　　　　　 　Ｂ-18　
 10　該当しない 　       Ｂ-19
 ・
 ・　
 ・

Ｃ列はブランクだったり、「該当しない」という日本語が入っていたり、日付が入っていたりする資料があるのですが、
Ｃ列に
日付の入ったセル
のみ、Ｄ列でカウントしたいと思っています。

例えば、Ｃ２の場合、Ｄ２に「１」と入り、Ｄ３やＤ６は「０」と入るような数式が
あれば教えてください。

初心者のため、簡単な数式で教えていただけると助かります。

宜しくお願いいたします。

[D2]=ISNUMBER(C2)*1

で下までコピーでどうでしょうか。

（Cod）

 D2 =COUNT(C2)　　下オートフィルでも

 ちなみに最終的には何をしたいんですか？

 （よみびとしらず）

 D4 には　1 といれたいの？　それとも 2 といれたいの？

 (ぶらっと)

返信いただきありがとうございます。

言葉足らずですみません。
このデータは、全件で2000件くらい有ります。
Ｃ列の日付は、その日作業をした日付を入れていくため、
現段階ではブランクもあれば、明日作業をすればＣ列に明日の日付が入るという感じです。
方法は何でも構わないのですが、日付が入っているもののみカウントしたく、
カウントした数を別シート各地域別に集計したいと思っています。
G列には全てにF列の番号に対して該当する都道府県が入ってます。

Cod）様
教えていただきました数式、エクセルに貼り付けてみたのですが、
文字列貼り付けた時のように特に変化が無く、どうしたら数式が反映されるのでしょうか？

お手数お掛けいたしますが、宜しくお願いいたします（まぁ）

 たとえば D2 に　=IF(CELL("format",C2)="D1",1,"")

 これをズリズリ下にひっぱると日付は 1、文字列や数字や空白は　空白になると思う。

 (ぶらっと)

 ２０００件もあったり、その結果を地域別にまとめて別シートに集計するということなら
 マクロでやったほうがいいかも。集計の要件によってはフィルターオプションなんかがいいと思うけど
 以下は、とりあえず、力技で集計結果を表示。

 Sub Sample()
    Dim dic As Object
    Dim c As Range
    Dim dist As String
    Dim v() As Variant
    Dim d As Variant
    Dim k As Long

    Set dic = CreateObject("Scripting.Dictionary")

    With Sheets("Sheet1")
        For Each c In .Range("C2", .Range("C" & .Rows.Count).End(xlUp))
            If IsDate(c.Value) Then dic(c.Offset(, 4).Value) = dic(c.Offset(, 4).Value) + 1
        Next
    End With

    If dic.Count = 0 Then
        MsgBox "日付が入ったデータはなかったです～～"
        Exit Sub
    End If

    ReDim v(1 To dic.Count)

    For Each d In dic
        k = k + 1
        v(k) = d & " : " & dic(d)
    Next

    MsgBox "日付がはいった件数は以下の通りでした" & vbLf & Join(v, vbLf)

 End Sub

 (ぶらっと)

 小出しに情報出してるけど、結局何をしたいのかよくわからない。

 C列には日付以外の数値を入力することがあるんですか？

 都道府県別・F列の項目別に日付（数値）が入っている個数を集計したいってことなら
 ピボットテーブルで十分。

 （よみびとしらず）

おそらく　左辺（どのセルに張り付けるのかの説明用に記述してあります）も
貼り付けているからではないでしょうか。

[D2]=ISNUMBER(C2)*1 　の　右部分（=を含めて右側の数式）を　D2　に貼り付けて
2000行分下までフィルします。

●　『=ISNUMBER(C2)*1』のカッコは外してくださいねえ。

他の方の例も同じく　貼り付けるのは　＝　から右側になります。

返信、ありがとうございました。
問題、無事に解決することができ、大変助かりました。
ISNUMBER、IF(CELL)関数・・。色々な関数があり、とても勉強になりました。
今回の問題はISNUMBERで解決させていただきました。
ﾏｸﾛも使用してみたいのですが、まだまだ関数時点で躓いている初心者のため、ﾏｸﾛとは？から
見てみようと思います。
(ぶらっと)様の方法で１つ質問があります。
Ｃ列に日付を入れてみて、その日付を消したのですが、Ｄ列に「１」が立ったままになります。
これは、どうしたら消えるのでしょうか？
（まぁ）

 >Ｃ列に日付を入れてみて、その日付を消したのですが、Ｄ列に「１」が立ったままになります。

 あぁ！そうか！！　エクセル素人が慣れない回答をするもんじゃないねぇ。
 表示書式を判定しているのでいったん日付型の値が入れば、そこにどんな値をいれようと表示書式は日付型のままだね。

 提案撤回。無視してください。

 (ぶらっと)

 この質問者、もしかしてわざと無視してる？

 （よみびとしらず）

(ぶらっと)様、ありがとうございました。「こういう検索もできるんだな」と
勉強になりましたので大変勉強になりました。
(よみびとしらず）様、すみません。無視はしておらず、回答いただいたこと大変感謝しております。
今回は、ISNUMBERの関数で解決できたため、ピボットテーブルが必要になりました際には、
またご教授いただけると助かります。
ありがとうございました（まぁ）

 ピボットテーブルのことだけと違うんですけどね。

 D列に「1」か「0」が入れば、あとの集計はできるということやったら
 ピボットテーブル云々はどうでもいいです。

 COUNT関数での回答も提示したんやけど、わかってます？ 
 わかっててISNUMBERで解決したというんなら、これもそれはそれでいいです。

 もうひとつ、一応念のために確認した ↓ の質問に対する返事もないんやけど？

 > C列には日付以外の数値を入力することがあるんですか？

 （よみびとしらず）

（よみびとしらず）様、Ｃ列には、数値で言えば日付以外の入力は行う事は無いです。
COUNT関数で出来ました。
今回は使ったことが無いISNUMBER関数でチャレンジしてみようと思い、そちらだけに注視してしまったため、スミマセンでした。回答いただきましてありがとうございました。初心者なので大変助かりました。

コメント返信：

[ 一覧(最新更新順) ]

[[20130215103949]] 『日付が入っているセルをカウントしたい』（まぁ） ページの最後に飛ぶ

[[20130215103949]]　『日付が入っているセルをカウントしたい』（まぁ）　ページの最後に飛ぶ