Hi guys

Do you have any idea why this code don't runs?

Set mittRange = Application.Union(Range(Cells(orgRad, KolE), Cells(dblRad,
KolI)))
--
Hälsningar/Regards
KentÄ

yes..
look at your brackets..

you attempt to create a union with 1 range only.







--
keepITcool
| www.XLsupport.com | keepITcool chello nl | amsterdam


KentÄ wrote :

Hi guys

Do you have any idea why this code don't runs?

Set mittRange = Application.Union(Range(Cells(orgRad, KolE),
Cells(dblRad, KolI)))

The Union method requires at least 2 arguments, you are only passing one.

Range(Cells(orgRad, KolE), Cells(dblRad,KolI)) is a range of contiguious
cells starting at Cells(orgRad, KolE), and ending atCells(dblRad,KolI), it
is not two ranges.

--

HTH

RP
(remove nothere from the email address if mailing direct)


"KentÄ" .(donotSpam) wrote in message
...
Hi guys

Do you have any idea why this code don't runs?

Set mittRange = Application.Union(Range(Cells(orgRad, KolE), Cells(dblRad,
KolI)))
--
Hälsningar/Regards
KentÄ