Как показать текущее имя пользователя в ячейке?

Question

В большинстве интернет-ресурсов, которые я могу найти, обычно показывают, как получить эту информацию в VBA.Есть ли прямой способ получить эту информацию в ячейке?

Например, просто =ENVIRON('User') (который не работал)

Answer 1

На основании инструкций по ссылке ниже выполните следующие действия.

В VBA вставьте новый модуль и вставьте этот код:

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

Вызов функции по формуле:

=Username()

На основании инструкций по адресу:

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

Answer 2

, если вы не хотите создавать UDF в VBA или не можете, это может быть альтернативой.

=Cell("Filename",A1) это даст вам полное имя файла, и из этого вы можете получить имя пользователя примерно так:

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

---

Эта формула запускается только из книги, сохраненной ранее.

Вы должны начать с 4-й позиции из-за первой косой черты от привода.

Answer 3

Пример: для просмотра имени пользователя Windows в ячейке C5 вы можете использовать этот скрипт:

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

Answer 4

Самый простой способ - создать макрос VBA, который обернет эту функцию, например:

Function UserNameWindows() As String
    UserName = Environ("USERNAME")
End Function

Затем вызовите его из ячейки:

=UserNameWindows()

См. thisстатья для более подробной информации, и другие способы.

Answer 5

Без макроса VBA вы можете использовать эти советы, чтобы получить имя пользователя из пути:

=MID(INFO("DIRECTORY"),10,LEN(INFO("DIRECTORY"))-LEN(MID(INFO("DIRECTORY"),FIND("\",INFO("DIRECTORY"),10),1000))-LEN("C:\Users\"))

Answer 6

Здесь отображается имя текущего пользователя:

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

Свойство Application.Username содержит имя, введенное при установке MS Office.

Введите эту формулу в ячейку:

=Username()