Skip to main content
adicionou 42 caracteres ao conteúdo
Fonte Link
Leo
  • 2mil
  • 3
  • 23
  • 48

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 também, ou somente Sub como fizainda Function (eu li que pode ser usada função, mas não testei).

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 também, ou somente Sub como fiz.

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

Fonte Link
Leo
  • 2mil
  • 3
  • 23
  • 48

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 também, ou somente Sub como fiz.