Dim WSHShell Set WSHShell=Wscript.CreateObject("Wscript.Shell") WSHShell.RegDelete "HKCU\Software\Microsoft\Windows\CurrentVersion\Applets\Regedit\LastKey" WSHShell.Run "REGEDIT"