Open image in 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)
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)