union range
What I want to do is to copy cells -11,8,7,5 and the target cell. The target
cell is text all others are numeric. Target cell is the trigger for this.
Does the (0 ,5), .cells).copy take in the target cell
This is what I have
Dim wksSummary As Worksheet
Dim rngPaste As Range
Set wksSummary = Sheets("Announcer")
Set rngPaste = wksSummary.Cells(65536, "A").End(xlUp).Offset(1, 0)
Application.EnableEvents = False
Set rngPaste = rngPaste.Offset(1, 0)
Union(Range(Target.Offset(0, -11, 8, 7, 5)), Range(Target)).Copy _
Destination:=rngPaste
Will try your example
Thanks Again
"JE McGimpsey" wrote:
The VBA Offset method only takes 2 arguments (see VBA Help), so it's
hard to see what you're trying to do here, or even how many cells you're
trying to copy...
Perhaps:
With Target
Union(.Offset(0, -11), .Offset(0, 7).Resize(1, 2), _
.Offset(0, 5), .Cells).Copy _
Destination:=rngPaste
End With
????
In article ,
Curt wrote:
have not used union before trying following not good HELP
Thanks
Union(Range(Target.Offset(0,-11,8,7,5))),target.offset(0,0).Copy _
Destination:=rngPaste
What I want to do is to copy cells -11,8,7,5 and the target cell. The target
cell is text all others are numeric. Target cell is the trigger for this.
Thanks Again
|