title: How to replace all cells in multiple worksheet except one vba
body: <p>What I want to do is to replace all cell values in the multiple worksheets except one.
  So For example, there are worksheets sheet1, sheet2, sheet3, and I want to replace all the values &quot;M9&quot; into &quot;M8&quot;, but leave M9 in Sheet1 remains unchanged.</p>
  <p>This is my code:</p>
  <pre><code>`For Each Worksheet in WorkSheets
  
       If Worksheet &lt;&gt; ThisWorkbook.Worksheets(&quot;Sheet1&quot;) Then
            Worksheet.Cells.Replace .....
       End if
   Next`
  </code></pre>
  <p>For For-Next, Just ignore the details as it is related to my contents. I thought this logic would have been right, but vba keep on coming up with error.</p>
  <p>Do you know why? And are there any right way to replace the values excluding Sheet1?</p>
  <p>Thanks for your help</p>