Visual Basic - URGENTE

Necesito su ayuda, deseo hacer una macro que me permita reeemplazar 6 registros a la vez, con solo presionar una vez las teclas de control.

Yo cuando quiero modificar celdas de excel solamente pongo esta linea en una macro :

Worksheets("sheet1").Range("a1:a3").Value = 1

Donde Sheet es el nombre de la hoja que tienes activa y "a1:a3" es el rango que quieres modificar y el 1es el valor que pondras en la celdas.

Espero que te sirba.