Elektroda.pl
Elektroda.pl
X
Proszę, dodaj wyjątek www.elektroda.pl do Adblock.
Dzięki temu, że oglądasz reklamy, wspierasz portal i użytkowników.

vba - Tworzenie plików Pdf

BlooQ 18 Lip 2016 18:03 1362 10
  • #1 18 Lip 2016 18:03
    BlooQ
    Poziom 7  

    Hey
    Może ktoś z was spotkał się z takim problemem i pomoże. Mam plik pdf o nazwie "a" i i chciałbym makrem z excelu skopiować ten plik i zapisać go pod nazwami z komórek z zakresu a1:a8. W efekcie otrzymał bym w określonej lokalizacji 8 tych samych plików pdf ale pod innymi nazwami.

    0 10
  • Pomocny post
    #2 18 Lip 2016 18:52
    JRV
    Specjalista - VBA, Excel

    Np.
    FileCopy "C:\Folderz\cos.pdf", "D:\Kopie\" & Range("A1")
    Dla zakresu zrob to w petli. Plik ma byc zamkniety.

    0
  • #3 19 Lip 2016 11:22
    BlooQ
    Poziom 7  

    Witam
    Wszystko fajnie ale kopiowane pliki zapisywane są w lokalizacji sieciowej. I tu jest problem. Kopiowanie do folderów nie będących w lokalizacji sieciowej działa natomiast zapisanie plików w lokalizacji sieciowej nie działa.

    0
  • #4 19 Lip 2016 12:52
    JRV
    Specjalista - VBA, Excel

    BlooQ napisał:
    w lokalizacji sieciowej nie działa.
    - jest komunikat o błędzie?
    Może ma to związek z prawami dostępu. Wpis na trasie sieci lub dysku sieciowym podłączonym?

    0
  • #5 19 Lip 2016 18:38
    BlooQ
    Poziom 7  

    Nie ma żadnego komunikatu. Makro zachowuje się tak jak by zrealizowało swoje zadanie, jednak pliki na dysku sieciowym nie pojawiają się. Prawa dostępu także odpadają. Mogę pliki tam zapisywać.

    0
  • #6 19 Lip 2016 22:03
    clubs
    Poziom 29  

    Witam

    a zobacz tak

    Kod: vbscript
    Zaloguj się, aby zobaczyć kod

    0
  • #7 20 Lip 2016 10:08
    kinggustav
    Poziom 19  

    A jakim dokładnie kodem próbujesz to kopiować? Może chodzi o sam zapis lokalizacji sieciowej? Czy ten folder masz zmapowany jako dysk (jakiś T: np.)?

    0
  • #8 21 Lip 2016 07:12
    BlooQ
    Poziom 7  

    Oto kod

    Kod: vbnet
    Zaloguj się, aby zobaczyć kod

    0
  • Pomocny post
    #9 21 Lip 2016 10:42
    kinggustav
    Poziom 19  

    Jak podejrzewałem ścieżka docelowa jest błędna. Spróbuj tak:
    FileCopy "C:\Users\xxx\Desktop\Nowy folder\dokument.pdf" , "\\192.168.0.108\PDF\" & Worksheets("Konfiguracja").Range("F14").Value & ".pdf"
    Nie mam pewności czy z tym \\adresip pójdzie (nigdy tak nie próbowałem), choć powinno. Jak nie to pomyślimy co dalej.

    0
  • Pomocny post
    #10 21 Lip 2016 10:55
    JRV
    Specjalista - VBA, Excel

    BlooQ napisał:
    "C:\Users\dpie\Desktop\1\"& "\\192.168.0.108\PDF\" & Worksheets("Konfiguracja").Range("F14") & ".pdf
    - 192.168.0.108 - jest to folderz?

    0
  • #11 22 Lip 2016 10:39
    BlooQ
    Poziom 7  

    Ok faktycznie teraz już działa. Dzięki.

    0