Открытое изображение в VBA

  sCmd = "rundll32.exe %windir%\system32\shimgvw.dll,ImageView_Fullscreen"
  sImageName = "C:\Someplace\StudentImage.jpg"
  set oWS = createobject("wscript.shell")
  set oExec = oWS.Exec(sCmd & " " & sImageName)
Braxton Bell