All,
Currently, I am working with the following code:
Dry = Array("BALLOTS", "D2", "BALLOTS", "O2")
For d = 0 To UBound(Dry) Step 2
With Sheets(Dry(d))
.Range(Dry(d + 1), .Range(Left(Dry(d + 1), 1) & Rows.Count).End(xlUp)).Copy Sheets("Admin").Range("AA" &...