having semicolon list in table field

[frobo]

how i can iterate with vba code through a semicolon seperated list saved in a table field?

tia

 

[PHV]

Take a look at the Split function (ac2k or above).

Hope This Helps, PH.
Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884 or FAQ181-2886

 

[jebry]

Hi!

If you don't have the split fuction available try this:

Dim lngPosition As Long
Dim lngFirstPosition As Long
Dim strInformation As String

lngFirstPosition = 0
lngPosition = InStr(YourDelimitedString, ";")
While lngPosition <> 0
If lngFirstPosition = 0 Then
strInformation = Left(YourDelimitedString, lngPosition - 1)
Else
strInformation = Mid(YourDelimitedString, lngFirstPosition + 1, lngPosition - lngFirstPostion - 1)
End If
(Do your stuff to strInformation here)
strFirstPosition = strPosition
strPosition = InStr(strPosition + 1, YourDelimitedString, ";")
Loop

hth


Jeff Bridgham
bridgham@purdue.edu