I wrote a short article on this topic (sorry in French) a year ago.
Here is a general solution using a small VBS script to launch PowerShell by hiding its window (the trick is in the last one , 0 ).
Set Args = Wscript.Arguments
'MsgBox "Chemin LDAP: " & Args(0)
'MsgBox "Classe: " & Args(1)
Set objShell = CreateObject("Wscript.Shell")
objShell.Run "c:\Windows\System32\WindowsPowerShell\v1.0\powershell.exe -nologo -Noninteractive -file c:\SlxRH\RhModif.ps1 " & chr(34) & Args(0) & chr(34) , 0
PowerShell slxPShell2.EXE.