Macro que ingrese folio de MPI17001+1

[Hola 

Sub macro1()
Range("F10") = "MPI" & 170001 + 1
End Sub

Valora la respuesta para finalizar

pero si quiero seguir ejecutando y me ponga +1 cada vez que ejecute la macro como le hago.??

Te paso la macro actualizada

Sub macro1()
    If Range("F10") = "" Then
        Range("F10") = "MPI" & 170001
    Else
        num = Mid(Range("F10"), 4, 9)
        x = Val(num) + 1
        Range("F10") = "MPI" & x
    End If
End Sub

Funciona muy bien. 

hay alguna forma de que si quiero implementar otro folio con una macro distinta, este se guarde en el ultimo folio que se creo.? 

el primer folio fue MPI17001 y termino de usarse en el 50

y usare otro en la misma celda pero con MPP17001.

mi intencion es que guarde como el folio del primer macro y cuando la vuelva a ejecutar me ponga +1 en el primero 

lo mismo para el segundo folio..