Transpose the Data using VBA

    I have data as below in Excel [TABLE="border: 0, cellpadding: 0, cellspacing: 0"]

    [tr]


    [TD="width: 64"]Name[/TD]
    [TD="width: 64"]PROJECT[/TD]
    [TD="width: 64"]Task[/TD]
    [TD="width: 64, align: right"]43101[/TD]
    [TD="width: 64, align: right"]43102[/TD]
    [TD="width: 64, align: right"]43103[/TD]
    [TD="width: 64, align: right"]43104[/TD]
    [TD="width: 64, align: right"]43105[/TD]

    [/tr]


    [tr]


    [td]

    Emp 1

    [/td]


    [td]

    Project A

    [/td]


    [td]

    SA

    [/td]


    [TD="align: right"]8[/TD]
    [TD="align: right"]8[/TD]
    [TD="align: right"]8[/TD]
    [TD="align: right"]8[/TD]
    [TD="align: right"]8[/TD]

    [/tr]


    [tr]


    [td]

    Emp 1

    [/td]


    [td]

    Project A

    [/td]


    [td]

    BA

    [/td]


    [TD="align: right"]8[/TD]
    [TD="align: right"]8[/TD]
    [TD="align: right"]8[/TD]
    [TD="align: right"]8[/TD]
    [TD="align: right"]8[/TD]

    [/tr]


    [tr]


    [td]

    Emp 2

    [/td]


    [td]

    Project A

    [/td]


    [td]

    DM

    [/td]


    [TD="align: right"]8[/TD]
    [TD="align: right"]8[/TD]
    [TD="align: right"]8[/TD]
    [TD="align: right"]8[/TD]
    [TD="align: right"]8[/TD]

    [/tr]


    [tr]


    [td]

    Emp 3

    [/td]


    [td]

    Project A

    [/td]


    [td]

    SE

    [/td]


    [TD="align: right"]8[/TD]
    [TD="align: right"]8[/TD]
    [TD="align: right"]8[/TD]
    [TD="align: right"]8[/TD]
    [TD="align: right"]8[/TD]

    [/tr]


    [tr]


    [td]

    Emp 4

    [/td]


    [td]

    Project A

    [/td]


    [td]

    SE

    [/td]


    [TD="align: right"]8[/TD]
    [TD="align: right"]8[/TD]
    [TD="align: right"]8[/TD]
    [TD="align: right"]8[/TD]
    [TD="align: right"]8[/TD]

    [/tr]


    [tr]


    [td]

    Emp 5

    [/td]


    [td]

    Holiday

    [/td]


    [td]

    QA

    [/td]


    [td][/td]


    [td][/td]


    [td][/td]


    [td][/td]


    [td][/td]


    [/tr]


    [/TABLE]
    I need help in creating a macro to transpose these values as below [TABLE="border: 0, cellpadding: 0, cellspacing: 0"]

    [tr]


    [TD="width: 64"]Name[/TD]
    [TD="width: 64"]PROJECT[/TD]
    [TD="width: 64"]Task[/TD]
    [TD="width: 64"]Date[/TD]
    [TD="width: 64"]Hours[/TD]

    [/tr]


    [tr]


    [td]

    Emp 1

    [/td]


    [td]

    Project A

    [/td]


    [td]

    SA

    [/td]


    [TD="align: right"]1/1/2018[/TD]
    [TD="align: right"]8[/TD]

    [/tr]


    [tr]


    [td]

    Emp 1

    [/td]


    [td]

    Project A

    [/td]


    [td]

    BA

    [/td]


    [TD="align: right"]1/1/2018[/TD]
    [TD="align: right"]8[/TD]

    [/tr]


    [tr]


    [td]

    Emp 2

    [/td]


    [td]

    Project A

    [/td]


    [td]

    DM

    [/td]


    [TD="align: right"]1/1/2018[/TD]
    [TD="align: right"]8[/TD]

    [/tr]


    [tr]


    [td]

    Emp 3

    [/td]


    [td]

    Project A

    [/td]


    [td]

    SE

    [/td]


    [TD="align: right"]1/1/2018[/TD]
    [TD="align: right"]8[/TD]

    [/tr]


    [tr]


    [td]

    Emp 4

    [/td]


    [td]

    Project A

    [/td]


    [td]

    SE

    [/td]


    [TD="align: right"]1/1/2018[/TD]
    [TD="align: right"]8[/TD]

    [/tr]


    [tr]


    [td]

    Emp 5

    [/td]


    [td]

    Holiday

    [/td]


    [td]

    QA

    [/td]


    [TD="align: right"]1/1/2018[/TD]

    [td][/td]


    [/tr]


    [tr]


    [td]

    Emp 1

    [/td]


    [td]

    Project A

    [/td]


    [td]

    SA

    [/td]


    [TD="align: right"]1/2/2018[/TD]
    [TD="align: right"]8[/TD]

    [/tr]


    [tr]


    [td]

    Emp 1

    [/td]


    [td]

    Project A

    [/td]


    [td]

    BA

    [/td]


    [TD="align: right"]1/2/2018[/TD]
    [TD="align: right"]8[/TD]

    [/tr]


    [tr]


    [td]

    Emp 2

    [/td]


    [td]

    Project A

    [/td]


    [td]

    DM

    [/td]


    [TD="align: right"]1/2/2018[/TD]
    [TD="align: right"]8[/TD]

    [/tr]


    [tr]


    [td]

    Emp 3

    [/td]


    [td]

    Project A

    [/td]


    [td]

    SE

    [/td]


    [TD="align: right"]1/2/2018[/TD]
    [TD="align: right"]8[/TD]

    [/tr]


    [tr]


    [td]

    Emp 4

    [/td]


    [td]

    Project A

    [/td]


    [td]

    SE

    [/td]


    [TD="align: right"]1/2/2018[/TD]
    [TD="align: right"]8[/TD]

    [/tr]


    [tr]


    [td]

    Emp 5

    [/td]


    [td]

    Holiday

    [/td]


    [td]

    QA

    [/td]


    [TD="align: right"]1/2/2018[/TD]

    [td][/td]


    [/tr]


    [tr]


    [td]

    Emp 1

    [/td]


    [td]

    Project A

    [/td]


    [td]

    SA

    [/td]


    [TD="align: right"]1/3/2018[/TD]
    [TD="align: right"]8[/TD]

    [/tr]


    [tr]


    [td]

    Emp 1

    [/td]


    [td]

    Project A

    [/td]


    [td]

    BA

    [/td]


    [TD="align: right"]1/3/2018[/TD]
    [TD="align: right"]8[/TD]

    [/tr]


    [tr]


    [td]

    Emp 2

    [/td]


    [td]

    Project A

    [/td]


    [td]

    DM

    [/td]


    [TD="align: right"]1/3/2018[/TD]
    [TD="align: right"]8[/TD]

    [/tr]


    [tr]


    [td]

    Emp 3

    [/td]


    [td]

    Project A

    [/td]


    [td]

    SE

    [/td]


    [TD="align: right"]1/3/2018[/TD]
    [TD="align: right"]8[/TD]

    [/tr]


    [tr]


    [td]

    Emp 4

    [/td]


    [td]

    Project A

    [/td]


    [td]

    SE

    [/td]


    [TD="align: right"]1/3/2018[/TD]
    [TD="align: right"]8[/TD]

    [/tr]


    [tr]


    [td]

    Emp 5

    [/td]


    [td]

    Holiday

    [/td]


    [td]

    QA

    [/td]


    [TD="align: right"]1/3/2018[/TD]

    [td][/td]


    [/tr]


    [tr]


    [td]

    Emp 1

    [/td]


    [td]

    Project A

    [/td]


    [td]

    SA

    [/td]


    [TD="align: right"]1/4/2018[/TD]
    [TD="align: right"]8[/TD]

    [/tr]


    [tr]


    [td]

    Emp 1

    [/td]


    [td]

    Project A

    [/td]


    [td]

    BA

    [/td]


    [TD="align: right"]1/4/2018[/TD]
    [TD="align: right"]8[/TD]

    [/tr]


    [tr]


    [td]

    Emp 2

    [/td]


    [td]

    Project A

    [/td]


    [td]

    DM

    [/td]


    [TD="align: right"]1/4/2018[/TD]
    [TD="align: right"]8[/TD]

    [/tr]


    [tr]


    [td]

    Emp 3

    [/td]


    [td]

    Project A

    [/td]


    [td]

    SE

    [/td]


    [TD="align: right"]1/4/2018[/TD]
    [TD="align: right"]8[/TD]

    [/tr]


    [tr]


    [td]

    Emp 4

    [/td]


    [td]

    Project A

    [/td]


    [td]

    SE

    [/td]


    [TD="align: right"]1/4/2018[/TD]
    [TD="align: right"]8[/TD]

    [/tr]


    [tr]


    [td]

    Emp 5

    [/td]


    [td]

    Holiday

    [/td]


    [td]

    QA

    [/td]


    [TD="align: right"]1/4/2018[/TD]

    [td][/td]


    [/tr]


    [tr]


    [td]

    Emp 1

    [/td]


    [td]

    Project A

    [/td]


    [td]

    SA

    [/td]


    [TD="align: right"]1/5/2018[/TD]
    [TD="align: right"]8[/TD]

    [/tr]


    [tr]


    [td]

    Emp 1

    [/td]


    [td]

    Project A

    [/td]


    [td]

    BA

    [/td]


    [TD="align: right"]1/5/2018[/TD]
    [TD="align: right"]8[/TD]

    [/tr]


    [tr]


    [td]

    Emp 2

    [/td]


    [td]

    Project A

    [/td]


    [td]

    DM

    [/td]


    [TD="align: right"]1/5/2018[/TD]
    [TD="align: right"]8[/TD]

    [/tr]


    [tr]


    [td]

    Emp 3

    [/td]


    [td]

    Project A

    [/td]


    [td]

    SE

    [/td]


    [TD="align: right"]1/5/2018[/TD]
    [TD="align: right"]8[/TD]

    [/tr]


    [tr]


    [td]

    Emp 4

    [/td]


    [td]

    Project A

    [/td]


    [td]

    SE

    [/td]


    [TD="align: right"]1/5/2018[/TD]
    [TD="align: right"]8[/TD]

    [/tr]


    [tr]


    [td]

    Emp 5

    [/td]


    [td]

    Holiday

    [/td]


    [td]

    QA

    [/td]


    [TD="align: right"]1/5/2018[/TD]

    [td][/td]


    [/tr]


    [/TABLE]

Participate now!

Don’t have an account yet? Register yourself now and be a part of our community!

Register Yourself Login