Como: Exibir a identificação de Logon do usuário atual em uma célula

Artigo
08/08/2011

Você pode ler a identificação de logon do usuário atual usando o GetCurrent método o WindowsIdentity o objeto para representar o usuário atual. Você pode exibir ID de logon do usuário em um intervalo nomeado em uma planilha do Excel de Microsoft Office.

Aplicável a: As informações neste tópico se aplicam a projetos de nível de documento e projetos de nível de aplicativo para Excel 2007 e Excel 2010. Para obter mais informações, consulte Recursos disponíveis pelo aplicativo do Office e o tipo de projeto.

Para exibir texto na célula, use um NamedRange controle ou um objeto da faixa nativo do Excel.

Usando um controle NamedRange

Este exemplo é para personalizações em nível de documento. O código a seguir deve ser colocado em uma classe de folha, não o ThisWorkbook classe.

Para exibir a identificação de logon do usuário atual em um intervalo nomeado

Obtenha a identificação de logon. do usuário

Dim user As System.Security.Principal.WindowsIdentity
user = System.Security.Principal.WindowsIdentity.GetCurrent()

System.Security.Principal.WindowsIdentity user;
user = System.Security.Principal.WindowsIdentity.GetCurrent();

Criar um NamedRange controle chamado userID e exibir logon o usuário ID.

Dim userID As Microsoft.Office.Tools.Excel.NamedRange
userID = Me.Controls.AddNamedRange(Me.Range("A1"), "userID")

userID.Value2 = user.Name

Microsoft.Office.Tools.Excel.NamedRange userID;
userID = this.Controls.AddNamedRange(this.Range["A1", missing], "userID");

userID.Value2 = user.Name;

Usando um intervalo do Excel nativo

Para exibir a identificação de logon do usuário atual em um intervalo do Excel nativo

Obtenha a identificação de logon. do usuário

Dim user As System.Security.Principal.WindowsIdentity
user = System.Security.Principal.WindowsIdentity.GetCurrent()

System.Security.Principal.WindowsIdentity user;
user = System.Security.Principal.WindowsIdentity.GetCurrent();

Criar um Range chamado userID e exibir logon o usuário ID.

Dim userID As Excel.Range = Me.Application.Range("A1")

userID.Value2 = user.Name

Excel.Range userID = this.Application.get_Range("A1", missing);

userID.Value2 = user.Name;

Programação robusta

As seguintes condições podem causar uma exceção:

O usuário não tem permissão para acessar WindowsIdentity (SecurityException classe).
Problemas de interoperabilidade (COMException classe).

Consulte também

Tarefas

Como: Consulte intervalos de planilha no código

Como: Criar um Objeto WindowsPrincipal

Conceitos

Trabalhando com células

Parâmetros opcionais em soluções do Office

Compartilhar via