evento open con userforms

abrir un libro con el evento Open que abre un formulario para pedir al
usuario un dato. Si el usurio cancela el fomulario quiero que el archivo
se
cierre.

Saludos a todos:

Espero que alguien pueda decirme algo sobre el siguiente error, intento
abrir un libro con el evento Open que abre un formulario para pedir al
usuario un dato. Si el usurio cancela el fomulario quiero que el archivo
se
cierre.

Os detallo cada accion y su codigo.

Un evento open abre un libro y muestra un formulario de captura de datos
con
el siguiente codigo:

Private Sub Workbook_Open()
Hoja2.Activate
UserForm1.Show
End Sub

El formulario tiene un boton Cancelar para que cierra el libro el codigo:

Private Sub CommandButton2_Click()
'boton cancelar
Unload Me
MsgBox "Se acabo"
ActiveWorkbook.Close False
End Sub

Gracias a todos.