Se intendevi dire la prima lettera di ogni parola puoi usare la funzione StrConv:
codice:
Stringa = StrConv(Stringa, vbProperCase)