Vous pouvez le faire via ce petit script :

Dim WSHShell
Dim Identite,Usn

Identite = "{n°id}"
Set WshShell = CreateObject("WScript.Shell")
with WshShell
.regwrite "HKCU\Identities\Start As",Identite,"REG_SZ"
.regwrite "HKCU\Identities\Last User ID",Identite,"REG_SZ"
.regwrite "HKCU\Identities\Default User ID",Identite,"REG_SZ"
Usn=.regread ("HKCU\Identities\" & Identite & "\Username")
.regwrite "HKCU\Identities\Last Username",Usn,"REG_SZ"
.Run "msimn.exe"
End with
Set WshShell=Nothing


Où vous remplacez N°ID par le N° ID de l'identité à ouvrir. (avec les accolades). Vous pourrez trouver ces numéros USER_ID par exemple dans le registre à HKCU / Identities ou en exécutant ce fichier .

Sauvegardez ce script dans un fichier texte que vous nommez avec une extention .vbs

Pour mettre une icône à ce fichier, le plus simple est d'en faire un raccourci et d'en changer l'icône.

Ici, les détails de cette manipulation en photos.

(Paskal)