removing 2 numbers from a string........

how would i go about removing the number '43' from a string? eg......



'Hello my na43me is bob'


i want to search the string and remove the number


thanks much!

This will do it:[code]Dim sOldStr As String
Dim sNewStr As String

sOldStr = "Hello my na43me is bob" 'could replace this with sOldStr = Trim(Text1) where text1 has the string
sNewStr = Replace(sOldStr, "43", "")
MsgBox sNewStr

Here's a more general approach to the problem that will remove ANY digits from a string (I don't know if you need this, but at the risk of overkill here goes):

Code:

---

Dim strOrigString As String
Dim strNewString As String
Dim strCurrChar As String
Dim intX As Integer
Dim intLen As Integer

' assume strOrigString contains "A1B2C3D4E5"
intLen = Len(strOrigString)
strNewString = ""
For intX = 1 To intLen
    strCurrChar = Mid$(strOrigString, intX, 1)
    If Instr("0123456789", strCurrChar) = 0 Then
        strNewString = strNewString & strCurrChar
    End If
Next
' strNewString should now be "ABCDE"

---

private function NoNum (YourString as String) as String
dim Temp as String
dim i as Integer
For i = 1 to len (YourString)
If IsNumeric (mid (YourString, i, 1)) = False then
Temp$ = Temp$ & mid (YourString, i, 1)
EndIf
Next i
NoNum = Temp$
EndSub

PS use type declaration characters so later you can remember what the datatype was.

it seems to have removed my spaces, causing my code to go retarded, I did format itnicely but that got undone, sorry again...

type-declaration-characters make the code look confusing,
and I usually specify the type of variables in the name...

Code:

---

Dim strMyVar As String
Dim intMyVar As Integer
Dim lngMyVar As Long
Dim dblMyVar As Double
Dim sglMyVar As Single
Dim ccyMyVar As Currency
Dim blnMyVar As Boolean
Dim vntMyVar As Variant
Dim paPoint As POINTAPI

---

Its called Hungarian Notation

For more information on Hungarian Notation, go here: http://forums.vb-world.net/showthrea...4363#post93187

Captain Pinko

If you want your code to look formatted enclose it in Coade tags

write something like this
[code@]
Dim a As Integer 'There are lots of spaces before this comment
[/code@]

but remove the @ characters and it comes out like this

Code:

---

Dim a As Integer    'There are lots of spaces before this comment

---

check Here for other tags