Notifications
Clear all

Macro para Ler Nome do usuário

3 Posts
2 Usuários
0 Reactions
1,213 Visualizações
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Bom dia...

tenho uma planilha no qual ao abrir automaticamente, a macro "funciona".
Aparece uma caixa box no qual escrevi "bem vindo".

Porém existe possibilidade da macro ler o nome do usuário do PC e nessa msgbox aparecer "Bem vindo XXXXX" (XXXX seria o nome do usuário logado no PC).

Abraços

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 02/08/2012 6:11 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Bom dia!!

Tente acrescentar

Application.UserName 

talvez outro exemplo

Sub NomedoUsuario() 
    MsgBox Environ("username") 
End Sub 

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 02/08/2012 6:15 am
Charlie-81
(@charlie-81)
Posts: 290
Reputable Member
 

Segue um exemplo.

Blue eye | MB Intel Extreme DX58SO | Termaltake 775W | I7 950 LGA 1366 (Overclock 5.3 GZ) | Corsair Vengeance 16 GB | WC Corsair H70 | Aerocool Touch 2000 | Razer Mamba 4G | Som Volcano 50W RMS | Cooler Zalmam | HD 2TB | Radeon HD 8670 | Monitor 32'

 
Postado : 02/08/2012 6:24 am