Validation list to change columns values

So I've got a drop down list in cell B73 That when I change the selection I want it to copy the cells below it (B74:B94) from one of the charts above it. Through the power of Google I found this: http://www.eggheadcafe.com/conversat...eadid=29484871, someone who had the same need as me, and edited it accordingly to my needs. It however, is not working. I started with Case 1-7 and changed them thinking they need to be the same as the list but that hasn't fixed it either. File is attached, and below quote is what the VBA coding currently says.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Application.Intersect(Range("B73"), Target) Is Nothing Then
Select Case Target.Value
Case Human: Range("B74:B94").Value = Range("B2:B22").Value
Case Elf: Range("B74:B94").Value = Range("C2:C22").Value
Case Drow: Range("B74:B94").Value = Range("D2:D22").Value
Case Dwarf: Range("B74:B94").Value = Range("E2:E22").Value
Case Orc: Range("B74:B94").Value = Range("F2:F22").Value
Case Centaur: Range("B74:B94").Value = Range("G2:G22").Value
Case Gnome: Range("B74:B94").Value = Range("H2:H22").Value
End Select
End If
End Sub