Extract Top X Maximum Values

How can I extract a list of the top five maximum values from a range of cells. This is similar to using the the "top ten list" in the Auto Filter but I don't want to filter my data in place. Instead I want to extract a list sorted in descending order along with desciption data located in adjacent columns for each maximum value.

In other words take the following list with descriptions in column A and values in column B

Item 1 = 10
Item 2 = 10
Item 3 = 2
Item 4 = 20
Item 5 = 4
Item 6 = 100
Item 7 = 5

and extract the top five values and their desciptions to another location in descending order

Item 6 = 100
Item 4 = 20
Item 1 = 10
Item 2 = 10
Item 7 = 5

I am wondering whether this can be solved with a combination of matching functions and indexing functions or whether I will need VBA code to solve this.