[[20190107131132]]　『現在人数をマクロで』（ooshi）　ページの最後に飛ぶ

『現在人数をマクロで』（ooshi）

excel超初心者です。
利用表をexcelで作成していますが、現在の人数をマクロボタンで分かるようにしたいです。

当日、どんどん人数が減っていく表なので、今現在の人数が分かるようにボタンを作成したいと思っていますが、やり方がわかりません。
お願いします。

＜使用 Excel：Excel2016、使用 OS：Windows7 ＞

 情報が少なすぎて無理です。
 少なくともサンプルデータの表を提示してください。
（TAKA） 2019/01/07(月) 13:45

つたない文章で申し訳ありません。

1行目に
名前　開始時刻　終了時刻

2行目から下記のようなリストがでます。
Aさん　11：30　12：30
Bさん　11：30　14：00
Cさん　11：30
Dさん　11：30

開始はしたが、終了をしていない人数をマクロボタンで分かるように作成したいです。
上記であれば「2」と出てほしいです。

宜しくお願いします。
（ooshi） 2019/01/07(月) 14:01

関数で常に表示しておくこともできますけど、、
マクロ例です。

 Sub TEST()
    Dim Counter As Long, i As Long
    With ThisWorkbook.Sheets("Sheet1")
        For i = 2 To .Cells(.Rows.Count, "A").End(xlUp).Row
            If .Cells(i, "B") <> "" And .Cells(i, "C") = "" Then
                Counter = Counter + 1
            End If
        Next i
    End With
    MsgBox Counter
 End Sub

（TAKA） 2019/01/07(月) 14:13

返信ありがとうございます。
関数で常に表示するなんて事が出来るなんて思ってもいませんでした。
初心者ですみません。

関数ではどのようにやるのかを教えて頂けると助かります！
宜しくお願いします！
（ooshi） 2019/01/07(月) 17:44

余計なお世話でしょうけど、↓のCさんみたいに、開始していない場合はどうするんでしょう？

   __A_______B_________C_____
 1 名前  開始時刻  終了時刻  
 2 Aさん  11：30    12：30 
 3 Bさん  11：30    14：00 
 4 Cさん　
 5 Dさん  11：30

踏まえて
＞開始はしたが、終了をしていない
これを、B列が0以上（シリアル値で考えてください）、C列が""（０字の文字列として考えてください）であるセルの数と考えて、

 =COUNTIFS(B2:B5,">0",C2:C5,"")

としてみてはどうでしょうか。

（もこな２） 2019/01/07(月) 23:00

返信ありがとうございます。
Cさんのような開始時刻がない場合にはこの表には記載しないので大丈夫です！
理想通りの表が出来ました！
有難うございました。
（ooshi） 2019/01/08(火) 10:43

コメント返信：

[ 一覧(最新更新順) ]

[[20190107131132]] 『現在人数をマクロで』（ooshi） ページの最後に飛ぶ

[[20190107131132]]　『現在人数をマクロで』（ooshi）　ページの最後に飛ぶ