Een range steek je niet in een integer. Als ik mijn vba kennis nog beetje ken steek je dat simpelweg in een range :/
Dim rngA as Range
Waarom zou je er telkens 1 bijvoegen? Da's helemaal niet de bedoeling van een range alsek mij niet vergis, ge zou wel met Unions/Intersects kunnen werken en dat is denkek wat je bedoelt.