Cut and paste if cell matches column heading and delete blank rows

  • Hi


    I need help. I am pretty much a complete newbie when it comes to VBA and not a very clued on one at that. I am trying to find out what subjects students are studying in a year group. At the moment my spreadsheet looks like this


    abc ar
    ms
    gp
    gg
    def en
    sc
    ma
    hi


    And so on, however, I need my sheet to look like this


    ar ms gp gg en sc ma hi (not in that order particularly)
    abc ar ms gp gg
    def en sc ma hi


    I have added my worksheet if it's of any help the student data is on sheet 2.


    Any help with this? Formula or vba would be absolutely fantastic.


    Thanks


    Fazila