Ir para o conteúdo principal

Como obter e inserir o último nome de usuário modificado no Excel?

Este artigo mostrará como obter as informações do último nome de usuário modificado e inserir as informações do último nome de usuário modificado nas células do Excel.

Obtenha o último nome de usuário modificado da pasta de trabalho atual no Excel
Insira o último nome de usuário modificado da pasta de trabalho atual com a função definida pelo usuário
Insira facilmente o nome de usuário na célula, cabeçalho ou rodapé com o Kutools para Excel


Obtenha o último nome de usuário modificado da pasta de trabalho atual no Excel

Como sabemos, podemos obter as informações do último nome de usuário modificado na caixa de diálogo Propriedades Avançadas da pasta de trabalho atual.

Se você estiver usando o Excel 2007

Você pode obter o nome do usuário que modificou a pasta de trabalho atual da última vez no Excel com as seguintes etapas:

Etapa 1: clique no botão Botão de escritório >> Preparar >> Propriedades.

Etapa 2: O Painel de Documentos é adicionado acima da planilha. Clique no Propriedades do documento >> Propriedades avançadas.

Etapa 3: Na caixa de diálogo Propriedades avançadas que aparece, você verá o Salvo pela última vez por: informações sob o Estatísticas aba.

Se você estiver usando o Excel 2010, 2013 ou versão posterior

Se você estiver usando o Microsoft Excel 2010 ou uma versão posterior, poderá obter as últimas informações do usuário modificadas com as seguintes etapas:

Basta clicar no Envie o > Info, você obterá o Modificado pela última vez por informações no lado direito sob Pessoas relacionadas seção. Veja a captura de tela a seguir.


Insira o nome do usuário que modificou a pasta de trabalho atual da última vez com a função definida pelo usuário

1: Mantenha pressionada a tecla ALT + F11 chaves para abrir o Microsoft Visual Basic para Aplicações janela.

2: No Microsoft Visual Basic para Aplicações janela, clique em inserção > Móduloe cole a macro a seguir na janela do módulo. Veja a captura de tela L

Código VBA: insira o último nome de usuário modificado no Excel

Function LastAuthor()
LastAuthor = ActiveWorkbook.BuiltinDocumentProperties("Last Author")
End Function

3: Aperte o outro + Q chaves para fechar o Microsoft Visual Basic para Aplicações janela.

4. Selecione uma célula que você precisa para colocar o nome do usuário, insira a fórmula = LastAuthor () na barra de fórmulas e, em seguida, pressione o botão Entrar chave. Em seguida, o último nome de usuário modificado é inserido na célula imediatamente. Veja a imagem:


Insira facilmente o nome de usuário na célula, cabeçalho ou rodapé com o Kutools para Excel

Você pode inserir facilmente o nome do usuário na célula especificada, cabeçalho ou rodapé da planilha no Excel com o Inserir informações da pasta de trabalho utilidade de Kutools for Excel. Faça o seguinte.

Antes de aplicar Kutools for Excel, Por favor baixe e instale primeiro.

1. Clique Kutools Plus > livro > Inserir informações da pasta de trabalho. Veja a imagem:

2. No Inserir informações da pasta de trabalho caixa de diálogo, você precisa:

1). Selecione os nome de usuário opção no Dados Pessoais seção.

2). Se você deseja inserir o nome de usuário em uma célula especificada, especifique esta célula no Variação caixa; para inserir o nome do usuário no cabeçalho ou rodapé, selecione o cabeçalho or Rodapé opção.

3). Clique no Ok botão. Veja a imagem:

Em seguida, o nome do usuário será inserido na posição especificada imediatamente.

  Se você quiser ter um teste gratuito (30 dias) deste utilitário, por favor clique para fazer o downloade, em seguida, aplique a operação de acordo com as etapas acima.

Melhores ferramentas de produtividade de escritório

🤖 Assistente de IA do Kutools: Revolucionar a análise de dados com base em: Execução Inteligente   |  Gerar Código  |  Crie fórmulas personalizadas  |  Analise dados e gere gráficos  |  Invocar funções do Kutools...
Recursos mais comuns: Encontre, destaque ou identifique duplicatas   |  Excluir linhas em branco   |  Combine colunas ou células sem perder dados   |   Rodada sem Fórmula ...
Super pesquisa: VLookup de múltiplos critérios    VLookup de múltiplos valores  |   VLookup em várias planilhas   |   Pesquisa Difusa ....
Lista suspensa avançada: Crie rapidamente uma lista suspensa   |  Lista suspensa de dependentes   |  Lista suspensa de seleção múltipla ....
Gerenciador de colunas: Adicione um número específico de colunas  |  Mover colunas  |  Alternar status de visibilidade de colunas ocultas  |  Compare intervalos e colunas ...
Recursos em destaque: Foco da Grade   |  Vista de Design   |   Grande Barra de Fórmula    Gerenciador de pastas de trabalho e planilhas   |  Biblioteca (Auto texto)   |  Data Picker   |  Combinar planilhas   |  Criptografar/Descriptografar Células    Enviar e-mails por lista   |  Super Filtro   |   Filtro Especial (filtro negrito/itálico/tachado...) ...
15 principais conjuntos de ferramentas12 Texto Ferramentas (Adicionar texto, Remover Personagens, ...)   |   50+ de cores Tipos (Gráfico de Gantt, ...)   |   Mais de 40 práticos Fórmulas (Calcule a idade com base no aniversário, ...)   |   19 Inclusão Ferramentas (Insira o código QR, Inserir imagem do caminho, ...)   |   12 Conversão Ferramentas (Números para Palavras, Conversão de moedas, ...)   |   7 Unir e dividir Ferramentas (Combinar linhas avançadas, Dividir células, ...)   |   ... e mais

Aprimore suas habilidades de Excel com o Kutools para Excel e experimente uma eficiência como nunca antes. Kutools para Excel oferece mais de 300 recursos avançados para aumentar a produtividade e economizar tempo.  Clique aqui para obter o recurso que você mais precisa...

Descrição


Office Tab traz interface com guias para o Office e torna seu trabalho muito mais fácil

  • Habilite a edição e leitura com guias em Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
  • Abra e crie vários documentos em novas guias da mesma janela, em vez de em novas janelas.
  • Aumenta sua produtividade em 50% e reduz centenas de cliques do mouse para você todos os dias!
Comments (16)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
How can the Activeworkbook be dynamic?

I tried to no success the below code

LastSavedby = Range("A1").value.BuiltinDocumentProperties("Last Author")

Where in A1 contains the path of the file with the file name and extension
This comment was minimized by the moderator on the site
Hi! I, my case it doesn't work automatically, I need to press "enter" after the formula "= VBAProject.Module3.LastAuthor()".
How should i make it automatic?
Thank you
This comment was minimized by the moderator on the site
Hey, this code worked nicely. Is there a way I can display the user name if a ROW is adjusted? For example, I hhave Column K with the header "Last modified By", and I want to know who adjusted "each row" as this is a shared document. I have the below code for Date, which works like how I would want the name to work: Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column > 11 Or Target.Row = 1 Then Exit Sub Application.EnableEvents = False Cells(Target.Row, 12) = Now Application.EnableEvents = True End Sub Please email me if possible
This comment was minimized by the moderator on the site
Hi. I would like to ask how to write the VBA codes to retrieve all current users which modifying on the worksheet. Thank You:)
This comment was minimized by the moderator on the site
thanks a lot for this helpful article. I used it and it worked well. can I get the last modified date on that sheet just like the username ? MANY THANKS
This comment was minimized by the moderator on the site
Can u pls help if iwant the user name to appear in aspreadsheet as and when the previous cell is filled by a user
This comment was minimized by the moderator on the site
Thanks, Cp & Jay Chivo :)
This comment was minimized by the moderator on the site
Sub UserName() Sheets("Sheet1").Range("A1").Value = Environ("username") End Sub --------------- Change the sheet name
This comment was minimized by the moderator on the site
I am runing excel 2007 and am getting the runtime error 9, script out of range as well. any way to make it work in excel 2007?
This comment was minimized by the moderator on the site
Excel 2010. Same time i would like to ask that is it possible to use this Subscript with another function script ? Thanks Naghman
This comment was minimized by the moderator on the site
[quote]Excel 2010. Same time i would like to ask that is it possible to use this Subscript with another function script ? Thanks NaghmanBy Naghman[/quote] With another script? What script? :-)
This comment was minimized by the moderator on the site
To get last saved date. Function LastSaveDate() Application.Volatile True LastSaveDate = FileDateTime(ThisWorkbook.FullName) End Function
There are no comments posted here yet
Load More
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations