Instruções e Inform...
 
Notifications
Clear all

Instruções e Informações na Barra de Status

5 Posts
2 Usuários
0 Reactions
1,012 Visualizações
(@miranda)
Posts: 46
Trusted Member
Topic starter
 

Pessoal, boa tarde/boa noite!!!
Preciso de um suporte; pesquisei mas não consegui adaptar algo que atendesse as necessidades...
Gostaria que na Barra de Status do Excel, pudesse aparecer informações pré estabelecidas/personalizadas, como: dia, autor da planilha, instruções.
Por favor, necessito da ajuda de vcs!!
Abçs!!

 
Postado : 23/01/2015 3:12 pm
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

A linha em VBA que muda a barra de status é:

application.statusbar = "Teste " & vba.environ("username") & vba.now()

vc pode colocar no evento open do workbook...
Para limpar depois, use:

application.statusbar  = false
 
Postado : 23/01/2015 3:19 pm
(@miranda)
Posts: 46
Trusted Member
Topic starter
 

Fernando, blz??

Estou tentando iniciar assim:

Private Sub Workbook_Open()
Application.StatusBar = "Teste" & VBA.Environ("username") & VBA.Now()

Mas relata erro no Projeto VB. Por favor,o que pode ser?

 
Postado : 23/01/2015 3:31 pm
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Faltou o End Sub ...

Private Sub Workbook_Open()
Application.StatusBar = "Teste" & VBA.Environ("username") & VBA.Now()

End Sub
 
Postado : 24/01/2015 9:13 am
(@miranda)
Posts: 46
Trusted Member
Topic starter
 

Valeu, Fernando!

Erro (esquecimento) primário.
Várias tarefas ao mesmo tempo, consequentemente, esquecimento!
Abçs.

 
Postado : 24/01/2015 11:41 am