Try this; it should work assuming that "r" is a range variable that has
already been set.
Set u_r = Application.Union(r, Cells(r.Row, r.Column + 1))
Ask a Question
Want to reply to this thread or ask your own question?
You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.