Essencialmente, teoricamente, você precisa de uma macro no Book1 para chamar uma macro no Book2
Então, em um módulo Book1 colocado -
Sub callfrm()
Dim wbfrm As Workbook
Set wbfrm = Workbooks.Open("C:\path\to\Book2.xlsm")
Application.Run "'" & wbfrm.Name & "'" & "!showfrm"
set wbfrm = nothing
End Sub
Em seguida, no Book2, você tem UserForm1
que gostaria de mostrar. Mas você está chamando uma macro chamada "Showfrm", então o módulo Book2 tem -
Sub showfrm()
UserForm1.Show
End Sub