2011-08-03 7 views

답변

29

아래 링크의 지침에 따라 다음을 수행하십시오.

VBA에 새로운 모듈을 삽입하고이 코드를 붙여

Public Function UserName() 
    UserName = Environ$("UserName") 
End Function 

통화 화학식 사용 기능 :

https://support.office.com/en-us/article/Create-Custom-Functions-in-Excel-2007-2f06c10b-3622-40d6-a1b2-b6748ae8231f

+1

감사합니다! 그것은 내가 새로운 모듈을 만들지 않았기 때문에 전에는 효과가 없었습니다. 이제는 모두 좋다. 위의 링크가 작동하지 않는 경우 2016 년에이 문제가 발생하는 사람은 –

+1

입니다. –

+0

위의 설명에 따라 링크가 수정되었습니다. – Gallus

2

가장 간단한 방법은과 같이, 그 기능을 래핑하는 VBA 매크로를 만드는 것입니다 (작동하지 않았다) =ENVIRON('User')만큼 간단한 예를 들어

:

=UserNameWindows() 

은 자세한 내용은 this article를 참조하고, 다른 방법.

3
:

=Username() 

에서 명령들에 기초를

예 : 셀 C5에서 Windows 사용자 이름을 보려면 다음을 사용할 수 있습니다. 당신은 VBAUDF을 만들려하지 않거나 할 수없는 경우

Range("C5").Value = ": " & Environ("USERNAME"). 
3

,이 대안이 될 수있다 : 스크립트입니다.

=Cell("Filename",A1)이 당신에게 전체 파일 이름을 지정하며,이에서이 같은과 사용자 이름을 얻을 수 :

=Mid(A1,Find("\",A1,4)+1;Find("\";A1;Find("\";A1;4))-2)


이 공식은 실행 이전에 저장 한 통합 문서에서 .

드라이브의 첫 번째 슬래시 때문에 네 번째 위치부터 시작해야합니다.

Function Username() As String 
    Username = Application.Username 
End Function 

속성 Application.Username는 MS 오피스의 설치를 입력 한 이름을 원하는 분야

0

이 현재 사용자의 이름을 표시합니다.

는 셀이 수식을 입력 :

=Username() 
관련 문제