PATILARGO

Esto es lo máximo que se puede reducir el proceso.
Abre el adjunto y pulsa sobre la flecha azul, se copiarán los turnos de mañana, tarde y noche del día de la fecha que hay en C3.
Plantilla de Servicios5 (Full).xlsm

Añade Application.ScreenUpdating = False al principio de cada macro.

Hola,
Con formato Condicional
RELLENAR FECHAS.xlsx

¡¡¡ Pero qué celdas !!! Si subes un archivo vacío sin dar ejemplo ni nada, difícil ayudar

Hola,
Que se rellenaran como...?

Muchisimas gracias, mirare el macro que me has pasado e intentare adaptarlo , muchas gracias y sobre todo agradecerte las molestias @tierra_pampa

Hola @PATILARGO
Disculpas amigo, era tarde en mi país y creí que podrías reemplazarlo. 
Espero que te sirva la posible solución.
Cualquier problema que puedas tener, por aquí andarán siempre personas dispuestos a ayudarte.
Suerte!
 
 
ae20200630_post43702_Plani.xlsm

Buenos dias y muchas gracias @tierra_pampa por tu respuesta, pero perdona por mi desconocimiento, ese parte del macro donde deberia de ponerla, lo dicho muchas gracias por la colaboracion y ayuda.

Hola @PATILARGO
Te dejo una opción modificando tan solo una línea de la macro.
Si te ayudó la colaboración recibida, puedes agradecerlo con un click en el corazón que se encuentra en la parte inferior derecha del comentario

Suerte!
For Each x In Range(vci, vci.End(xlDown)) If x <> "6011" Then i = i + 1 If i > 1 Then vpc = x + 0 & "-" & vpc 'vpc = vpc & "-" & x + 0 Else vpc = vpc & x + 0 End If End If Next  

Pensaba que ya habíamos terminado con el tema de cerrar las consultas de esta manera. 😒😒

Hola a todos, venga aprovecho y subo otra opción que tenía y no me dio tiempo a subir.


Sorteo (1).xlsm

sí, perdona... Es que a veces me puede 😉
Copia de sortear parejas de jugadores.xlsm

Hola.
Prueba este archivo.
Mete los nombres en la columna D y dale a sortear.
Suerte.
 
sortear parejas de jugadores.xlsm

@PATILARGO , te dejo lo que he entendido como solución
 
Copia de sortear parejas de jugadores.xlsm

Hola.
El funcionamiento como seria?.
Meterias primero los nombres y luego harias el sorteo.
Si fuese asi, en las clumnas H y K en vez de aparecer pareja1, pareja5..etc, serian los nombres que pusieras en la columna D?.
 
Un saludo.

Ya que la había hecho te dejo mi versión @PATILARGO
Copia de sortear parejas de jugadores-1.xlsm

Hola, te adjunto tu archivo con una macro que te realiza el sorteo.
Un saludo a los dos.
sortear parejas de jugadores.xlsm

sortear parejas de jugadores(1).zip