title: Excel VBA: Consolidate the iterating group in "For Each" block
body: <p>I found the concatenation/appending of two arrays to be a too cumbersome process for my example. But how to iterate through two arrays of sheets using For Each in a single block (how to shorten the following code)?</p>
  
  <pre><code>arr1 = Array("Sheet2", "Sheet3")
  arr2 = Array("Sheet5", "Sheet6")
  
  For Each sh In Sheets(arr1)
  sh.Visible = True
  Next sh
  
  For Each sh In Sheets(arr2)
  sh.Visible = True
  Next sh
  </code></pre>