Πώς να χρησιμοποιήσετε ένα VBA να βρείτε ένα Mac Διεύθυνση

Είναι χρήσιμο να γνωρίζουμε πώς να ελέγξει τη διεύθυνση Media Access Control ( MAC ) με τη χρήση της Visual Basic for Applications ( VBA ) όταν είστε δημιουργία πολλούς προσαρμογείς . Κάθε προσαρμογέας έχει μια μόνιμη μοναδικό αριθμό ταυτοποίησης γνωστή ως διεύθυνση MAC . Η διεύθυνση MAC χρησιμοποιείται για την αναγνώριση του προσαρμογέα σε ένα δίκτυο υπολογιστών . Ο αριθμός είναι 12 χαρακτήρες , με τους δύο αριθμούς και τα γράμματα , που χωρίζονται με παύλες ή ερωτηματικά . Μπορείτε εύκολα να ελέγξετε τη διεύθυνση MAC , δημιουργώντας μια απλή λειτουργία χρησιμοποιώντας VBA . Οδηγίες
Η

1 Ανοίξτε το Microsoft Excel 2007 και του τύπου " GetMACAddress Function ( ) " και πατήστε "Enter " για να δημιουργήσετε μια νέα λειτουργία . 2

Τύπος "Dim objVMI As Object

Dim vAdptr Όπως Παραλλαγή

Dim objAdptr As Object

Dim adptrCnt Όπως Long " για να δημιουργήσετε τις μεταβλητές σας .
εικόνων 3

Τύπος " Set objVMI = GetObject ( " winmgmts : . \\ \\ " & " " & " \\ root \\ cimv2 " )

Σετ vAdptr = objVMI.ExecQuery ( " SELECT * FROM WHERE Win32_NetworkAdapterConfiguration IPEnabled = True " ) " για να καθορίσει τα αγαθά προσαρμογέα σας .
Η 4

Τύπος " For Each objAdptr Σε vAdptr

If Not IsNull ( objAdptr.MACAddress ) Και IsArray ( objAdptr.IPAddress ) Στη συνέχεια

για adptrCnt = 0 να UBound ( objAdptr.IPAddress )

If Not objAdptr.IPAddress ( adptrCnt ) = " 0.0.0.0 " τότε

GetNetworkConnectionMACAddress = objAdptr.MACAddress

Έξοδος για

End If

Επόμενο adptrCnt

MsgBox " MAC διεύθυνση σας είναι : " & GetNetworkConnectionMACAddress

End If

Next "για να βρόχο μέσω τους προσαρμογείς δικτύου στο σύστημά σας και να πάρετε τη διεύθυνση MAC σας .
5

Τύπος " End Function " αν χρειαστεί και να εκτελέσετε τη λειτουργία σας . Θα δείτε ένα μήνυμα με τη διεύθυνση MAC .
Η
εικόνων