A "sexier" subroutine might be...

Sub RemoveApostrophe()
Dim mystr1 As String, mystr2 As String
mystr1 = "how to remove ' from a string"
mystr2 = Replace(mystr1, "'", "")
End Sub

By the way, note the difference between my Dim statement for mystr1 and
mystr2 and yours. Leaving out the As String declaration for mystr1 make it a
Variant, not a String variable. In VB(A), all variables must be declared as
to their type or else they get declared as a default of Variant (this
differs from other languages you may be familiar with).

Rick


"Flower" wrote in message
...
Hi,

It's not very pretty but it works for me;

Sub removechar()

Dim i, l As Integer
Dim mystr1, mystr2 As String

mystr1 = "how to remove ' from a string"
l = Len(mystr1)

For i = 1 To l
If Mid(mystr1, i, 1) < "'" Then
mystr2 = mystr2 & Mid(mystr1, i, 1)
End If
Next i

End Sub

Ammend to sub or UDf as neccessary.
Hopefully someone else will have a sexier solution!


"NateBuckley" wrote:

Hello is it possible to go through a String checking for certain
characters?

Basically want to somehow convert a String to a character array and go
through it checking for the ' character. Or failing that, is there a
function
that disposes of certain characters within a string.

Cheers.

Nate