Elektroda.pl
Elektroda.pl
X
Please add exception to AdBlock for elektroda.pl.
If you watch the ads, you support portal and users.

[VBA Excel] - kopiowanie i wklejanie do innego arkusza

Pan_Potrzeba 11 Sep 2014 10:13 9033 4
  • #1
    Pan_Potrzeba
    Level 8  
    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ć
    Code: vbscript
    Log in, to see the code


    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.
  • #2
    JRV
    VBA, Excel specialist
    Pan_Potrzeba wrote:
    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
  • #3
    Pan_Potrzeba
    Level 8  
    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"
  • Helpful post
    #4
    JRV
    VBA, Excel specialist
    Range("A5").Copy
    Sheets("arkusz2").Range("c" & Rows.Count).End(xlUp).Offset(1, 0).PasteSpecial Paste:=xlValues
  • #5
    Pan_Potrzeba
    Level 8  
    SUPER!
    Działa jak należy!
    Temat zamknięty.