LinkBack Thread Tools Search this Thread Display Modes
Prev Previous Post   Next Post Next
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 195
Default 2 ranges into one

XL2000
I've been happily using the following to copy a range of non-contiguous
checkmarks under current date on one sheet to a range on another sheet
under current date:

Sub CopyToday()
Dim Rng As Range
Set Rng = Rows(2).Find(Date).Offset(1, 0)
Range(Rng, Rng.Offset(Range("Attendance").Rows.Count - 1, 0)).Copy _
Destination:=Sheets(3).Range(Rng.Address)
End Sub

Now "the boss" needs another identical source sheet that will have a
different set of checkmarks under current date, so now there will be 2 sets
of checkmarks to copy into this destination. I looked at Union(), but from
what I've read, it doesn't work with ranges from different sheets.

Playing out options in my mind, I thought maybe copying both sets to
columns in a temporary location then use Union() in a third column in that
temporary location to "merge" the checkmarks, then copy that range to the
destination, then delete the temporary location, but that seems like a lot
to do to accomplish what should be easier. Besides, I can't come up with
the code to do that anyway.

Can anyone help me get all checkmarks from 2 sheets into my Destination?

--
David
 
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
how copy formula that contains ranges so ranges do not overlap Patty Excel Worksheet Functions 1 November 20th 08 04:15 PM
HELP ON AGE RANGES Malcolm Austin Excel Worksheet Functions 4 July 31st 07 09:52 AM
Looking in Ranges [email protected] Excel Discussion (Misc queries) 1 April 18th 07 04:24 PM
Sum the ranges Andri Excel Worksheet Functions 5 March 24th 07 04:36 PM
Like 123, allow named ranges, and print named ranges WP Excel Discussion (Misc queries) 1 April 8th 05 06:07 PM


All times are GMT +1. The time now is 08:58 AM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Copyright ©2004-2024 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"