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 Excel - Kopiowanie arkuszy do nowo utworzonego pliku

kaliblunt 17 Lip 2013 21:37 3582 7
  • #1 17 Lip 2013 21:37
    kaliblunt
    Poziom 10  

    Witam Wszystkich;

    Za pomocą komendy Workbooks.Add tworzę nowy plik, chcę skopiować wszystkie arkusze z poprzedniego do nowo utworzonego. Próbuję zrobić to tak:

    Kod: vb
    Zaloguj się, aby zobaczyć kod

    Wykrzacza się w ostatniej linijce kiedy wskazuje "newName" jako workbook do którego mają być skopiowane arkusze.
    Jak wpiszę z ręki "nazwa_pliku.xls" to makro działa.

    Proszę o pomoc.
    Pozdrawiam Piotr

    0 7
  • Pomocny post
    #2 17 Lip 2013 22:08
    adamas_nt
    Moderator Programowanie

    Zdaje się, że przypisujesz źle do newName. Nazwa różni się od newPath, pod którą zapisujesz plik. Sprawdź krokowo.

    Nie będzie prościej zapisać plik (me.SaveAs) z inną nazwą? Zawartość ma być przecież identyczna.

    P.S. Kod umieszczaj w znacznikach syntax. Post poprawiłem [mod].

    0
  • #3 18 Lip 2013 18:41
    kaliblunt
    Poziom 10  

    adamas_nt dzięki za pomoc, faktycznie znalazłem prostszy sposób na osiągnięcie celu:

    Kod: vb
    Zaloguj się, aby zobaczyć kod


    Pozdrawiam :)

    0
  • #4 30 Lip 2018 23:04
    M_Sumo
    Poziom 4  

    Proszę Was o poradę dot. wstawiania/kopiowania arkusza na koniec istniejących arkuszy w skoroszycie bez względu na ilość arkuszy.

    Sheets("C").Copy After:=Workbooks("A").Sheets(11)

    0
  • #5 31 Lip 2018 08:59
    kinggustav
    Poziom 20  

    Może tak: Sheets("C").Copy After:=Workbooks("A").Sheets(sheets.count-1)

    0
  • #6 31 Lip 2018 23:58
    M_Sumo
    Poziom 4  

    Ten zapis sprawia, że arkusz pojawia się przed innymi arkuszami na początku.

    0
  • #7 01 Sie 2018 16:35
    clubs
    Poziom 31  

    Kod: vbscript
    Zaloguj się, aby zobaczyć kod

    0
  • #8 01 Sie 2018 22:28
    M_Sumo
    Poziom 4  

    Dziękuję "clubs".
    Ten kod się sprawdza. Kopiowany arkusz wstawia się zawsze na końcu, niezależnie od ilości obecnych arkuszy.

    0
  Szukaj w 5mln produktów