VBA Excel : ouvrir un dossier "variable"

Bonjour,

ma question est la suivante : je travaille sur un dossier contenant :
- mon fichier Excel VBA
- des fichiers pdf.

J'ai programmé une macro qui ouvre le dossier contenant les pdf :

Dim Chemin As String

Chemin = "C:\Users\public\Desktop\"
Shell "C:\windows\explorer.exe " & Chemin, vbMaximizedFocus

Cependant, je souhaite transférer le tout sur une clé USB. Le souci est que le chemin d'accès changera en fonction de la lettre attribuée au lecteur "clé USB".
Comment puis-je faire fonctionner ma macro si cette variable change en fonction de l'ordinateur utilisé ?

Merci bcp !!!!!! et bonne journée