Ako používať VBA nájsť MAC adresu

Je to cenné vedieť , ako zistiť adresu Media Access Control ( MAC ) pomocou jazyka Visual Basic for Applications ( VBA ) , keď ste nastavenia viac adaptérov . Každý adaptér má trvalé jedinečný identifikačné číslo známe ako MAC adresy . MAC adresa sa používa na identifikáciu adaptéra v počítačovej sieti . Toto číslo je 12 znakov , s oboma číslami a písmenami , ktoré sú oddelené spojovníkom alebo dvojbodkami . Môžete ľahko zistiť MAC adresu vytvorením jednoduchej funkcie pomocou jazyka VBA . Pokyny dovolená 1

Otvorte aplikáciu Microsoft Excel 2007 a ​​typ " Funkcia GetMACAddress ( ) " a stlačte tlačidlo " Enter " pre vytvorenie novej funkcie .
2

Type " Dim objVMI As Object

Dim vAdptr As Variant

Dim objAdptr As Object

Dim adptrCnt As Long " vytvárať premenné .
Sims 3

typu " Nastaviť objVMI = GetObject ( " winmgmts : . \\ \\ " & " " & " \\ root \\ cimv2 " )

Set vAdptr = objVMI.ExecQuery ( " SELECT * FROM Win32_NetworkAdapterConfiguration WHERE IPEnabled = true " ) " na definovať adaptéra objekty .
4

typ " Pre každý objAdptr V vAdptr

Ak nie je IsNull ( objAdptr.MACAddress ) A IsArray ( objAdptr.IPAddress ) Potom

pre adptrCnt = 0 UBound ( objAdptr.IPAddress )

Ak nie je objAdptr.IPAddress ( adptrCnt ) = " 0.0.0.0 " Tak

GetNetworkConnectionMACAddress = objAdptr.MACAddress

Exit pre

End If

Ďalšie adptrCnt

MsgBox " Váš MAC adresa je : " & GetNetworkConnectionMACAddress

End If

Next " prechádzať sieťových adaptérov vo vašom systéme a získať adresu MAC .
5

Typ " End Function " pokiaľ je to nutné a spustiť funkciu . Uvidíte správu s vašou adresou MAC .

• Predchádzajúca strana: Ako používať textové polia v aplikácii Visual Basic 
• Ďalšia strana: Definícia Multiline Visual Basic 6.0