Try this
Sub Macro5()
'
' Macro5 Macro
'
Application.ScreenUpdating = False
On Error GoTo Err:
Dim cell As Range
ss = InputBox("Enter the Value")
If ss = "" Then Exit Sub
ActiveSheet.Cells.NumberFormat = ";;;"
Range("A1").Activate
Do
Cells.Find(What:=ss, After:=ActiveCell, LookIn:=xlFormulas, LookAt _
:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext,
MatchCase:= _
False, SearchFormat:=False).Activate
ActiveCell.NumberFormat = xlGeneral
Set cell = ActiveCell
Loop Until cell.Row = ActiveSheet.UsedRange.Rows.Count
Err:
If Err.Number <> 0 Then
MsgBox "Data Not Found"
End If
Application.ScreenUpdating = True
End Sub
Sub ShowAll()
Cells.NumberFormat = xlGeneral
End Sub
On Tue, Jul 12, 2011 at 5:26 PM, Azeem Quraishi (HAB5) <aqurai...@ccc.ae>wrote:
> Hi Perfects****
>
> ** **
>
> I need help from you, I have one excel sheet with more Data when I want to
> search data I am using “CONTROL+F typing in the control box particular
> number then selecting same.****
>
> ** **
>
> I need to hide other data except searching shout b on screen.****
>
> ** **
>
> ** **
>
> Hope you will give me better tips****
>
> ** **
>
> *Best Regards*
>
> * *
>
> * *
>
> * *
>
> *Syed Azeem Quraishi*
>
> *Engineering Dept. H5-Project*
>
> * *
>
> P Before printing, think about the environment.****
>
> ** **
>
> --
>
> ----------------------------------------------------------------------------------
> 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
>
--
Regards
Rajan verma
+91 9158998701
--
----------------------------------------------------------------------------------
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
