Preciso acessar via VBA uma pasta hospedada em um servidor de arquivos de rede. A pasta é acessível por escrito apenas por meio de uma conta de serviço (diferente das contas de usuário normais) para a qual eu tenho nome de usuário e senha.

Através da interface do usuário, posso ver essa pasta e mapeá-la como uma unidade local, mas para acessá-la por escrito, preciso fazer logoff do Windows e fazer logon pela conta de serviço.

Existe alguma maneira de acessar a pasta de rede durante uma sessão normal do usuário, mas codificando o nome de usuário e a senha no código VBA?

Eu tentei mapear a pasta como unidade local com:

Set WshNetwork = CreateObject("WScript.Network")
WshNetwork.MapNetworkDrive "S:", "\\corp-server\HostingFolder", False, Username, pwd

mas não funcionou (a unidade "S" não foi mapeada). Se, em vez disso, eu fizer o mesmo, mas sem fornecer nome de usuário e senha:

Set WshNetwork = CreateObject("WScript.Network")
WshNetwork.MapNetworkDrive "S:", "\\corp-server\HostingFolder"

funciona perfeitamente.

Pensando agora se o que estou tentando fazer é realmente possível? Caso contrário, existe alguma alternativa?

obrigado