by the way what does the code actually mean.
.Range(Range("A3"), Range("A3").End(xlDown)).Select