Hej

Hur kan jag loopa igenom en sträng för att kolla om varje tecken är en bokstav (A-Ö)???? jag vill alltså kunna omvandla strängen till en array på något sätt!

tack

Är det så här du menar?
<code>
Dim str As String
Dim i As Integer

str = "Hej 1"

For i = 1 To Len(str)
MsgBox Mid(str, i, 1)
Next
</code>

Eftersom jag inte tror att det var det svaret du letade efter så skriver jag detta.

Hur du kollar att varje bokstav är just en bokstav i en sträng.

Dim i as long, s as string
s = "Hellå"
for i = 0 to len(s)-1
if isnumeric(mid(s,i,1) then msgbox "Siffra!"
next i

Vill du använda strängen till en array eller så kan du antingen loopa på samma sätt och använda räknaren för att redimma arrayen.
redim preserve myArr(räknare)

Jag tycker också att du i hjälpen kollar upp funkionerna Join och Split. Mycket trevliga, speciellt då man ska behandla querystrings.

Finns ju mer bokstäver än A-Ö. Ett sätt att kontrollera om ett tecken är en bokstav är att kolla svaret från UCase och LCase:

Function CheckValidText(Text)
Dim Index
Dim Char
For Index = 1 To Len(Text)
Char = Mid$(Text, Index, 1)
If LCase(Char) = UCase(Char) Then
CheckText = True
Exit For
End If
Next
End Function