Planilha Excel VBA Shapes 19 hiperlink tempo site Este exemplo de macro do Aplicativo Microsoft Excel VBA(Visual Basic Application), usando um shapes de publicidade
mostra um shapes por um tempo determinado 10 segundos, também usando o Evento Activate da folha de planilha,
Abre um Shapes com temporizador de 10 segundos, ligado a um macro para abrir o Site, caso não seja aberto neste período, o shapes ficará oculto.
aa
‘//===============’NA FOLHA DE CÓDIGO DA FOLHA DE PLANILHA.
Private Sub Worksheet_Activate()
Saber1.Shapes(“sbxIMAGEM”).Visible = True
vFim = Timer + 10
Do While Timer < vFim
DoEvents
Loop
Saber1.Shapes(“sbxIMAGEM”).Visible = False
End Sub
‘//===============’EM UM MÓDULO COMUM
Sub sbx_hiperlink_saberexcel()
On Error Resume Next
Err = 0
ActiveWorkbook.FollowHyperlink Address:=”http://www.saberexcel.com.br“, NewWindow:=True
If Err <> 0 Then MsgBox “Erro Gerado, sua internet deve estar desligada!”
End Sub
Aprenda tudo sobre planilhas do Aplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos
Escola Saberexcel VBA Estudos® – Treinamentos com Macros, Fórmulas e Funções.
Baixe o exemplo de planilha contendo os macros acima:
Planilha s Excel VBA shapes 19 hiperlink tempo site