Du kan ju använda funktionen Split()
Sv: Instr funktionen
Svara
<code>
Dim ord
Dim ord5 as String
ord = Split(text," ") 'Splitar texten efter mellanslag
ord5 = ord(5) 'Plockar ut det 5:e ordet ut texten 'text'
</code>