create new formula using vba excel

Question

Hi im looking for a formulla to show User's full name who is opening excel file.it should show that logged in user name. I tried some VBA script and got succesfull but there is one problem that when i run script that time only it Generate pop up windows saying your user name. it should show user name in cell as a date formulla a"=TODAY()". i have this script please anybody help me to show full user name in cell.

Sub GetUserFullName()
    Dim MyOBJ As Object
    On Error Resume Next
    Set MyOBJ = GetObject("WinMgmts:").instancesOf("Win32_NetworkLoginProfile")
    If Err.Number <> 0 Then
      MsgBox "WMI has not been installed, code will be terminated...", vbExclamation, "Windows Management Instrumentation"
      Exit Sub
    End If
    For Each objItem In MyOBJ
        MyMsg = MyMsg & "Welcome To IT Dept   : " & vbCrLf & vbCrLf & objItem.FullName
    Next
    MsgBox MyMsg, vbInformation, "Swapnil (System Admin)"
End Sub

Dmitry Pavliv · Accepted Answer · 2014-02-14 09:51:25Z

2

UPD:

Function GetUserFullName() As String
    Dim MyOBJ As Object
    Dim res As String
    On Error Resume Next
    Set MyOBJ = GetObject("WinMgmts:").instancesOf("Win32_NetworkLoginProfile")
    If Err.Number <> 0 Then
      GetUserFullName = "error"
      Exit Function
    End If
    For Each objItem In MyOBJ
        res = res & objItem.FullName
    Next
    GetUserFullName = res
End Function

you can use it in any cell like formula: =GetUserFullName()

edited Feb 14, 2014 at 9:51

answered Feb 4, 2014 at 15:58

Dmitry Pavliv

35.9k13 gold badges84 silver badges85 bronze badges

Sign up to request clarification or add additional context in comments.

1 Comment

brettdj Over a year ago

I agree with Mehow, I'd delete the first answer as Application.Username can be changed by anyone.

Collectives™ on Stack Overflow

create new formula using vba excel

1 Answer 1

1 Comment

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

1 Comment

Your Answer

Sign up or log in

Post as a guest

Related