Eu estou tentando obter excelentes salvar e abrir caixas de diálogo para abrir o "meu computador" por padrão para que o usuário possa selecionar uma unidade de lá.

Eu tenho as caixas de diálogo para abrir a qualquer caminho em qualquer unidade ou meus documentos, etc, mas não consigo encontrar uma maneira para que ele abra para o meu computador.

Este é o código que estou usando no momento e funciona bem para um caminho conhecido:

MsgBox objFolders("desktop")
ChDrive objFolders("desktop")
ChDir objFolders("desktop")

strFileName = appRemoteApp.Workbooks("Export Template.xlsm").Application.GetSaveAsFilename(objFolders("desktop") & "\Replica Export " & UserName & " " & Format(Date, "yymmdd") & ".xlsm", FileFilter:="Excel Macro Enabled Workbook (*.xlsm), *.xlsm,")     

Além disso, eu encontrei isso deesse site.

Se você colar::{20D04FE0-3AEA-1069-A2D8-08002B30309D} na barra de endereços do Windows Explorer leva você para o meu computador, mas se eu usar isso no meu código VBA

ChDir "::{20D04FE0-3AEA-1069-A2D8-08002B30309D}"

diz que não pode encontrar o diretório ou algo assim. Portanto, não tenho certeza se há um trabalho para isso ou algo assim.

Isso também não funcionou:

ChDir "C:\WINDOWS\explorer.exe /root,,::{20D04FE0-3AEA-1069-A2D8-08002B30309D}" 

A razão que eu estou querendo ter as caixas de diálogo abertas para o computador é que estaremos hospedando o excel doc em um servidor windows com acesso através de RemoteApp e área de trabalho remota. Os usuários não terão acesso (direitos) às unidades e pastas dos servidores etc, eles só terão acesso às suas próprias unidades em suas máquinas locais que serão mapeadas e ficarão visíveis sob a pasta "Meu Computador" dos servidores por falta de uma melhor palavra. O documento mestre no servidor gera uma réplica usando o código VBA e é salvo no disco rígido local dos usuários.