Transpose data into cells base on criteria

[ExcelNoob2004]

I have this:

Slot Position Name Salary Projection
1 C DeMarcus Cousins 10700 48
2 SG James Harden 10200 49
3 PF Terrence Jones 5900 31
4 PG Deron Williams 5800 30
5 PG Reggie Jackson 5100 30
6 SG Kevin Martin 4900 30
7 PF Amar'e Stoudemire 4400 27
8 SF Luc Richard Mbah a Moute 3000 21
Total 50000 266

Need to reorganize into the following:

PG SG SF PF C F G UTIL
1st PG 1st SG 1st SF 1st PF 1stCenter Next Forward Next Guard Last Remaining Player

Each one is a column. Is this even possible?

[skywriter]

Attach a sample workbook. Make sure there is just enough data to demonstrate your need. Include a BEFORE sheet and an AFTER sheet in the workbook if needed to show the process you're trying to complete or automate. Make sure your desired results are shown, mock them up manually if necessary.

Remember to desensitize the data.

Click on GO ADVANCED and use the paperclip icon to open the upload window.

View Pic

[ExcelNoob2004]

Here is an idea of what I am trying to do.

Sample Workbook.xlsx

[karedog]

Maybe :

Sub Test()
  Dim arrSearch, arrIn, arrOut, i As Long, j As Long
  arrSearch = Array("PG", "SG", "SF", "PF", "C", "PF", "PG", "SG")
  arrIn = Sheets("Start").Range("A1").CurrentRegion.Value
  ReDim arrOut(1 To 1, 1 To UBound(arrSearch) + 1)

  For i = 0 To UBound(arrSearch)
      For j = 2 To (UBound(arrIn, 1) - 1)
          If arrIn(j, 2) = arrSearch(i) Then
             arrOut(1, i + 1) = arrIn(j, 3)
             arrIn(j, 2) = ""
             Exit For
          End If
      Next j
  Next i
  Sheets("Finish").Range("A4").Resize(1, UBound(arrOut, 2)).Value = arrOut
End Sub