Поиск  Пользователи  Правила 
Закрыть
Логин:
Пароль:
Забыли свой пароль?
Регистрация
Войти  
Форумы "Планета Excel" » Вопросы по Microsoft Excel
Страницы: 1
RSS
как при помощи VBA получить электронный адрес учетной записи пользователя ?
 
#1
30 янв 2020 10:32:00
коллеги, подскажите, пожалуйста, как средствами VBA  получить адрес электронной почты учетной записи пользователя открывшего книгу excel ?

для наглядности прикладываю картинку. Получить нужно то что выделено желтым маркером и обведено красным

 
 
 
#2
30 янв 2020 10:45:56
Доброе время суток.
Вариант
Код
Sub ShowUserEMail()
    Dim objAD As Object, objUser As Object

    Set objAD = CreateObject("ADSystemInfo")
    Set objUser = GetObject("LDAP://" & objAD.UserName)
    MsgBox objUser.EMailAddress
End Sub
 
 
 
#3
30 янв 2020 11:07:26
Андрей VG, Супер! спасибо большое! ))
 
 
 
Страницы: 1
Читают тему (гостей: 1)
Наверх