title: Populating range from array
body: <p>I have a worksheet change event that runs when three adjacent cells in columns C, D and E are filled with any value, which puts the date of entry into a separate worksheet as well as the name of the sheet where the data was captured from.</p>
  <p>Then the code is supposed to count all instances of those dates for each day of the year.</p>
  <p>If I step through the array FrstLetter is outputting the correct value.<br />
  Where I'm struggling: it then outputs said value back via <code>application.transpose(myarray)</code> as no value is input when it loops through.</p>
  <pre class="lang-vb prettyprint-override"><code>With Sheets(&quot;Log&quot;)
      For RowCount = 1 To 60
  
          Select Case RowCount
  
          Case 2, 7, 12, 17, 22, 27, 32, 37, 42, 47, 52, 57
              LastRow = .Range(&quot;A&quot; &amp; .Rows.Count).End(xlUp).Row
              DateRange = WorksheetFunction.CountA(.Range(&quot;F&quot; &amp; RowCount &amp; &quot;:AJ&quot; &amp; RowCount))
              For TypCount = 1 To 3
                  SheetIdent = .Cells(RowCount + TypCount, 5).Value
                  For ClmnNmbr = 1 To DateRange
                      ReDim AddrArr(DateRange)
                      AddrArr(ClmnNmbr) = .Cells(RowCount, ClmnNmbr + 5).Value
  
                      Set arrDates = .Range(&quot;A60:A&quot; &amp; LastRow)
                      Set shtNames = .Range(&quot;B60:B&quot; &amp; LastRow)
                      
                      ReDim FrstLetter(DateRange)
                      FrstLetter(ClmnNmbr) = Application.CountIfs(arrDates, AddrArr(ClmnNmbr), shtNames, SheetIdent)
  
                      Worksheets(&quot;Log&quot;).Cells(TypCount + RowCount, ClmnNmbr + 5).Value = Application.Transpose(FrstLetter)
                  Next ClmnNmbr
              Next TypCount
  
          Case Else
          
          End Select
      Next RowCount
                          
  End With
  </code></pre>
  <p>I have a feeling I'm messing up somewhere with the transpose because everything else seems to work.</p>