Tried and true copy code lines fail me here
On Tuesday, December 10, 2013 11:15:42 AM UTC-8, Claus Busch wrote:
Hi again,
Am Tue, 10 Dec 2013 20:12:07 +0100 schrieb Claus Busch:
Sheets(MyArr(i)).Range("B" & Rows.Count) _
.End(xlUp)(2).Resize(columnsize:=74) = varOut
sorry, typo. Change the line above:
Sheets(MyArr(i)).Range("B" & Rows.Count) _
.End(xlUp)(2).Resize(columnsize:=76) = varOut
Regards
Claus B.
--
Win XP PRof SP2 / Vista Ultimate SP2
Office 2003 SP2 /2007 Ultimate SP2
OH yea, works nicely.
I see the omissions I made to set my code up to fail.
Question on the:
..End(xlUp)(2).Resize(columnsize:=76) = varOut
When you use columnsize:= does the : more or less Dim columnsize in place as a long?
And could you use it like this if you had some rows also?
..Resize(rowsize:=10,columnsize:=76) = varOut
Howard
|