Acumular cantidad de una celda sumando a la cantidad de otra celda

En este rango, escribo la cantidad entrante:
Range("J771:J791, J748:J768, J603:J700, J453:J600, J136:J450, J10:J133").Select
Y en este rango, necesito que me sume la cantidad entrante:
Range("P771:P791, P748:P768, P603:P700, P453:P600, P136:P450, P10:P133").Select
Lo que quiero saber es todo lo que entro de ese articulo.