Selles artiklis loome makro, mis tagastab sisselogitud kasutaja arvuti ja kasutajanime.
Selles näites tahame ekstraheerida arvuti nime lahtrist C10 ja kasutajanime lahtrist C11.
Arvuti ja kasutajanime leidmiseks oleme loonud makro “GetComputerUserName”. Makro käivitamiseks klõpsake nuppu „Esita”.
Makro ekstraheerib arvuti nime lahtrist C10 ja kasutajanime lahtrist C11.
Koodi selgitus
Keskkonna funktsioon
Funktsioon Environ tagastab operatsioonisüsteemi keskkonnamuutujaga seotud stringi väärtuse.
Funktsiooni Keskkond süntaks
Keskkond ({Keskkonnamuutuja nimi | number})
Palun järgige koodi allpool
Alam GetComputerUserName () Dim ArvutiNimi, Kasutajanimi kui string 'Arvuti nime hankimine ComputerName = Environ ("arvuti nimi")' Kasutajanime saamine UserName = Environ ("kasutajanimi") 'Väärtuse määramine lahtritele C10 ja C11 Vahemik ("C10"). Väärtus = Arvutinime vahemik ("C11"). Väärtus = Kasutajanimi Lõpualam
Kui teile see blogi meeldis, jagage seda oma sõpradega Facebookis. Lisaks saate meid jälgida Twitteris ja Facebookis.
Tahaksime sinust kuulda, andke meile teada, kuidas saaksime oma tööd paremaks muuta ja teie jaoks paremaks muuta. Kirjuta meile meilisaidile