선림은 오피스가 설치 될 때 사용자가 이름을 지정한다고 언급했다. 이 이름은 Word와 같은 일부 Office 프로그램에서 액세스 할 수 있습니다. 선림은 엑셀에서 사용자 이름에 접근하여 그 이름을 셀에 넣는 방법을 궁금해합니다.

이를 수행하는 방법은 Application 개체의 UserName 속성에 액세스하는 짧은 한 줄 매크로를 구현하는 것입니다. 이 기술은 _ExcelTips : _

의 다른 문제에 자세히 설명되어 있습니다.

http://excelribbon.tips.net/T009814

이 접근 방식은 현재 Excel 설치와 관련된 사용자 이름을 결정하는 데 유용합니다. 그러나 현재 통합 문서를 사용하는 사용자와 다를 수 있습니다. 예를 들어 통합 문서를 공유하는 경우 여러 사람이 동시에 사용할 수 있습니다. 이 경우 다음과 같이 이름을 확인할 방법이 필요합니다.

Function UserNames() As String     Dim Users As Variant     Dim sMsg As String     Dim iIndex As Integer

Users = ActiveWorkbook.UserStatus

For iIndex = 1 To UBound(Users, 1)

sMsg = Users(iIndex, 1) & vbLf     Next iIndex     'remove final line feed     sMsg = Left(sMsg, Len(sMsg) - 1)



UserNames = sMsg End Function

함수를 사용하려면 이름을 표시 할 셀에 다음 수식을 입력하십시오.

=UserNames

대신 현재 누가 컴퓨터를 사용하고 있는지 알고 싶다면 Office를 넘어서 Windows 자체에서 이름을 가져 오는 것이 가장 좋습니다. 이러한 방식으로 Windows에 로그인 한 사용자를 확인하고이를 사용자 이름으로 사용할 수 있습니다. 이것은 API 함수 호출 선언을 취하지 만 그렇지 않으면 비교적 쉽습니다 :

Private Declare Function GetUserName Lib "advapi32.dll" _   Alias "GetUserNameA" (ByVal lpBuffer As String, nSize _   As Long) As Long

Function UserName2() As String     Dim strBuff As String * 100     Dim lngBuffLen As Long

lngBuffLen = 100     GetUserName strBuff, lngBuffLen     UserName2 = Left(strBuff, lngBuffLen - 1)

End Function

_ 참고 : _

이 페이지 (또는 ExcelTips 사이트의 다른 페이지)에 설명 된 매크로를 사용하는 방법을 알고 싶다면 유용한 정보가 포함 된 특별 페이지를 준비했습니다.

link : / excelribbon-ExcelTipsMacros [새 브라우저 탭에서 특별 페이지를 열려면 여기를 클릭하세요].

_ExcelTips_는 비용 효율적인 Microsoft Excel 교육을위한 소스입니다.

이 팁 (12745)은 Office 365의 Microsoft Excel 2007, 2010, 2013, 2016, 2019 및 Excel에 적용됩니다. 여기에서 Excel의 이전 메뉴 인터페이스에 대한이 팁 버전을 찾을 수 있습니다.

link : / excel-Inserting_the_Users_Name_in_a_Cell [셀에 사용자 이름 삽입].