Crie tópicos separados para cada questão.
As duas questões podem ser resolvidas aplicando a função ENVIRON.
No primeiro caso, você pode desenvolver um código no evento de abertura do arquivo com a condição se o computador não for o definido no código, feche o arquivo. Para isso use a função Environ("computername") ou então, Environ("username"), pois você pode fazer a lógica pelo usuário também, ao invés do nome da máquina.
A segunda pergunta, é só definir a célula desejada igual ao ENVIRON("comupername"), Exemplo: range("A1").Value = Environ("computername")
Abraços!
Rafael Issamu F. Kamimura
Moderador Oficial Microsoft Community - MCC (Contribuidor do Microsoft Community)
http://zip.net/bjrt0X - http://zip.net/bhrvbR
Foi útil? Clique na mãozinha
Conheça: http://excelmaniacos.com/
Postado : 17/06/2015 10:22 am