title: Query to retrieve certain cells on access
body: <p>I need to create a query for an Excel book that will, when the sheet is activated:</p>
  
  <p>Query all sheets in the book with a few exceptions<br>
  Retrieve the values of three cells from each sheet<br>
  Post those values to three correlative columns starting from row 4 onwards  </p>
  
  <p>At the moment I'm thinking some sort of array type query (stealing from previous work) along the lines of:</p>
  
  <pre><code>dim ws as worksheet
  dim arrsheets as variant
  dim strsheets as string
  
  for each ws in activeworkbook.sheets
  if ws.index &gt; 1 and not ws.name like "BETA*" (( and herein lies the first hurdle, I need to add some other exceptions?))
  then
  sheet.lmdtmonitor(a4)=ws.sheet(b1)
  sheet.lmdtmonitor(b4)=ws.sheet(f1)
  sheet.lmdtmonitor(c4)=ws.sheet(f2)
  </code></pre>
  
  <p>and then having it loop till it gets to the end, with the a4/b4/c4 above incrementing to a5 > a6 > a7 etc per sheet.</p>