VBA - chemin, GetSaveAsFileName donne URL/SaveCopyAs travaille avec UNC

Question

• GetSaveAsFileName donne une URL chemin; SaveCopyAs obtiendra un chemin UNC;
• Le fichier n'est pas enregistré.
• Le prozess ne donne pas d'avertissement;
• L'accès SharePoint n'est pas un lecteur mappé; Il a été monté en tant que bibliothèque.
• Je ne peux pas utiliser un chemin constant car l'utilisateur peut choisir un autre mappe de partage.

Ceci est mon code:

'Test: Is the file exists? 

Dim CW_ExportFilePathAndName As String 
CW_ExportFilePathAndName = FilePathForSave & CW_NameSaveFile 
If Dir(CW_ExportFilePathAndName) <> "" Then 
    Dim InitialName As String 
    Dim sFileSaveName As Variant 
    InitialName = CW_ExportFilePathAndName 
    sFileSaveName = Application.GetSaveAsFilename(InitialFileName:=InitialName, fileFilter:="Excel Files (*.xlsm), *.xlsm") 
     If sFileSaveName <> False Then 
      ActiveWorkbook.SaveCopyAs sFileSaveName 
      MsgBox "The source file is saved on an individual name!" 
     Else 
      MsgBox "The source file is not saved!" 
     End If 
Else 
    ActiveWorkbook.SaveCopyAs CW_ExportFilePathAndName 
End If  

Answer 1

Solution: SaveAs peut travailler avec l'URL. Seule la réouverture doit être résolue!