Ora funziona, però ho tolto

if nm = 0 Then Exit For

perchè altrimenti non mi metteva mai il 2^0, senza me lo mette solo per i numeri dispari.

Grazie tantissimo del tuoi aiuto.