Try this modification
with found.Cells.borders
.LineStyle = xlContinuous
.Weight = xlThick
.ColorIndex = 3
End With
Temp = MsgBox(prompt:="Clear borders", Title:="Excel Find",
Buttons:=vbOKCancel + vbQuestion)
If Temp = vbOK Then found.Cells..LineStyle = xlNone
End If
Don Guillett
SalesAid Software
dguille...@gmail.com
-----Original Message-----
From: satish
Sent: Monday, October 10, 2011 6:34 AM
To: MS EXCEL AND VBA MACROS
Subject: Re: $$Excel-Macros$$ Want to Highlight find Cell
Hi,
I try that one, but it show compile error, basically I want to change
the border colour in to thick black or red. Even I don't want to
colour the entire cell.
Thanks and Regards
SATISH
On Oct 8, 9:07 am, Mahesh parab <mahes...@gmail.com> wrote:
Hi
Try:
Sub Mtest()
Dim found As Range
Dim m As String, Temp As String
Dim count As Integer
Dim ws As Worksheet
count = 0
m = InputBox(prompt:="Enter value for search", Title:="Excel Find")
For Each ws In ActiveWorkbook.Worksheets
Set found = ws.Cells.Find(What:=m, LookIn:=xlValues, lookat:=xlPart)
If Not found Is Nothing Then
count = count + 1
MsgBox found.Worksheet.Name & found.Cells.Address, Title:="Excel Find"
found.Cells.Interior.ColorIndex = 6
Temp = MsgBox(prompt:="Clear highlighting", Title:="Excel Find",
Buttons:=vbOKCancel + vbQuestion)
If Temp = vbOK Then found.Cells.Interior.ColorIndex = xlNone
End If
Next ws
If count = 0 Then MsgBox prompt:="Not found", Title:="Excel Find"
End Sub
HTH
Mahesh
On Sat, Oct 8, 2011 at 12:41 PM, B.N.Chethan kumar <
chetankumar1...@gmail.com> wrote:
> Hi,
> you give a name to cell...by using name manager,,,,and later need u call
> name to .
> i have attached sample file for easy understanding
> Regards
> Chethan Kumar BN
> On Fri, Oct 7, 2011 at 7:36 PM, satish
> <narbhaviwithsatishku...@gmail.com>wrote:
>> Dear all,
>> Sometimes I work with large data, if i want to find some data,
>> normally I type the key word in find option, I want to highlight the
>> cell with some colour to view it clearly, which cell is highlighted.
>> Normally it goes to cell but i have some problem ( eye sight).
>> Thanks in advance
>> --
>> ---------------------------------------------------------------------------
>> -------
>> Some important links for excel users:
>> 1. Follow us on TWITTER for tips tricks and links :
>>http://twitter.com/exceldailytip
>> 2. Join our LinkedIN group @http://www.linkedin.com/groups?gid=1871310
>> 3. Excel tutorials athttp://www.excel-macros.blogspot.com
>> 4. Learn VBA Macros athttp://www.quickvba.blogspot.com
>> 5. Excel Tips and Tricks athttp://exceldailytip.blogspot.com
>> To post to this group, send email to excel-macros@googlegroups.com
>> <><><><><><><><><><><><><><><><><><><><><><>
>> Like our page on facebook , Just follow below link
>>http://www.facebook.com/discussexcel
> --
> B.N Chetan kumar
> --
> ---------------------------------------------------------------------------
> -------
> Some important links for excel users:
> 1. Follow us on TWITTER for tips tricks and links :
>http://twitter.com/exceldailytip
> 2. Join our LinkedIN group @http://www.linkedin.com/groups?gid=1871310
> 3. Excel tutorials athttp://www.excel-macros.blogspot.com
> 4. Learn VBA Macros athttp://www.quickvba.blogspot.com
> 5. Excel Tips and Tricks athttp://exceldailytip.blogspot.com
> To post to this group, send email to excel-macros@googlegroups.com
> <><><><><><><><><><><><><><><><><><><><><><>
> Like our page on facebook , Just follow below link
>http://www.facebook.com/discussexcel
--
----------------------------------------------------------------------------------
Some important links for excel users:
1. Follow us on TWITTER for tips tricks and links :
http://twitter.com/exceldailytip
2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
3. Excel tutorials at http://www.excel-macros.blogspot.com
4. Learn VBA Macros at http://www.quickvba.blogspot.com
5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
To post to this group, send email to excel-macros@googlegroups.com
<><><><><><><><><><><><><><><><><><><><><><>
Like our page on facebook , Just follow below link
http://www.facebook.com/discussexcel
--
----------------------------------------------------------------------------------
Some important links for excel users:
1. Follow us on TWITTER for tips tricks and links :
http://twitter.com/exceldailytip
2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
3. Excel tutorials at http://www.excel-macros.blogspot.com
4. Learn VBA Macros at http://www.quickvba.blogspot.com
5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
To post to this group, send email to excel-macros@googlegroups.com
<><><><><><><><><><><><><><><><><><><><><><>
Like our page on facebook , Just follow below link
http://www.facebook.com/discussexcel
