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 i wklejanie do innego arkusza

Pan_Potrzeba 11 Wrz 2014 10:13 3705 4
  • #1 11 Wrz 2014 10:13
    Pan_Potrzeba
    Poziom 5  

    Mam następujący problem. Zaznaczam też że jestem całkowicie początkujący z VBA.

    Oto zadanie:
    w komórce "A5" arkusza "Arkusz1" znajduje się formuła która zwraca mi wartość liczbową. Zadanie jest wkleić wartość komórki "A5" arkusza "Arkusz1" do kolumny "C" arkusza "Arkusz2". Wartość komórki "A5" zmienia się po każdym filtrowaniu dlatego dobrze by było gdyby wklejane wartości nie były nadpisywane w kolumnie "C" tylko żeby wklejało jedno pod drugim.

    Jak narazie udało mi sie coś takiego uzyskać

    Kod: vb
    Zaloguj się, aby zobaczyć kod


    ten kod kopiuje komórkę "A5" z arkusza "Arkusz1" do kolumny "C" do arkusza "Arkusz1" a ja chce do arkusza "Arkusz2".

    Wie ktoś jak to rozwiązać? Będę wdzięczny za każdą pomoc.

    0 4
  • #2 11 Wrz 2014 10:53
    JRV
    Specjalista - VBA, Excel

    Pan_Potrzeba napisał:
    Sheets("arkusz2").Select

    To jest trochę zaskakujące, że nie działa przełącznik do Arkusz2.
    W mojej wersji nie jest ważne z dużych lub małych liter nazwy arkusza

    0
  • #3 11 Wrz 2014 11:01
    Pan_Potrzeba
    Poziom 5  

    Poprawiam
    Faktycznie ta komenda w tym kodzie powoduje mi że ostatecznie otwiera mi Arkusz2 ale nie wkleja mi mojej wartości z "A5" do tego arkusza tylko wkleja do "Arkusz1"

    0
  • Pomocny post
    #4 11 Wrz 2014 11:15
    JRV
    Specjalista - VBA, Excel

    Range("A5").Copy
    Sheets("arkusz2").Range("c" & Rows.Count).End(xlUp).Offset(1, 0).PasteSpecial Paste:=xlValues

    0
  • #5 11 Wrz 2014 11:19
    Pan_Potrzeba
    Poziom 5  

    SUPER!
    Działa jak należy!
    Temat zamknięty.

    1