insertar un valor determinado en celdas contiguas mediante un OptionButton

[phoboslu]

Buenos días de nuevo. necesito hacer una pequeña consulta. es referente a la entrada de datos en un calendario. Se realiza mediante un UserForm con OptionButton.

Necesitaría ayuda por que querría que al seleccionar una celda, escribiera el dato en un numero determinado de celdas contiguas (Ej si es Batería nº 1 como máximo son 3 días hábiles pero pueden ser solo 2 o 1), saltando los días de cierre de las naves, que es donde me lió.

Lo he intentado con un contador con una variable que pide cuando das a validar pero no me ha salido

Si me pudierais orientar os estaría muy agradecido.

Subo un archivo para que lo veáis.

Muchas gracias de ante mano

baterias.xls

[Antoni]

El archivo da error.

[phoboslu]

Vuelvo a subir el archivo. Disculpa.

Bateria2.xls