Macro Enregistrer sous et chemin réseau

Bonjour à tous,

J'ai une macro qui enregistre une partie de la page excel sur un nom donné et dans un de mes dossiers.

Celle là, elle fonctionne nickel mais ce que je souhaiterais c'est que mon fichier s'enregistre dans un document qui se trouve le réseau de la société auquel tout le monde à accès... est ce que vous pourriez m'aider à préciser le chemin d'accès ?

Voici l'adresse du dossier dans lequel je souhaite enregistrer le fichier : "\\192.168.1.100\Data\Peter - Magazijnbeheer\Leverbonmap"

    extension = ".xls"
    chemin = Environ("USERPROFILE") & "\Documents\AFHAALBON_TEST\"
    MsgBox ThisWorkbook.Path
    nomfichier = ActiveSheet.Range("B5") & "_AFHAALBON" & extension
    With ActiveWorkbook
        .SaveAs Filename:=chemin & nomfichier
        .Close
    End With

Merci d'avance de votre aide !

Vraiment personne pour m'indiquer le chemin ?