哭，excel数据怎么分类转置，急求高手指点！！！！

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

A1中从2005-2008年时间循环，我希望可以将其分类转置，即每一个以2005年开始重启一个新行，
即
原来
A1          B1
2005年  35
2006年  36
...
2008年   89
2005年   36
2006年   38
...
2008年   86

变成
2005年  2006年  ...  2008年
  35          36  ...         89
  36          38  ...         86

小女子excel菜鸟一个  怎么也弄不好，样本有上千个，一个个分类来弄，要哭死了，求高手帮忙！！！在线坐等！！万分感谢~~~~~~

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：excel数据 EXCEL exce 高手指点 xcel excel 时间

复制——选择性粘贴——转置

不知道是不是这样

1. 最原始的做法是： 复制-粘贴-选择性粘贴-转置 【这个做法适用于原始数据起始于2005年】

2. 如果数据不是起始于2005年，可以先用数据筛选功能，然后选中筛选后的数据，根据第一步进行转置。

3. 如果有其他的分类标志（唯一的识别标志），转置后可以用vlookup函数寻找。

1、选中目标区域并复制
2、在目标区域外选中要存放数据的起始单元格，右击--“选择性粘贴”--“转置”

添加一个辅助列，剩下的事情用数据透视表或者sumifs都可以搞定。

用vba

Visual Basic code
?
1
2
3
4
5
6
7
8
9
10
Sub test()
    With Sheets("sheet1")
        For i = 1 To .[B65536].End(xlUp).Row
            If Application.WorksheetFunction.CountIf(.Range(.Cells(1, 2), .Cells(i, 2)), .Cells(i, 2)) = 1 Then Sheets("sheet2").Cells(i, 1) = .Cells(i, 2)
            x = Application.WorksheetFunction.Match(.Cells(i, 2), Sheets("sheet2").[A:A], 0)
            Sheets("sheet2").Cells(x, Sheets("sheet2").Cells(x, 256).End(xlToLeft).Column + 1) = .Cells(i, 3)
        Next i
    End With
    MsgBox "搞掂了！"
End Sub