title: Find Maximum Value for a column in different sheets and report it in result sheet
body: <p>I want to check <code>Column A</code> (<em>A1:A365</em>)  in <code>Sheet2</code>, <code>Sheet3</code>, <code>Sheet4</code> and <code>Sheet5</code> and find <strong>Maximum</strong> value for each cell. Compare <code>A1</code> in <code>Sheet2</code>, <code>Sheet3</code>, <code>Sheet4</code> and <code>Sheet5</code>, find maximum of it and report it in <code>A1</code> in result page. Also in cell <code>B1</code> report corresponding sheet for this maximum. This goes on to <code>Column A</code> (<em>A1:A365</em>)</p>
  
  <p><img src="https://i.stack.imgur.com/G4cLJ.png" alt="enter image description here"></p>
  
  <p>the following code i used:</p>
  
  <pre><code>    Worksheets("sheet2").Range("A1").Value = a
      Worksheets("sheet3").Range("A1").Value = b
      Worksheets("sheet4").Range("A1").Value = c
      Worksheets("sheet5").Range("A1").Value = d
      MaxValue = Application.Max(a, b, c, d)
      Range("A1").Value = MaxValue
  </code></pre>