title: Excel VBA Search Button
body: <p>I am trying to use a text box and command button to search my entire workbook for a specific word or value.  For example, "3132" or "Work Instructions".  So far I am able to search the sheet that I am on but I cannot search the rest of the workbook.  Plus, some of the worksheets are hidden.  Any insight to this would be beneficial and help me out a ton!  I have listed my currect program below:</p>
  
  <pre><code>Private Sub CommandButton6_Click()
      Dim strFindWhat As String
      strFindWhat = TextBox1.Text
  
      On Error GoTo ErrorMessage
  
      Cells.Find(What:=strFindWhat, After:=ActiveCell, LookIn:=xlFormulas, LookAt _
          :=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
          False).Select
      Exit Sub
  
      ErrorMessage:
          MsgBox ("The data you are searching for does not exist")
  End Sub
  </code></pre>
  
  <p>Have a good one!</p>