Posición control calendar

Hola jcgonzalez, llevo días intentando conseguir que el calendario excel (control calendar) aparezca a la derecha de la celda activa, y no hay forma. A partir de la opción control de propiedades consigo ubicarlo en el centro, o bien en la parte superior izquierda, pero no es este mi propósito.
El código que estoy manejando es el siguiente:
1) En el formulario (UserForm)
Private Sub Calendar1_Click()
ActiveCell.Value=Calendar1.Value
Unload Me
End Sub
Private Sub UserForm_Activate()
Calendar1.Today
End Sub
2) En un módulo
Sub abrir_calendario()
UserForm1.Show
End Sub
3) En el objeto PLANTILLA
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim rngFechas As Range
Set rngFechas=Range("B8:B65536")
If Union (Target, rngFechas).Address=rngFechas.Address Then
Call abrir_calendario
End If
End Sub
¿Qué solución propones, a partir del código anterior, para que el calendario se muestre a la derecha de la celda activa (rango B8:B65536)?
Una vez más, gracias por tu ayuda y tiempo!
Saludos