Witam
Chcę zapisać mój plik pdf, dwg, dxf w katalogu głównym folderu rodziców. Ale nie znam kodu, aby to zrobić. Obecnie moje makro tworzy folder pdf, jeśli nie istnieje, i zapisuje w nim plik pdf, ale jest on tworzony w katalogu głównym mojego rysunku i musiałbym, aby został utworzony w folderze nadrzędnym.
Mam nadzieję, że wyraźnie załączyłem mój aktualny kod rejestracyjny.
Pozdrowienia
Mathieu
Nie znam się na makrach, dopiero zaczynam się nimi interesować.
Z drugiej strony znalazłem to na forum: http://forum.excel-pratique.com/excel/trouver-le-nom-du-dossier-parent-du-fichier-excel-t19755.html
Jeśli to może ci pomóc?
Witam
Spróbuj w ten sposób:
'Pobieranie katalogu domowego dossier_base = Left(path, Len(path) - Len(nom_fichier) - 7)
'Pobieranie katalogu nadrzędnego
Dim dossier_parent As String
ChDir ()dossier_base dossier_base
ChDir ".."
chemin = CurDir()
Następnie w każdym typie pliku:
longstatus = Part.SaveAs3(dossier_parent & "DWG\" & nom_fichier & " - " & wersja & ". DWG", 0, 0)
Do zobaczenia
Dziękuję za odpowiedź, ale mam problem z samodzielną modyfikacją tego makra.
Zrobiłem to jakiś czas temu i mam trudności z powrotem do tego, a zwłaszcza z brakiem czasu.
Teraz nie mogę tego zrobić.
Czy możemy jeszcze dziś o tym porozmawiać?
Tak, bez obaw dziękuję za odpowiedzi remrem.
Próbowałem dołączyć twoje linijki kodu, ale to nie działa, musiałem popełnić błąd, jeśli odnosisz większe sukcesy niż ja, z przyjemnością poczekam na twoją odpowiedź.