VBA deleting single digits only

misslizsg · August 4th, 2016, 04:41 AM

Hello all
I am trying to delete numbers from a list. Problem is, if for example I want to delete just '6', it will also delete the 6 from 46. How can I get around this?
This is some part of my code

Code:

If CheckBox1 = True Then
    Word = "1"

    Selection.Replace What:=Word, Replacement:="", LookAt:=xlPart, _
            SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
            ReplaceFormat:=False
End If

If CheckBox2 = True Then
    Word = "2"

    Selection.Replace What:=Word, Replacement:="", LookAt:=xlPart, _
            SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
            ReplaceFormat:=False
End If

Does any one know how to get around this ? Thank you !

Zakalwe · August 4th, 2016, 06:05 AM

Hi.
I thing it has to do with LookAt = xlPart.it needs to be xlWhole.

misslizsg · August 4th, 2016, 06:08 AM

Hey!
I tried that as well but it doesn't work either