VBA to loop through an array

[simora]

I have a column (A) with 12 months January to December in a Column.
I have loaded those months into an array like;

Dim myArray     As Variant
 myArray = Application.Transpose(Worksheets("Sheet1").Range("A1:A12"))

I have Sheet names with the names of the Array names

How can I loop through that array to act on cells on each sheet in the array.

Something like

For Each sh In myArray
 sh.Range("D1").Value = DONE

I get an error " Object Required "

Thanks