Geçerli kullanıcı adı bir hücrede nasıl gösterilir?

Question

Çevrimiçi kaynakların çoğunda, genellikle bu bilgileri VBA'da nasıl alacağımı gösteririm. Bu bilgiyi bir hücrede almanın doğrudan bir yolu var mı? hücreden diyoruz Sonra

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

:

Answer 1

Aşağıdaki bağlantıdaki talimatlara dayanarak, aşağıdakileri yapın.

VBA yeni bir modül eklemek ve bu kodu yapıştırın:

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

Çağrı formül kullanılarak fonksiyonu:

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

Answer 2

basit yolu şöyle, bu işlevi sarar bir VBA makrosu oluşturmaktır (işe yaramadı olan) =ENVIRON('User') kadar basit Örneğin

:

=UserNameWindows() 

fazla ayrıntı için this article bakın, başka yollar.

Answer 3

:

=Username() 

adresindeki talimatlara dayanarak

Örnek: Windows C5'deki Kullanıcı Adı'nı görüntülemek için, Eğer VBAbir UDF oluşturmak istemiyorum ya eğer yapamazsan

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

Answer 4

, bu alternatif olabilir: betik.

=Cell("Filename",A1) bu size tam bir dosya adı verecek ve bundan böyle bir şey ile kullanıcı adını alabilir:

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

---

Bu Formülü yalnızca çalışır daha önce kaydedilmiş bir çalışma kitabından .

Sürücünün ilk eğik çizgisi nedeniyle 4. konumdan başlamalısınız.

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

mülkiyet Application.Username MS Office yüklemesi ile girilen isim tutan:

Answer 5

Bu geçerli kullanıcının adını gösterir.

bir hücredeki bu formülü girin:

=Username()