dim rng, as Range, rng1 as Range ,rng2 as rangedim rng, rng1,rng2 as range
rng1 = range(selection, selection.end(xldown)).select
rng2 = range(selection, selection.end(xltoright)).select
set rng = range(rng1, rng2)
rng.select
pls correct this code
Remove the red comma.