Mac unique identifier | Mac Excel Automation

Home
About
Examples
Articles
Search
Contact

Mac Excel Automation

Home
About
Examples
Articles
Search
Contact

Home
About
Examples
Articles
Search
Contact

__

Mac unique identifier

This code can be useful if you want your code only to work on one Mac.

Sub MachineUniqueIdentifierMac()
'Get the machine unique identifier of a Mac
    Dim ScriptToRun As String
    Dim Answer As String

    ScriptToRun = _
    "set uuid to do shell script ""system_profiler SPHardwareDataType" & _
                " | awk '/Hardware UUID:/ {print $NF}'"""

    On Error Resume Next
    Answer = MacScript(ScriptToRun)
    On Error GoTo 0

    MsgBox Answer

    'Or add it to a cell in your worksheet so you can test
    'if your workbook is running on the correct machine
    'Sheets(1).Range("A1").Value = Answer

End Sub

05/09/2024

© 2024 Ron de Bruin

Web design by Will Woodgate