OperatingSystem Property Example

This example tests the OperatingSystem property to see whether PowerPoint is running with a 32-bit version of Microsoft Windows.

os = Application.OperatingSystem
If InStr(os, "Windows (32-bit)") <> 0 Then
    MsgBox "Running a 32-bit version of Microsoft Windows"
End If