Witajcie, mam ogromną prośbę o pomoc w stworzeniu makra dla pliku. Męczę się z tym już kilkanaście godzin i niestety brakuje mi zwyczajnie wiedzy programowania VBA. Czy ktoś z Was mógłby mi pomóc stworzyć marko? Wkrokach opiszę co chciałbym, aby makro robiło. 1.Po naciśnięciu przycisku ( wiem jak przypisac marko do przycisku) odblokuj aktualny skoroszyt....
Tak tez probowalem,ale Jak w komorce zaznacze archiwizuj wiersz i ten wiersz zaznaczam, wycinam, w drugim arkuszu znajduje pierwszy wolny wiersz i wklejam. Super tylko, ze jak zrobic ,by wycial ten z zaznaczona komorka i znalazl pierwszy wolny wiersz. W tym drugim arkuszu. By tam wkleic. Ok probowalem makro zrobic nawet na zasadzie, by w tym drugim...
Witam, Mam problem którego jeżeli nie uda mi się rozwiązać w postaci kodu vba będę chyba siedział tydzień kopiując ręcznie dane. Chciałbym żeby kod kopiował zakres danych z Arkusza1 Kolumny A pomiędzy kolejnymi pustymi wierszami i wklejał je transpozycją do arkusza 2. W pliku wysyłam dane i w Arkuszu2 jak chciałbym żeby kolejne pozycje były przedstawiane.
w miejsca w których powinny być, czyli w miejscach w których pojawiają się w drugim arkuszu Jak makro ma to ocenić? Co z wierszami bez indeksu w A? Myślałam żeby znaleźć te wartości z prawda i ich indeks minus 1 wtedy indeks plus 1 wstawić pusty wiersz i wstawiać wiersze
Dziękuję wszystkim za pomoc. Problem rozwiązany. Jak to zrobiłem. Może komuś się przyda: 1. Trzeba zmienić wyświetlanie znaków niewidocznych - Opcje - Wyświetlanie - Pokaż wszystkie znaczniki formatowania 2. Z ori pliku trzeba usunąć znaki nowego akapitu przez Ctr-H - Więcej - Specjalne - Znak akapitu (Uwaga: może być dwa razy i generuje różne znaki...
Witam potrzebuję pomocy z vba otóż chciałbym żeby stworzyć makro które kopiuje i wkleja wartości(bez formatów jest taka opcja w excelu wklej wartości) ale żeby to makro przeszukało mi pewien zakres np g2 do h30 i jeżeli w np w g15 = "" lub w innej komórce albo w h 23 = "" itd. Wtedy kopiowało mi cały ten wiersz np a5 do h5 i wklejało np od l1 do s1...
troszkę nie kminię pomysłu , daj przykład paru komórek jak powinny wyglądać Przecież autor załączył fotkę Proponuje wpisać w A1 1 i w A2 1 zaznaczyć A1 i A2 złapać z róg i skopiować w dół do A32 A33 wpisać =A1+1 i skopiować w dół do A64 Zaznaczyć komórki od A33 do A64 złapać za prawy dolny róg i przeciągnąć/skopiować w dół aż do ostatniego wiersza...
Witam, mam następujący problem i byłbym bardzo wdzięczny za każdą okazaną pomoc. Plik z przykładem dodaję w załączniku. W arkuszu przechowuję dane o różnej wielkości. Raz 20 wierszy jak w przykładzie, a czasami mniejsza ilość. Chciałbym zrobić makro które przeszukuje zakres danych i jeżeli w kolumnie D (godzina) znajdzie pustą komórkę to wytnie cały...
Witam. Głowię się nad problemem już kilkanaście godzin i szczerze nie mogę znaleźć rozwiązania. Moim problemem jest schemat zamieszczony na zdjęciu: https://obrazki.elektroda.pl/8456052100_... Chodzi o to, że chcę skopiować wiersze z jednego arkusza, które zamieszczone są jeden po drugim, bez pustych komórek, do innego arkusza, znajdującego...
makro czyszczące dane z bloku pierwszego jest celowo przypisane tylko do pierwszego bloku Nie zrozumiałeś lub nie doczytałeś mojego postu :D ja pisałem tylko o Twoim makrze "dodaj" zamiast działań typu Kod: vbscript Chodzi o to, żebyś w tym makrze "dodaj" wymienił sekwencje czyszczącą na procedurę czyszczenia zastosowaną uprzednio (z powodzeniem) w...
Hej, Mam problem z excelem. Raz w miesiacu musze uzupelniac tabele ze szkoleniami jakie odbyli pracownicy w danym miesiacu- 200 osob 37 roznych szkolen. Dane dostaje w wersji Jan Kowalski szkolenia HR 20/01/2019 musze je przepisac do tabeli gdzie w kolumnie mam nazwe szkolen, a wiersze odpowiadaja danym pracownikom. Jestem w stanie do pustej tabeli...
Tak jak masz funkcję [syntax=vb]Private Sub GetDataFromRow(iRow As Integer) With ThisWorkbook.Worksheets("baza") Me.TextBox1.Text = .Range("A" & iRow) Me.TextBox2.Text = .Range("B" & iRow) Me.TextBox3.Text = .Range("C" & iRow) Me.ComboBox2.Value = .Range("D" & iRow) Me.ComboBox1.Value = .Range("e" & iRow) Me.TextBox6.Text = .Range("f" & iRow) Me.ComboBox3.Value...
Dobrze trafiłeś. Programowanie to nie to samo co kopiowanie i wklejanie. Trzeba troszkę własnej inicjatywy. A co zrobiłeś z tą: przed kopiowaniem usunięcie wierszy z pustymi komórkami podpowiedzią? Idąc tokiem Twojego rozumowania na elce powinien powstać dział CTRLC/CTRLV o co niniejszym w imieniu autora postuluję. :D
Hej Chodzi mi o wszystkie pełne wiersze poniżej i wklejenie tego zakresu o wiersz wyżej. Kod trochę zmieniłam na swoje potrzeby i obecnie wygląda jak poniżej, zaznacza i kopiuje 1000 wierszy (tu wolałabym żeby zaznaczał wszystkie pełne) po pierwszym pustym ale brakuje mi wklejania skopiowanego zakresu o wiersz wyżej. Sub usuniecie() Application.ScreenUpdating...
Cześć, mam makro, które wkleja mi konkretne wartości z różnych kolumn z pliku Dane do nowego pliku. Niestety nie umiem przerobić tego makra tak, żeby otwierać ten plik z którego wklejam tylko raz. Bo teraz za każdym razem przy kopiowaniu z kolumny A muszę otworzyć plik, a potem jak kopiuję z kolumny C znowu otwiera mi się okienko w którym muszę wybrać...
witam :) Chciałbym napisać w Excelu w VBA funkcje, która kopiowałaby z ustalonego zakresu komórek tekst do pamięci (do schowka) po czym można by go było gdziekolwiek wkleić z zachowanie formatu i stylu tekstu, dat, godzin itd. Najlepiej zobrazuje to zdjęcie poniżej i pliki z załącznika. http://obrazki.elektroda.pl/3451101200_1... Efekt...
Hmm a jeśli wykorzystałam poprzednie makro, które napisałam, które wstawia dodatkowy wiersz jeśli suma>20 i odwołuje się do niego. Natomiest nowe makro ma wyszukiwac pustego wiersza i wklejać do nowo otwartego pliku zakres 1:pusty wiersz do określonej zakłądki AERO. Mam coś takiego, ale wyrzuca mnie(po wstawieniu Breakpointu) w odwołaniu do otwarcia...
Witajcie Szukam sposobu by skanując produkt, zaznaczyć komórkę w odpowiednim rzędzie i kolumnie. Rozkład jest taki: A1 - zeskanowany numer z "Numer porządkowy" (A4:A10) B1 - zeskanowana waga C1 - ilość tabel F1 - wierszu z porównanego kodu (A1 z zeskanowanym) Schemat przebiega tak: zaznaczam komórkę (np: A1) -> skanuje (wkleja skan) w zaznaczoną komórkę...
Hej, Mam problem z excelem. Raz w miesiacu musze uzupelniac tabele ze szkoleniami jakie odbyli 200 osob 37 roznych szkolen. Dane dostaje w wersji Jan Kowalski szkolenia HR 20/01/2019 musze je przepisac do tabeli gdzie w kolumnie mam nazwe szkolen, a wiersze odpowiadaja danym pracownikom. Jestem w stanie do pustej tabeli przy pomocy formul przeniesc...
Teraz działa dobrze ale tylko wtedy kiedy wpisuje pojedyncze wartości. Jeśli wklejam kilka wartości to wartości "AAA" nie są zamieniane. Druga sytuacja jeśli wklejam kilka wartości a pierwsza wartość to "AAA" to wszystkie wartości wklejane zostają zastąpione wartością "BBB" nawet puste komórki. Wstępna ocena dostępnych informacji Witam ponownie, Zrozumiałem,...
Dzień dobry, od dłuższego czasu szukam sposobu na zaznaczanie w Excelu wiersza i kolumny aktywnej komórki. Internet jest pełny rozwiązań wykorzystujących formatowanie warunkowe lub wprost kolorujących te wiersze i kolumny, znalazłem jednak leciwy już, ale fenomenalny w swojej istocie kod, który zamiast kolorowania po prostu zaznacza wiersz i kolumnę...
Ale jakich makr nie umiesz stworzyć? Ja tego nie zrozumiałem. To po kolei: 1. Do arkusza "Firma 1" wklejam dane z innego pliku od kolumny E do AB - mniej ważne gdzie to wklejasz, ważniejsze co dokładnie. Czy umiesz określić zakres do kopiowania? np. A5:Z123, albo kolumny A do Z od wiersza 5 do ostatniej wartości w kolumnie C (nie może być w tej kolumnie...
(at)ArutlupeS Jeżeli nie wiesz jak to zrobić to otwórz notatnik, na pulpicie bo tam zapewne masz FRST. Do notatnika wklej wiersze wyszczególnione przez Kolobosa i zapisz notatnik z nazwą : fixlist.txt Następnie w FRST kliknij zakładkę "napraw". Utworzy się nowy plik.
Cześć, Mam taki problem z makrem i Vlookupem. Chciałbym aby w kolumnie 7 w pliku 2 wklejały mi się wartości z kolumny 6 pliku 1 jeżeli jest różna od tej w pliku 2. jeżeli wartości są takie same lub nie ma Dane 2 w pliku 1 to niech wiersz będzie pusty. Odniesieniem jest kolumna B. Tak żeby to wyglądało jak w załączniku. Póki co udało mi się napisać poniższe...
Cześć, Mam taki problem z makrem. Chciałbym aby w kolumnie 7 w pliku 2 wklejały mi się wartości z kolumny 6 pliku 1 jeżeli jest różna od tej w pliku 2. jeżeli wartości są takie same lub nie ma Dane 2 w pliku 1 to niech wiersz będzie pusty. Odniesieniem jest kolumna B. Tak żeby to wyglądało jak w załączniku. Póki co udało mi się napisać poniższe : [syntax=vbscript]Set...
Dziękuje bardzo za zainteresowanie tematem. Próbowałem jeszcze raz sam coś zdziałać na podstawie waszych sugestii ale poległem. Przesyłam w załączeniu arkusz z problemem. Sposób działania arkusza przedstawia się następująco: W zakładce DANE wklejany jest wiersz z innego pliku, w którym są wprowadzane pewne wartości na Stanowiskach nr 1-7. Jeżeli nie...
Przetestuj [syntax=vb]Sub y() Dim rRng As Range 'definicja przetwarzanego zakresu Set rRng = Range(Cells(7, 3), Cells(19, 15)) 'wpisanie wartości z nagłówków kolumn 'najpierw formuły odnoszące się do wiersza 4 rRng.SpecialCells(xlCellTypeConstants).F... = "=R4C" 'wklejenie jako wartości For Each cl In rRng.SpecialCells(xlCellTypeFormulas) cl.Value...
Witam! Może ktoś pomoże. Problem jest nastepujący: W arkuszu1 mam dane: Kolumna A ( np: 20 nazwisk), kolumnach B,C,D dane handlowe dotyczące tych 20 ludzi. Codziennie wpływają nowe dane. Nastepne arkusze 2,3...21 nazywam nazwiskami tych handlowców, w których mam już skopiowane dane z poprzednich dni. Kopiowanie odbywa sie recznie.To jest:Kopiowanie...
Dokładnie tak, a warunek jest dlatego taki bo wyszukane wyniki podświetlam kolorkiem tzn jeśli chodziło mi o zmianę koloru to chodzi mi o kolor tła komórki a właściwie wierszy :) Chciałbym wykonywać to tak 1. w pierwszym arkuszu daję aby mi wyszukało i podświetliło na dany kolor // to mam już zrobione 2. jeśli arkusz jest pusty to kopiuje nagłówek tabeli...
Witam Mam problem z zamieszczaniem wpisów oraz treśći stron. Za każdym razem kiedy pisze coś samodzielnie tworza sie po publikacji strasznie duże odleglosci miedzy wierszami . Dzieje sie tak kiedy do przejscia do nastepnego wiersza uzywam enter- wtedy okazuje sie ze miedzy kolejnymi wierszami jest dodawany nastepny pusty . Nie ma tego tylko kiedy wklejam...
Ok sory źle to wytłumaczyłem, więc tak : 1. Wchodzisz do pliku rejestr 2. Uruchamiasz makro przyciskiem "wygeneruj zlecenie cent" 3. Makro przypisane do tego przycisku robi to: a. Generuje kolejny numer w najbliższym pustym wierszu. b. Otwiera wzór zlecenia o nazwie zlecenie cent C. Kopiuje nowo nadany numer w rejestrze i wkleja go do otwartego wzoru...
Witam, Zapętliłem się do tego stopnia, że mając prostą pętlę czytającą wiersze między skoroszytami, ni w ząb nie potrafię jeszcze ugryźć jak sądzę funkcji IF - dla podanego na wstępie warunku sprawdzenia (tutaj w przykładzie "cyfry miesiąca") i przepisania wiersza jeśli ten warunek został spełniony - jeżeli nie, kod ma czytać dalej aż znajdzie i kolejny...
Cześć ponownie. Ostatnio trochę tutaj was męczę, ale obiecuje że jak już będę w tym dobry to też będę pomagał ;) Tymczasem mam takie coś: Procedura przeszukuje arkusz rząd po rzędzie. Jeżeli trafi na na dane, w tym przypadku są to ciągi znaków w osobnych komórkach, sprawdza czy można je wkleić wiersz wyżej itd aż natrafi na dane w wierszach powyżej....
Cześć, Mam problem. Muszę porównać Stary plik z Nowy. Chciałbym, aby w kolumnie D w pliku Nowy wstawiała się wartość z pliku C dla danego zamówienia + plus komentarz np "Uwaga zmiana ilości z "wartość ze starego pliku" na "wartość z nowego pliku". Dodatkowo w kolumnie E pliku Nowy wklejały się wartości nie występujące w plik Nowy. Przykładowo w Nowym...
Witam, Mam dość pilny problem do usunięcia (koniecznie dzisiaj...) a nie jestem sobie w stanie z nim poradzić. Nie chcę się narzucać ale to naprawdę ważne :( Podczas logowania do profilu pojawia się informacja, że wystąpił problem z explorer.exe i musi on zostać zamknięty - oczywiśćie okienka nie działają(w Trybie awaryjnym również). Na początku myślałem,...
To jest NIE-SA-MO-WI-TE! Działa! Excel/programowanie jest przepotężne. Robiłem ten "kod" za pomocą nagrywania makro oraz dodawałem coś od siebie, żeby to działało automatycznie. Asem w kodowaniu VBA nie jestem, ale jeżeli mój działał, to działał, a że działał tak sobie, to zwróciłem się o pomoc do (jak widać) odpowiedniej grupy użytkowników. (^_^)...
Witam, stworzyłem makro które pobiera dane z zamkniętego pliku i wkleja dane w wyznaczone miejsce w drugim pliku. Z makrami dopiero początki, więc kopiuje gotowe kody i próbuje je odpowiednio dopasować [syntax=vbnet]Option Explicit Private Function GetValue(path, file, sheet, ref) Dim arg As String If Right(path, 1) <> "\" Then path = path &...
https://obrazki.elektroda.pl/3848154100_... Sonoff R5 Scene Controller to zasilany bateryjnie zdalny przełącznik ścienny z sześcioma przyciskami obsługującymi trzy typy zdarzeń (kliknięcie, podwójne naciśnięcie lub przytrzymanie). Zwykle jest sparowany z Sonoff Gateway, ale tutaj pokażemy, jak można go sparować z urządzeniem ESP32...
Aby nie rozbijać wątku na PW - postanowiłem wkleić moją porażkę: Witam, wiesz powiem wprost zagadnienie mnie przerosło i czas mnie sporo goni o tyle o ile rozumiem lub prawie rozumiem to co pisze to jednak nie rozumie tego co makro robi. Doskonale zdaję obie sprawę z moich braków w językach programowania i dlatego zwracam się do ciebie poprzez PW. Makro...
Super! Dokładnie o to chodziło! Tabela przestawna rozwiązuje sytuację. Ale żeby ją utowrzyć, trzeba mieć zbiorczo podsumowane wszystkie faktury, bez pustych wierszy. Jak to zrobić automatycznie dla wszystkich arkuszy? Żeby było tak jak na screenie :) https://obrazki.elektroda.pl/1574377400_... EDIT: nie trzeba mieć pustych wierszy -...
te co dałeś w 1 punkcie te ustawienia to na 192.168.1.1 w zakladkach tego nie ma tzn nie podales dokladnej sciezki mozesz pomoc dokladniej? Podsyłam zdjęcie z ustawieniami https://obrazki.elektroda.pl/6959552800_... (at)ElektrodaBot te co dałeś w 1 punkcie te ustawienia to na 192.168.1.1 w zakladkach tego nie ma tzn nie podales dokladnej...
Witam. Owszem jest to do zrobienia...mało z tego całkiem prosto :D... Zacząć nalezy od makra, które tworzy nowy arkusz...nastepnie wklejane są dane i numer...nastepnie wydruk arkusza o numerze [ilosc arkuszy]...nastepnie zamkniecie arkusza o tym samym numerze... a wszystko w pętli aż do natrafienia na pusty wiersz - bez danych
Wklej do modułu i przeanalizuj[syntax=vb]Sub Analiza() Dim wkSrc As Worksheet Dim wrsDane As Long, wrsFore As Long Dim test As String Set wkSrc = Sheets("dane") wrsDane = 2 wrsFore = 2 '1-sza faza 'sprawdzamy tylko te, gdzie kol.ABD są zgodne With Sheets("forecast") Do While .Cells(wrsFore, 1) <> "" 'warunkiem poprawnego działania jest brak "dziur"...
Przepraszam, faktycznie podałem mało informacji, ale pisząc post zakładałem, że problem jest już rozwiązany, nie szukałem pomocy, chciałem osobom, którym Excel sprawi podobne kłopoty zasugerować, co może pomóc. A to ma sens na dużym poziomie ogólności, wątpię, żeby kod tu wiele pomógł, zwłaszcza mało zaawansowanym użytkownikom makr, takim jak ja. Do...
Słaby pomysł z tym oknem dialogowym - trzeba się naklikać i to niepotrzebnie chyba, bo kolega napisał, że ma już otwarte pliki. Z innej beczki: 1. Jak wybrać te pliki? Mają może jakąś charakterystyczną część nazwy? Nie może to być taka sama nazwa jeżeli są jednocześnie otwarte. 2. Jak zidentyfikować arkusz do kopiowania? Może być stała nazywa, albo...
Nie do końca łapię, dlaczego polecenie: logs.bat [syntax=dos](at)echo off &:: log_with_fifo.bat setlocal rem przypisz argumenty set "a=%*" rem jeśli pierwszy argument nie jest pusty rem jeśli pierwszy argument to /fifo wywołaj obsługę strumienia/pliku if "%~1" neq "" if /i "%~1"=="/fifo" ( call :f rem if /i "%~1"=="/fifo" ( call :f ) else ( >>"%date%-%COMPUTERNAME%-%USERNAME%.log"...
rzeczywiście coś z tym wklejaniem mi nie wyszło dziękuję za przykład przetestowałem po dostosowaniu do moich danych niestety częściowo zawodzi znajduje max dla danej kategorii lecz często błędnie przypisuje grupę aby to zobrazować zmieniłem nazwy 2 połowie grupa i dodałem 2 nowe wiersze z pustymi polami i 1 całkowicie pusty ponieważ też takie w mojej...
W 'Workbook_BeforeClose' kopiujesz zakres, otwierasz 'główny', określasz pierwszy pusty wiersz 'Cells(Rows.Count, "A").End(xlUp).Row + 1', wklejasz, 'Me.Save'.
Ok Działa, ale nie przenosi do innego arkusz. Ponadto kopiuje tylko wiersz A2 i to jest dziwne bo w kodzie jest umieszczony zakres od A2 do U3. Nie wiem czym to jest spowodowane. To może tak, zarejestrowałem nowe makro: Sub kopiowanie() ' ' kopiowanie Makro ' ' ActiveWindow.ScrollColumn = 2 ActiveWindow.ScrollColumn = 1 Range("A1:U2").Select Selection.Copy...
Próba odpowiedzi na problem Pana okondy. Ponieważ napisał Pan, że słabo zna Excela starałem się opisać wszystko dość dokładnie. Niestety, nie napisał Pan, której wersji Excela Pan używa, ale ponieważ załączony przykład jest w formacie .xls , więc przyjąłem, że jest to wersja 2003 i moje wyjaśnienia odnoszą się do tej wersji. W innych wersjach szczegóły...
Niestety ta pętla nie rozwiązuje problemu. Działa ona tak, że do tabeli we wszystkich zadanych komórkach wpisują się te same dane. Czyli jest tak, że wybieram Kowalskiego z ListBoxu i w każdej zadanej komórce mam Kowalskiego. Jak wybieram Iksinskiego to jest Iksinski. A ja chciałabym mieć możliwość wyboru Kowalskiego tak żeby dane wpisały mi się do...
To nie będzie najszybszy sposób, ale pętla jadąca komórka po komórce i sprawdzająca czy w danej komórce jest (at). Jak znajdzie to kolejna pętla, która jedzie po kolejnych symbolach i sprawdza, który symbol to (at). Jak już wie który to numer symbolu to cofa się aż do momentu aż będzie spacja a potem idzie do przodu też do momentu aż będzie spacja....
1. Wstęp Projekt bardzo prostej stacji pogodowej opartej o ESP32 DevKit V1 i sensor BME280. Odczyt wartości jest dostępny poprzez interfejs sieciowy w sieci lokalnej, do której jest podłączona. Całość jest zasilana za pomocą zasilacza impulsowego 5V ze względu na powszechność i łatwą dostępność tego typu urządzeń. 2. ESP32 Moduł ESP32 DevKit V1 jest...
Jak rozumiem można pracować wyłącznie na indeksach. Czyli taki algorytm proponuję: 1. Znajdź pierwszy produkt (poznajemy po tym że ma nazwę w kolumnie A). 2. Przepisuj wiersze aż indeks będzie pusty (masz puste wiersze, reguła?), można i po Excelowemu (oznacz, kopiuj, wklej), ale lepiej mieć wszystko pod kontrolą. Zapamiętaj w tablicy każdy kopiowany...
(at)ElektrodaBot Otwieram twój kod schematu kicad i zamiast zawartości otwiera mi się pusty arkusz bez symboli , potrzebne są jeszcze odwołania do bibliotek symboli kicad. Bezpośrednia odpowiedź Pusty arkusz oznacza, że KiCad nie znalazł symboli użytych w pliku `.kicad_sch` – program wyświetla wtedy tylko tło. W KiCad ≥ 6 symbole nie są już przechowywane...
Witam. Mam problem z FFmpeg podczas transkodowania pliku .m2ts (blu-ray) do pliku .mp4 w programie MediaCoder (przy obcinaniu pliku). Podczas transkodowania wyskakuje mi taki komunikat (prawdopodobnie jest to przyczyną problemu z dźwiękiem - dźwięk jest z innego przedziału czasu niż obraz po transkodowaniu z obcięciem pliku ): Failed to load FFmpeg....
Cześć, potrzebuje napisać makro VBA w Excelu które: - będzie otwierać wszystkie pliki *.xlsx w katalogu w którym znajduje się uruchamiany plik skoroszytu (ew. będzie można wskazać kilkanaście plików w oknie wyboru) - z każdego pliku zostanie skopiowany zakres $$ i doklejony do arkusza "zaimportowane" w pliku w którym jest makro - po zaimportowaniu wszystkich...
makro wklej wiersz excel pierwszy pusty wiersz kopiuj wklej
programowanie robotów fanuc montaż zasilacza antenowego kondensator mniejszy zasilacz
moduł bluetooth blaupunkt daytona
Toshiba Satellite A300-1MM - hasło HDD i jego odzyskiwanie Zakłócenia radiowe w tunerze UNITRA AS631 przez dekoder
