How to open/run Windows Snipping Tool from Access vba?

I want to open/run the Windows 10 snipping tool from Access vba code. The code below produces the error "Windows cannot find 'C:\Windows\System32\SnippingTool.exe' ". Of course the exe file is in that location. Outside of Access, the snipping tool runs as expected. Any ideas? Thanks.

Private Sub cmdSnippingTool_Click()
    Dim strProgramPath As String
    Dim lngResult As EnumShellExecuteErrors
    Dim ShellExecute As New CShellExecute
   
    lngResult = seeNoError
    strProgramPath = "C:\Windows\System32\SnippingTool.exe"
    Set ShellExecute = New CShellExecute
    lngResult = ShellExecute.LaunchProgram(strProgramPath, , , sesSW_SHOWMAXIMIZED)
   
    If lngResult <> seeNoError Then
      MsgBox "Error on LaunchDocument: " & lngResult
    End If
    Set ShellExecute = Nothing
End Sub