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.

Excel kopiowanie przy użyciu makra

censor 29 Maj 2012 23:36 1994 2
  • #1 29 Maj 2012 23:36
    censor
    Poziom 9  

    Napisałem takie dwa makra:

    Kod: vb
    Zaloguj się, aby zobaczyć kod


    Kod: vb
    Zaloguj się, aby zobaczyć kod


    i wszystko działa gdy uruchamiam je ręcznie.
    Gdy chcę je uruchomić poprzez zmianę wartości komórki (0 i 1) formułą:

    Kod: vb
    Zaloguj się, aby zobaczyć kod


    To zaczynają się cuda. :(
    Kopiowany jest inny zakres z innego arkusza tego skoroszytu niż ten w którym znajduje się w/w makro.
    Kopiuje i kasuje komórki w arkuszu pierwszym a nie w tym dla którego jest makro.
    Przegooglałem już internet i nie mogę nic poradzić.
    Proszę o pomoc.

    Proszę pamiętać o używaniu znaczników syntax. Opcja Listing kodu. Proszę to poprawić.- arnoldziq

    0 2
  • #2 30 Maj 2012 07:29
    adamas_nt
    Moderator Programowanie

    censor napisał:
    Tu zaczynają się cuda.
    To może podrzucę kanister z wodą? :)

    Poważnie: Umieść oba makra w module i precyzyjnie "wskaż" Excelowi, którego arkusza dotyczy kod. Przykład z kopiowaniem
    Kod: vb
    Zaloguj się, aby zobaczyć kod
    Staraj się unikać wszelkich niepotrzebnych 'Select', kod z rejestratora bywa zwykle "nieco" nadmiarowy.

    Druga sprawa: zdarzenie arkusza. Wybrałbym 'przy zmianie' i ograniczył do jednej komórki.
    Kod: vb
    Zaloguj się, aby zobaczyć kod
    Chyba, że w tym arkuszu nic więcej się nie dzieje.

    Po trzecie: nazwy makr coś nie pasują ;)

    0
  • #3 30 Maj 2012 13:31
    censor
    Poziom 9  

    Sorki za błąd :oops:
    Powinno być:

    Kod: vb
    Zaloguj się, aby zobaczyć kod


    Siadam sprawdzić czy porada pomoże i odpiszę.

    Dodano po 1 [godziny] 44 [minuty]:

    Po pomocy :please:
    kod przybrał następującą postać:


    Kod: vb
    Zaloguj się, aby zobaczyć kod



    Jeszcze raz wielkie dzięki wszystko działa :D

    0