试着用函数公式来解决一下：

1、以N列为辅助列，在N2输入0，在N3单元格输入以下公式，然后向下填充公式

=COUNTA(B$3:M3)

2、在P3单元格输入以下公式，然后向下填充公式

=IF(ROW(A1)>N$6,,LOOKUP(ROW(A1)-1,N$2:N$5,A$3:A$6))

3、在Q3单元格输入以下公式数组公式，按Ctrl+Shift+Enter组合键结束，然后向下填充公式

=INDEX(OFFSET(B$2:M$2,MATCH(P3,A$3:A$6,0),),SMALL(IF(OFFSET(B$2:M$2,MATCH(P3,A$3:A$6,0),)<>,COLUMN(B:M)-1,4^8),COUNTIF(P$3:P3,P3)))

4、在R3单元格输入以下公式，然后向下填充公式

=LOOKUP(1,0/(OFFSET(B$2:M$2,MATCH($P3,A$3:A$6,0),)=$Q3),B$1:M$1)

5、在S3单元格输入以下公式，然后向下填充公式

=LOOKUP(1,0/(OFFSET(B$2:M$2,MATCH($P3,A$3:A$6,0),)=$Q3),B$2:M$2)

用公式，要用数组公式，有点繁琐

直接用编程，要简单点