Scott,

First, aren't your completed sites listed in cells W3:W59 (or where
ever the end of the list will be)? Your selection change is currently
triggered by E6:E40.
I changed this to W3:W59 for testing

Second, as soon as you click on a site name in W3:W59 it tries to clear
the contents of H6:I300 which it can't do because some of those cells
are merged.
I commented this line out for testing

Third, you are comparing the Target.Value of the Site Name selected
with column D on the "Sites" list which is actually the Hosp Name.
I chaged this to compare with column C from your "Site" sheet which
contains the Site Names

Then when you add the item to the Relist Collection what exactly are
you trying to add? The code has only a single item being added to that
collection which corresponds to the Hosp Name.

In the For i to Relist.Count loop I'm not exactly sure what you are
trying to accomplish with this. The destination
Range("H5").Offset(i,0) or
Range("H5").Offset(i,1) seems to correspond to a Range you currently
have populated with the VPN Device Codes (H6) or
the VPN Device Type for that site (I6)

It looks like you may have changed the layout of your sheets and things
aren't in the same locations as when you first wrote the code?

Hope this helps to get you started


--
bhofsetz
------------------------------------------------------------------------
bhofsetz's Profile: http://www.excelforum.com/member.php...o&userid=18807
View this thread: http://www.excelforum.com/showthread...hreadid=380191