Página 1 de 1

buscar nome do computador "hostname "

Enviado: 08 Jun 2021 às 20:29
por shalon
ola pessoal preciso da ajuda de vcs , alguém tem algum vba pra capturar o nome do computador ?
eu preciso saber qual nome de cada pc que eu enviar essa planilha com vba .
o cliente vai abrir a planilha na casa dele e vai me informar o nome do pc dele .
Obs : Que rode em todos sistemas operacionais e versões diferentes do excel.

Re: buscar nome do computador "hostname "

Enviado: 09 Jun 2021 às 15:19
por mucascosta
Código: Selecionar todos
Sub NomePC()
Dim msg
  sbMsg = Environ$("ComputerName")
  MsgBox sbMsg, , "Nome do computador: Mucas Sistemas - 2021"
End Sub

Re: buscar nome do computador "hostname "

Enviado: 12 Jun 2021 às 16:52
por shalon
mucascosta escreveu: 09 Jun 2021 às 15:19
Código: Selecionar todos
Sub NomePC()
Dim msg
  sbMsg = Environ$("ComputerName")
  MsgBox sbMsg, , "Nome do computador: Mucas Sistemas - 2021"
End Sub
ola amigo primeiro quero agradecer o código que me enviou , porem ainda preciso de sua ajuda pq eu ainda não consegui fazer funcionar o código , eu aperto alt+ f11 e entro em microsoft objects , clico com botão direito em cima esta pasta de trabalho , clico inserir modulo e ai eu insiro o código que vc me enviou, porem eu vou na área de trabalho do excel e ele não captura o nome do computador , o que posso fazer além do que vc já me indicou pra que funcione ?

Re: buscar nome do computador "hostname "

Enviado: 13 Jun 2021 às 10:24
por mucascosta
Veja o anexo e faça as adaptações necessárias...