How can I fix Run Time Error 1004 sorting problem?

Question

I am very new to VBA and I am trying to sort cells of a table according to name column alphabetically. I use this code to do this:

ResultSheet.Range("A1"