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).