Excel - INSERTAR FECHA CALENDARIO EN TEXTBOX CON FORMULARIO

Tengo un excel que adjunto a este foro, que es parte de otro más grande.
Este excel, muestra 3 campos:


Por último, tiene un BOTÓN MACRO 'Insert Data'.

1. Cuando ejecutamos el botón macro, se nos abre una bonita 'Useform' que contiene:

2. También he creado un 'UseForm' CALENDARIO con el nombre 'MiCalendario'.

3. He conseguido, que al abrir el 'UseForm' de insertar fechas, y hacer click sobre 'TextBox1' o 'TextBox2' se me muestre el CALENDARIO.
Sin embargo, no consigo que al hacer 'doble click' sobre la fecha, se rellene el correspondiente 'TextBox' con la fecha seleccionada, y se autocierre el CALENDARIO.

Quisiera poder introducir ambas fechas, obtener la lectura de la celda 'Dias TOTAL' para así poder cuadrar una fecha final, y finalmente poder INSERTAR FECHAS (que este botón funciona).

¿Alguien podría ayudarme?

Muchas gracias de antemano.

• Calendario_Useform.zip(50,7 KB)

Hola Quico

Solo bastaron 4 meses para tu respuesta (ja), pero mas vale tarde que nunca
Te adjunto un minicalendario que puedes adaptar a tus necesidades, espero te sirva

Saludos

• Calendario-Personal.zip(52,2 KB)

Hola Quico, me dio error al correr tu archivo por falta de algunas Referencias como ALM-Platform-Loader Type Library... abre el archivo en otro equipo para ver si abre bien... sorry

Salu2

Hola Dirk

Si te refieres al mini calendario, desconozco el porque del error, a mi me funciona correctamente aun en diferentes plataformas (32 y 64 bits, Excel 2007, 2010 y 2016,) e incluso incorporándolo a diferentes aplicativos para su uso.

Si detectas algún error te agradeceré me lo hagas saber para revisar el código, de hecho no lleva ninguna protección, podrás ver el mismo y analizar.

Saludos cordiales

Alfredo Lara