PDA

View Full Version : test



JONvdHeyden
03-03-2009, 08:21 AM
Function GETELEMENT(ByVal Text As String, ByVal n As Long, Optional ByVal Delimiter As String = " ")

GETELEMENT = Split(Text & String(n - 1, Delimiter), Delimiter)(n - 1)
End Function

just testing presentation of VBA tags on this forum. Looks good.

Ok to delete this post. :)