Encontrei o problema, o código correto é:

     Sub Workbook_Open()

     MsgBox ("Ok")

     End Sub

Nos exemplos eram dados nomes diversos com o evento "Open", no meu caso só funcionou com "Workbook_Open". Pode-se usar Private Sub ou Public Sub, ou ainda Function (eu li que pode ser usada função, mas não testei).