“Imagem aberta em VBA” Respostas de código

Imagem aberta em 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)