Para recuperar o valor do parâmetro OUTPUT de um procedimento armazenado, basta
.Execute o ADODB.Command e, em seguida, recupere o .Value do ADODB.Parameter correspondente, assim:cmd.Execute
' retrieve and display the returned OUTPUT parameter value
Debug.Print cmd.Parameters("@NewPSID").Value