i have a function
Public Sub TEST() Debug.Print CreateObject("wscript.shell").exec("cmd /V /C wmic os get SerialNumber").StdOut.ReadAll End Sub
it show my serial number in immediate window as
"SerialNumber
00369-41215-48742-AAGTF"
i want this in Cell