[VBA] Scomporre stringa che non contiene separatori

[Desperado]

Ho una stringa di 10 caratteri composta inizialmente da 3 lettere, poi 3 cifre, poi ancora 4 lettere (es. AAA999AAAA).

Questa stringa, per effettuare dei controlli, dovrei spezzettarla come segue:
1)AAA
2)999
3)AA
4)AA

Qualcuno sa dirmi come fare?

Grazie mille

[GudFella]

le funzioni che devi utilizzare sono:

Left(Stringa, numero caratteri da prendere partendo da sinistra)
Right(Stringa, numero caratteri da prendere partendo da destra)
Mid(Stringa, carattere di inizio, numero caratteri da prendere partendo da carattere inizio)

[Desperado]

Grazie mille!