Tässä artikkelissa luomme makron, joka palauttaa tietokoneen ja käyttäjänimen kirjautuneelle käyttäjälle.
Tässä esimerkissä haluamme poimia tietokoneen nimen solusta C10 ja käyttäjänimen solusta C11.
Olemme luoneet "GetComputerUserName" -makron tietokoneen ja käyttäjänimen löytämiseksi. Voimme suorittaa makron napsauttamalla Lähetä -painiketta.
Makro poimii tietokoneen nimen solusta C10 ja käyttäjänimen solusta C11.
Koodin selitys
Ympäristötoiminto
Environ -funktio palauttaa käyttöjärjestelmän ympäristömuuttujaan liittyvän merkkijonon arvon.
Ympäristötoiminnon syntaksi
Environ ({Ympäristömuuttujan nimi | numero})
Seuraa koodia alla
Sub GetComputerUserName () Dim ComputerName, UserName as String 'Tietokoneen nimen saaminen ComputerName = Environ ("laskennanimi") "Käyttäjätunnuksen saaminen UserName = Environ (" käyttäjätunnus ")' Arvon määrittäminen soluille C10 ja C11 Range (" C10 "). Arvo = ComputerName Range ("C11"). Value = UserName End Sub
Jos pidit tästä blogista, jaa se ystävillesi Facebookissa. Voit myös seurata meitä Twitterissä ja Facebookissa.
Haluaisimme kuulla sinusta, kerro meille, kuinka voimme parantaa työtämme ja parantaa sitä sinulle. Kirjoita meille sähköpostitse