(Resolvido) Aviso depois de determinado números de guias

[pablomoreiragv]

Caros Colegas,

Tem como colocar uma mesagem de aviso em uma planilha que abrirá depois de determinado número de quias?

Pablo Moreira

[Patropi]

Bom dia Pablo

Explique-se melhor, o que você escreveu esta muito vago. Melhor seria postar a planilha para entendermos.

Abraços

[pablomoreiragv]

Bom dia Pablo

Explique-se melhor, o que você escreveu esta muito vago. Melhor seria postar a planilha para entendermos.

Abraços

Resolvido, consegui com ajudar do amigo Alexandre.

O código completo fica:

Private Sub Workbook_Open()

If Worksheets.Count > 3 Then

MsgBox "Esta pasta tem " & Worksheets.Count & " Planilha(s).", vbOKOnly, "Atenção!"

End If

End Sub

Utilizei o número 3, ou seja, quando eu tiver mais de 3 planilhas na pasta (4, 5, ...) a mensagem será exibida quando eu abrir a pasta de trabalho, caso contrário não aparecerá nenhuma mensagem.

Um abraço,

Obrigado gente!