Company Contact Contact Contact Contact Contact
Company 1 Jon James Jon Jon Mark
Company 2 Mark Eric Jon Eric
Company 3 Jon Mark Eric
Company 4 Jon
Company 5 Mark Eric James James
列A(会社名)
ではなく、メッセージボックスの、私は、「F5( から値 『PL』をカウントする必要があります(」 Sub Test()
Dim wSheet As Worksheet
Dim myempid As Variant
For Each wSheet In Worksheets
Select Case (wSheet.Name)
Case "Jan", "Feb",