Dim dllobj As New mydll.Class1

Public Sub temp_macro()
  Dim dllobjItf As mydll.Iinterf
  Set dllobjItf = dllobj
  dllobjItf.Func
End Sub