GMAIL vba獲取當前用戶並返回用戶的Gmail地址

Question

我有從Excel VBA中生成GMail電子郵件的代碼，但是，我正在查找將確定當前用戶是誰並返回當前用戶的Gmail電子郵件地址的代碼。

Answer 1

我不知道是否有一種方式來獲得從代碼GMAIL地址，除非他們有一個瀏覽器窗口中打開自己的Gmail帳戶

微軟的示例代碼來獲得當前用戶名

' Makes sure all variables are dimensioned in each subroutine. 
Option Explicit 

' Access the GetUserNameA function in advapi32.dll and 
' call the function GetUserName. 
Declare Function GetUserName Lib "advapi32.dll" Alias "GetUserNameA" _ 
(ByVal lpBuffer As String, nSize As Long) As Long 

' Main routine to Dimension variables, retrieve user name 
' and display answer. 
Sub Get_User_Name() 

' Dimension variables 
Dim lpBuff As String * 25 
Dim ret As Long, UserName As String 

' Get the user name minus any trailing spaces found in the name. 
ret = GetUserName(lpBuff, 25) 
UserName = Left(lpBuff, InStr(lpBuff, Chr(0)) - 1) 

' Display the User Name 
MsgBox UserName 
End Sub