Trovare il percorso per il desktop

Donald sta scrivendo una macro in cui si deve fare riferimento desktop di un utente. Tuttavia, il percorso al desktop varia necessariamente da sistema a sistema e utente a utente. Si chiede cosa codifica che può usare per determinare il percorso sul desktop, indipendentemente dal sistema.

Ci sono diversi modi per trovare il percorso per il desktop in VBA. Un modo è quello di chiamare il padrone di scripting di Windows, in questo modo:

Funzione GetDesktop () As String
Dim oWSHShell As Object

Set oWSHShell = CreateObject ("WScript.Shell")
GetDesktop = oWSHShell.SpecialFolders ("Desktop")
Set oWSHShell = Nothing
End Function

Si noti che questa è una macro definita dall'utente che è possibile utilizzare sia dal foglio di lavoro o da un altro macro. L'uso del foglio sarebbe come segue:

= GetDesktop ()

Un altro modo per determinare il percorso per il desktop è di utilizzare la seguente riga nel codice:

sPath = Environ ("PROFILOUTENTE") & "\ Desktop"

ExcelTips è la vostra fonte per la formazione Microsoft Excel conveniente. Questo suggerimento (8233) si applica a Microsoft Excel 97, 2000, 2002, e 2003. È possibile trovare una versione di questo suggerimento per l'interfaccia ribbon di Excel (Excel 2007 e versioni successive) qui: trovare la via per il Desktop.