VBA Cycle Help

Hi.

I need a VBA script to find five-digit numbers where the five-digit number is the addition of each digit raised to the power of 5.

I mean: vwxyz= (v^5)+(w^5)+(x^5)+(y^5)+(z^5) where vwxyz is just the numbers themselves not the product.

I would like to execute it in a cycle to see the other solutions.

Thanks