[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]
『同じ位置にある個数を数えたい』(ひで)
お世話になります。
業務で表を作成することになり、知恵を貸していただきたく投稿します。
例えば1月の勤務表があったとして、
その日に2人以上勤務していた日は何日あるのか数えたいです。
表の形式としては
日にち 1 2 3 4 5 …
名前
Aさん ○ ○ ○ Bさん ○ ○ Cさん ○ ○ ○
とゆう形式で考えており、
◯を出勤日とした場合、2人以上勤務していた日数は1,2,4の3日間というように求めたいです。
出勤日の表し方は、◯以外でも、もっといいやり方があれば変えていただいても構いません。
何卒よろしくお願いします。
< 使用 Excel:Excel2013、使用 OS:Windows8 >
Sheet1
A B C D E 1 日にち 1 2 3 4 2 Aさん ○ ○ ○ 3 Bさん ○ ○ 4 Cさん ○ ○ ○
Option Explicit Sub main() Dim i As Long Dim rr As Range Dim dstr As String Dim cnt As Long With Worksheets("Sheet1") Set rr = .Range("A1").CurrentRegion For i = 2 To rr.Columns.Count If WorksheetFunction.CountA(.Range(rr(2, i), rr(rr.Rows.Count, i))) >= 2 Then dstr = dstr & rr(1, i) & "," cnt = cnt + 1 End If Next MsgBox Left(dstr, Len(dstr) - 1) & vbCrLf & cnt & " 日間" End With End Sub (隠居じーさん) 2019/01/15(火) 07:11
隠居じーさんさんの表を借りて。 =SUMPRODUCT((COUNTIF(OFFSET(A2:A4,,ROW(1:31)),"○")>1)*1) ではどうか? (ねむねむ) 2019/01/15(火) 09:15
[ 一覧(最新更新順) ]
YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki.
Modified by kazu.