Search Group of Numbers in Cel Rangel and Highligh matched numbers.

Hi !!

Me again.. sorry to bother you Dear Forum members,

I Know a bit how to do this search on the rudimentary way when each number is in each cell Using a
very Long =COUNTIF Function and write it in about 525 cell.


Might it is a New way to do it, so i Need an expertise on this thinghui..
(i searched for help in older post, but not luck)

Here the Problem :

In Cell G4 to G109 have Set of between 0 to 20 Numbers groups

So

On Cell G2 I want to enter a group of Numbers to be search in Cell range G4 to G109


Then Highlight in "Red" The matched Numbers in (G4:G109)


Help is Appreciated !!!!!


search-and-Highlight.png


Thanks !!!


Best Regards from Miami.

David

Try

Option Explicit

Sub test()
    Dim r As Range, m As Object, myPtn As String
    With CreateObject("VBScript.RegExp")
        .Global = True
        .Pattern = "\D+"
        myPtn = "\b" & .Replace(Range("g2").Value, "|") & "\b"
        .Pattern = myPtn
        For Each r In Range("g4", Range("g" & Rows.Count).End(xlUp))
            r.Font.ColorIndex = xlAutomatic
            For Each m In .Execute(r.Value)
                r.Characters(m.firstindex + 1, m.Length).Font.Color = vbRed
            Next
        Next
    End With
End Sub

Mr FDibbings

Thanks for the Code Tags adding


Best Regards

David

Hi Mr FDibbins,

Yes, you're Right

Here is the file Link https://dl.dropbox.com/u/70638562/V1...0%23Dic21.xlsm

Thank you !


Best regards

David

You must edit your last post and wrap the code with the code tag. It is a MUST rule here.
i.e
[code]
Your code here
[/code]

If the attached is not what you want, you need to post your workbook.

Hi Mr Jindon,

I'm sorry, it was my mistake..

I post a Link with the excel workbook (using DropBox)


Best Regards

David

You can't change font color partially when the cell is either Number/result from then formula.

It needs to be converted to constant string value.

Hi Mr Jindon,





I set the Range Cells G4 to G109 with the same color and font (it's partially) and it won't work,

Just asking :

On the workbook sample that you've sent, The numbers to be search (that you input it on G2)
and the Groups to be searched have Space between. (not character)

In my Workbook it have a Character "-" between each numbers, that matter or is supposed to work either way?



Thank you sir


Best Regards

David

See my previous post. #8

Hi Mr Jindon,



Okaii.. , .... (I need lot of school...Smile )





Thank you so much.


Best Regards


David

Hi Mr Jindon,

Yes, i'm going to rename the Code, By the Way tha't is the code that you Send me on a workbook named "Sample with Code"
and the name of the Code was "test", so i renamed..

Thank you very Much, i think in that point is located the problem..


Thank you again,


Best Regards

David