|re: Poser 1. I would like to copy the range ("F4") to Column("K") on the Row ("B").end(xlDown) to Sheets("2").Range("G10")|
I'm pretty sure I told you every thing you need to know to do this.
Just change the pertinent portions of the line I posted in Response #3:
Range("F4:K" & Range("L9").End(xlDown).Row).Copy _
As Marine Gunny Highway (Clint Eastwood) once said "Improvise, adapt and overcome."
re: Poser 2. With the range in Sheets("2") still selected I would like to Sort on column ("H")
Once again, we are not going to Select any ranges. We can sort it directly without Selecting it.
'Determine last Row of Pasted range
'The copy started in Row 4 but was pasted into
'Row 10, so the last Row of the pasted Range
'is 6 Rows farther down than the last Row of
'data in Sheet1 Column B
rngRow = Sheets(1).Range("B9").End(xlDown).Row + 6
'Sort the pasted range, keyed on Column H
Sheets(2).Range("G10:L" & rngRow).Sort _