VBA Out of Stack Space Error 28

I have a drop down list with 8 options. When you select an option I want data from another sheet on the workbook to be copied and pasted onto sheet one. I have done this using 8 separate macro's I recorded. Any help would be great? See below my code:

Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
Application.ScreenUpdating = False

Select Case Range("F11")

Case "1. Texas Windstorm"
   Application.Run ("macro1")

Case "2. Louisiana Windstorm"
   Application.Run ("macro2")

Case "3. San Francisco EQ 6.7"
   Application.Run ("macro3")

Case "4. San Francisco EQ 8.1"
   Application.Run ("macro4")

Case "5. California Flood"
   Application.Run ("macro5")

Case "6. North East USA Windstorm"
   Application.Run ("macro6")

Case "7. Los Angeles Earthquake"
   Application.Run ("macro7")

Case "8. South Korea Windstorm"
   Application.Run ("macro8")




End Select
Application.ScreenUpdating = True

End Sub