VBA - путь, GetSaveAsFileName дает URL/SaveCopyAs работает с UNC

GetSaveAsFileName дает URL путь;
SaveCopyAs vould get UNC путь;
Файл не сохраняется;
Prozess не дает предупреждения;
Доступ к SharePoint не является подключенным диском; Он был установлен как библиотека.
Я не могу использовать постоянный путь, потому что пользователь может выбрать другой mappe sharepoint.

Это мой код:VBA - путь, GetSaveAsFileName дает URL/SaveCopyAs работает с UNC

'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

источник

2017-02-16 ZolGal

Можете ли вы показать нам, с каким кодом вы работаете? Трудно помочь, когда мы не можем видеть, что вы делаете конкретно, и что происходит неправильно. Также, как вы получаете эти подсказки? Вы предлагаете пользователю их? –

'CW_ExportFilePathAndName = FilePathForSave & CW_NameSaveFile' это то, что дает вам URL-адрес, но ваш код не показывает, как создаются« FilePathForSave »и« CW_NameSaveFile » –

Привет, я прикрепил свой код! Я протестировал путь с помощью msgbox. Мой путь: «\\ [email protected] \ RaWrote \ sites \ DKO \ aaa.xls» Возвращаемое значение: «https: /ecs.tel.de/sites/DKO/aaa1.xls./» Если я хорошо понять ваш второй вопрос: нет, я не. У меня есть информация об этом. Спасибо! Bye, Z – ZolGal

Обход: SaveAs может работать с URL. Только повторное открытие должно быть решено!

источник

2017-02-21 20:02:23 ZolGal

VBA - путь, GetSaveAsFileName дает URL/SaveCopyAs работает с UNC

ответ

Смежные вопросы