You don't have to select the row, you only have to point to it using a row reference.
With Worksheets("Sheet1").Rows(1)
.RowHeight = .RowHeight * 2
End With
It's much faster that way than actually moving and selecting, and selecting a row has the additional artifact of "opening" all the columns to the right of your data all the way out to column ZZ or whatever.
Hafizullah
@}->-`,--
~~~©~~~©~~~©~~~©~~~©~~~©~~~
[Non-text portions of this message have been removed]
__._,_.___
----------------------------------
Be sure to check out TechTrax Ezine for many, free Excel VBA articles! Go here: http://www.mousetrax.com/techtrax to enter the ezine, then search the ARCHIVES for EXCEL VBA.
----------------------------------
Visit our ExcelVBA group home page for more info and support files:
http://groups.yahoo.com/group/ExcelVBA
----------------------------------
More free tutorials and resources available at:
http://www.mousetrax.com
----------------------------------
Be sure to check out TechTrax Ezine for many, free Excel VBA articles! Go here: http://www.mousetrax.com/techtrax to enter the ezine, then search the ARCHIVES for EXCEL VBA.
----------------------------------
Visit our ExcelVBA group home page for more info and support files:
http://groups.yahoo.com/group/ExcelVBA
----------------------------------
More free tutorials and resources available at:
http://www.mousetrax.com
----------------------------------
MARKETPLACE
.
__,_._,___
Tidak ada komentar:
Posting Komentar