Dzień dobry Chciałbym napisać formułę bez skryptu dowolnie wybrany argument. Klasyczne wyszukaj pionowo zwraca nam pierwszy napotkany argument. Dzięki komendom sort i wiersz możemy napisać formułę wyszukująca ostatni napotkany argument ale czy ktoś ma patent jak wyszukać dowolnie wybrany argument np trzeci lub czwarty.
1. Porównywać daty w instrukcji warunkowej. 2. Wyszukać ostatni niepusty wiersz i podstawić: Range("A" & ostNiepusty).Select
Możesz dokładniej wytłumaczyć (może załącznik zamieścić?) co chcesz osiągnąć, bo nie rozumiem? :) Jeżeli wyszukać ostatni niepusty wiersz w kolumnie z formułami, to np.: ost_wiersz = ActiveSheet.Columns(2).Find(... After:=ActiveSheet.Cells(1, 2), _ SearchOrder:=xlByRows, SearchDirection:=xlPrevious).Row...
chciałbym poinformować,że nie dawno odkryłem VBA Hmm... Skoro odkryłeś, może warto nauczyć się go wykorzystywać? Do rozwiązania swojego zadania potrzebujesz kilku rzeczy: 1. Określić nazwę folderu nadrzędnego. Tu można wykorzystać FileSystemObject, Np [syntax=vbscript]Dim oFSO As Object, srcFldr As String, parFldr As String Set oFSO = CreateObject("Scripting.FileSystemObject...
Dzięki pomocy wszystko gra i buczy - DZIĘKI brakowało tam tylko "=" przy wykonywaniu spełnionego warunku w sensie "b<=w" bo jak było samo "<" to nie brało pod uwagę ostatniego wiersza Pozwolę sobie opisać całość żeby kolejni studenci szybciej załapali. https://obrazki.elektroda.pl/9736696500_... https://obrazki.elektroda.pl/2550083000_...
Na początku musisz ustalić długość kolumny, którą będziesz przeszukiwać tzn. ostatnią niepustą komórkę. Możliwe jest to za pomocą: Application.WorksheetFunction.CountA(... Do wyszukania wartości użyć można: Selection.Find() Cały wiersz zaznaczasz za pomocą: Rows().Select Zaznaczony wiersz kopiujesz: Selection.Copy Wklejasz: Range().Select...
Niestety na służbowym kompie nie zobaczę Twojego pliku, więc tylko kilka wskazówek. 1. Proponuję przygotować szablon do kopiowania w oddzielnym arkuszu, nieużywanym przez kontrolerów. Można tam zapisać w razie potrzeby coś jeszcze, a docelowo można go będzie ukryć. 2. Żeby skopiować obszar (tabelkę), musisz wiedzieć gdzie to trzeba skopiować. Możesz...
Są różne sposoby na znajdowanie ostatniego pustego wiersza, mój ulubiony jest taki: widoczną komórkę w kolumnie B wypełnioną tekstem, idąc od ostatniego wiersza w górę. Liczba 1048576 to ostatni wiersz excela 2007, dla kompatybilności z 2003 należało by użyć 65536. Przed wykonaniem sprawdzania poleceniem ShowAllData próbuje się zdjąć kryteria autofiltra...
Zacznij od wyszukania ciągu i przypisania Nr wiersza: [syntax=vb]wrs = Columns(1).find(what:="OVERALL RESULT", lookat:=xlwhole).Row[/syntax]Jeśli to jest ostatni wiersz zakresu, to już z górki. Np [syntax=vb]Cells(wrs, "E").Formula = "=SUMIF(D:D,""aa"",E:E)"[/syntax] Bez VBA 1. W F1 wpisuję: =SUMA.JEŻELI(d:d;"aa";e:e) 2. W E1: =JEŻELI(A1="OVERALL RESULT";F$1;C1-B1)...
A jak ograniczyć żeby nie sprawdzało całego arkusz jak dam wiersz=wiersz+1? Pętla przerwie działanie jeśli trafi na pustą komórkę, więc jeśli w danych nie ma "dziur", to nie ma problemu. W innym przypadku musisz wyszukać ostatnią niepustą i do niej ograniczyć licznik pętli.
Te odległości między liczbami niewiele mają wspólnego z tytułem tematu i z poprzednimi pytaniami. To powinien być nowy temat. Poprzednio dane były odczytywane wierszami, teraz chcesz je odczytywać kolumnami. I obliczenia też muszą być inne. Problematyczne dla mnie jest to łączenie kolumn w jedną w aspekcie liczenia odległości. Trochę to abstrakcyjne....
Witam, tworzę plik excela do wydań produktów z magazynu do poszczególnych działów. W arkuszu 1 mam nazwy działów, w których każdy jest połączony hiperłączem do osobnego arkusza do ostatniego wolnego wiersza: =HIPERŁĄCZE("#magazyn1!A"&(MAX(JEŻELI.BŁ...
A pierwszy wiersz w kolumnie B masz wypełniony? Zliczasz niepuste komórki i jeśli pierwsza jest pusta, nie wyszuka Ci ostatniej wartości. Wówczas zmień linijkę: [syntax=vbscript] For r = 2 To Application.CountA(Sheets("baza").Range(... [/syntax]
To było mówić że makro ma być w innym pliku. Kłopotem było to że makro pobierało nazwę pliku z pliku w którym nastąpiło wywołanie procedury. Poniżej poprawka. [syntax=vb]Sub OrderBuilder() ' ' OrderBuilder Makro ' Order building ' ' Klawisz skrótu: Ctrl+q ' Dim i As Long, ostWrs As Long 'otwarcie plików Workbooks.Open Filename:="D:\Desktop\NotWMS\Działa\expo...
Czemu jak już zrobiłeś przykład nie załączyłeś go do postu? (spakuj na przyszłość zipem i załącz) Po prostu wykorzystaj funkcję wyszukaj.pionowo() Zamknąłem w pętli i sprawdza po kolumnie M czy wysłano (dlatego tez na końcu pyta czy wysłałeś. Poniżej z paroma "wodotryskami". Makro nie sprawdza poprawności adresu mailowego więc jeżeli będzie zły a ty...
Uruchom wiersz polecenia (cmd) jako administrator. Wyszukaj > cmd > klikasz prawym i uruchom jako administrator. Później wydaj komendę bcdedit /set nointegritychecks OFF Uruchom ponownie komputer. Ew. przeinstaluj ten sterownik który ostatnio instalowałeś.
Witam, poproszę o pomoc w rozwiązaniu następującego problemu. W kolejności: włączam komputer, dochodzi do ekranu powitalnego, klikam myszką, pojawia sie ekran logowania, wpisuję hasło, klikam strzałkę zaloguj i w tym momencie pojawia się czarny ekran z kursorem myszki i kręcącym sie obok kółeczkiem. To kółeczko dodam kręci sie już od momentu włączenia...
Witam, Proszę o pomoc w napisaniu makra - wydaje się być proste, ale nie mogę znaleźć sposobu na jego rozwiązanie. Chcę zrobić formularz do wpisywania przepisów i umieszczania ich w bazie (jeden wiersz = jeden przepis. Każdy produkt to kolejna kolumna) Utknąłem na pkt 4 - Wyszukaniu produktu (Input E9:E29) i wklejeniu odpowiadającej ilości (Input C9:C29)...
Witam, Arkusz to baza pojazdów w mojej firmie. Arkusz ogólnie robi wiele innych rzeczy ale obecnie utknąłem na zapisie dotyczącym paliwa a dokładnie wyliczaniu pokonanego dystansu od jednego tankowania do drugiego by na bieżąco wyliczać średnie zużycie paliwa. Kombinuje z tym by po uzupełnieniu ostatniego wolnego wiersza - dane beda wpisywane w wyswietlane...
Można także zainstalować aktualne oprogramowanie na płytach FAKE. Proszę najpierw przeczytać do końca!! Metoda: 1. Pobierz firmware hexfile z jyetech https://jyetech.com/firmware-dso-150-she... 2.Pobierz konwerter hex2bin z Sourceforge https://sourceforge.net/projects/hex2bin... 3. Skopiuj plik hexfile do folderu z plikiem hex2bin.exe 4. Przekonwertuj...
Masz racje, zapomnialam zamienić formule na wartości w makrze. Chcę aby formuł nie było ostatecznie ponieważ przy dużym pliku z np 50tys wierszy będzie plik dość ciężki przy kilku takich kolumnach z różnymi formułami (też bardziej złożonymi). Więc wolę uruchamiać makro i żeby ono wpisało wynik i zmieniło formuły na wartości. Gdy się coś zmieni po prostu...
Najprościej w twoim przypadku zaimportować arkusze do jednej tabeli (normalizacja) w bazie danych (np. Access). Dodaj oczywiście klucz, mówiący z jakiego arkusza dany wiersz pochodzi. Potem za pomocą kwerend wyszukasz to, czego dusza zapragnie. Nasuwa mi się dygresja - po dość długiej już obecności na forum - że ludzie uparcie dążą do zrobienia bazy...
Witam Proszę o pomoc. Potrzebuje wykorzystać poniższy kod do wyszukania określonego tekstu w skoroszytach zapisanych w katalogu "DANE" i skopiowania całego wiersza do skoroszytu "Zbiorczy" Jednym zdaniem chodzi o wyszukiwanie tekstu w wielu plikach xls i zapisywanie ich do jednego arkusza. Czy jesteście w stanie mi w tym pomóc? kod: Sub OperacjeHurtowe2()...
witam mam problem nad którym debatuję juz 2 dzień i bardzo prosze o pomoc. mam plik w excelu w którym w kolumnach notuję ceny z kolejnych dostawy w wierszach asortyment. Nie zawsze kupuję każdy asortyment wiec w przypadku kiedy nie ma go w dostawie w arkuszu pojawiają sie 0. W osobnej kolumnie potrzebuję aby excel wyliczał mi cenę z ostatniej dostawy....
Automatyczna naprawa za pomocą Narzędzia do naprawy systemu podczas uruchomienia Naprawa MBR Komenda 1: bootrec.exe /fixmbr Komenda 2: bootsect.exe /nt60 all /force /mbr (narzędzie znajduje się na płycie instalacyjnej w folderze x:\boot; przełącznik /force wymusza nadpisanie mbr Te polecenia pozwalają naprawić główny rekord rozruchowy (MBR). Naprawa...
Witajcie, Chciałbym do was zwrócić się z problemem w Excelu. Mianowicie, mam tabelę: http://obrazki.elektroda.pl/6613358500_1... Wiersz nr 1 zawiera daty, niemniej komórki z danymi (czyli datami) nie są jedna obok drugiej. Wiersz nr 2 zawiera nr tematów (np. na mojej rozpisce pod nr 1 znajduje się temat xy) Jak można zauważyć, tematy...
No teraz załapałem skąd co się bierze ;) Jednak staram się to przerobić na konkretny już przykład, jak na razie z mizernym efektem :cry: Jak by ta formuła miała wyglądać w następującym przypadku (dodam że główny problem to to, iż program sprawdza zawartość podanej komórki i wyrzuca zawartość tej kolumny (z konkretnego wiersza) który jest podany w komórce....
Witam, potrzebuję makro do Excela w VBA. Z góry mówie, że to wygląda na dość obszerne makro ale myśle, że dla kogoś kto dobrze ogarnia VBA nie będzie z tym miał problemu. Dla mnie jest to ciężki temat, gdyż jestem nowy w programowaniu i tak jakbym potrafił napisać na kopiowanie komórek makro tak w tym wypadku jest to troche trudniejsze i nie potrafie...
Co masz na myśli pisząc że "nie działa"? U mnie działa zgodnie z opisem... Komentarze do poszczególnych linii: [syntax=vb]Private Sub Worksheet_Change(ByVal Target As Range) 'w zdarzeniu przy zmianie w arkuszu If Target.Address = "$A$1" Then 'jeżeli adres komórki której dotyczy zmiana = A1 ost_w = Worksheets("Dane").Range("A" & Rows.Count).End(xlUp).Row...
Dobra ostatnia rzecz która mi do głowy przychodzi. Simsy są zabezpieczone zdaje się za pomocą SecuROM. Uruchom konsole tekstową (wiersz poleceń) jako administrator. Nie pamiętam już Visty dokładnie. Ale zdaje się jak otworzysz pasek start i tam w polu wyszukiwania wpiszesz "cmd" to wyszuka ci to co trzeba prawym na tym i uruchom jak administrator. http://obrazki.elektroda.pl/6737261100_1...
hehe tak jak z fizyką jądrową :p znalazłem taki kod który działa w moim przypadku prawie dobrze tylko próbuję go trochę zmodyfikować ale mi nie wychodzi. Trochę topornie ale działa:) Dim OutCel As Range Dim InpZbior As Workbook Dim OstatniWiersz On Error Resume Next ChDrive ThisWorkbook.Path ChDir ThisWorkbook.Path On Error GoTo 0 ListaZbiorow = Application.GetOpenFilename("ze...
"Mój tekst" Sheets("Arkusz2").Range("D4")
Ostatnio zauważyłem, że po zamknięciu jakiegokolwiek okna i powrocie do pulpitu system często odświeża skróty programów które znajdują się na pulpicie (WinXP). Bardzo to zamula system. Komp w pewnym momencie nie reaguje na polecenia myszki czy też klawiatury. Po kilku sekundach system wraca do "normalności". Kiedyś nie miałem tego typu problemu a teraz...
Hej Zacząłem właśnie uczyć się samemu VBA i utknąłem z jednym problemem. Moje Makro ma a zadanie przy każdym uruchomieniu wyszukać ile wierszy jest zapisanych w pliku w kolumnie D i w tylu też wierszach w kolumnie T wpisać cyfrę "1". Zrobiłem pętle która przechodzi do pierwszego pustego wiersza i zwraca jego adres i wartość dla uzyskania liczby wierszy...
Witam! Od czasu do czasu korzystam z VBA lub po prostu rejestruję proste makro, żeby ułatwić sobie pracę. Ostatnio natrafiłem na problem. Zarejestrowałem proste makro ułatwiające dodawanie kolejnych odczytów do tabeli w arkuszu, który jest częścią większego skoroszytu, ale innych makro w nim nie ma. Ku mojemu zdziwieniu okazało się, że makro czasem...
Cześć Próbuje od jakiegoś czasu rozgryźć mój problem. i jak na nowicjusza słabo to idzie - trochę poszukałem i próbuje dostosować do swoich potrzeb pomysły innych z podobnym do mojego problemu. A wiec: mam dwa pliki - jeden bazowy (u mnie nazwany "baza.xlsx" - znajduje się w innej lokalizacji) oraz drugi Main.xlsx Oba plik mają ten sam układ - 20 kolumn....
DZIĘKUJE BARDZO, BEZ POMOCY NIE UDAŁO BY MI SIĘ WYKONAĆ TEGO ZADANIA. W projekcie pozostało mi jeszcze kilka spraw tzw. kosmetycznych. Choć jak dla mnie nie do ogarnięcia I tak: Arkusz rozszerzyłam i ma teraz 18 kolumn (A:S) ---> kolumny automatycznie się dostosowywały do zawartości (tutaj chyba użyteczna będzie Columns ("1:18").AutoFit);...
jakby wyglądał kod ten co wyżej bez powiadamiania o błędzie (to niestety przeszkadza) z czyszczeniem pola tekstowego (po wstawieniu przeze mnie czyszczenia niestety całość się zapętla i wychodzi zupełnie coś innego niż powinno) Nie do końca wiem o jaki komunikat ci chodzi. Czy o ten: "Brak danej w zbiorze". Jeżeli tak to wykasuj linię aa = WorksheetFunction.Match(Target(1),...
Mam dużą tabelę, która przyrasta o jakieś 500 wierszy miesięcznie. W jednej z kolumn są wypisani pracownicy wraz ze swoimi roboczogodzinami. Żeby było trudniej, to w każdej komórce kolumny z RBH może być od jednego do nawet 5-ciu nazwisk wraz z liczbą RBH. np. komórka: Kowalski 3 Nowak 4 Kliczko 5 Kolejności nazwisk w komórce są różne, a potrzebuję...
Makro jak wyżej działa :) i wiem że mogę wyszukać nazwę jaką chcę. Chodzi mi tylko jak ustawić aby funkcja If działała w kolumnie z daną nazwą, do ostatniego niepustego wiersza. Ponieważ ta kolumna ma stałą nazwę ale może mieć różne położenie w arkuszu.
Teraz jest ok. Scieżka nie jest wymagana więc uruchomienie makra na komputerze przy innej sciezce pliku nie jest tez problemem. Co mi jednak wyskoczylo jeszcze to dwie rzeczy. Plik lista.xls zmodyfikowalem tak, aby dostosować go do własnych potrzeb. Przykładowy plik wrzuciłem w załącznik. Powstają dwa problemy: Pierwszy to fakt, że raport zwrotu pobierany...
Próbowałem w ten sposób zrobić makro. W zeszycie 2 zaznaczam to co mnie interesuje następnie kopiuje do ostatniego filtrowanego wiersza w zeszycie 1, tylko coś mi to nie wychodzi mógłby ktoś zerknąć? Poniżej kod: (powstały w oparciu o to co udało mi się wyszukać jeżeli bardzo źle to wygląda proszę o wyrozumiałość :)) Range("A1:H4").Select Application.CutCopyMode...
Chyba jednak się nie zrozumieliśmy... Załączam zrobiony na szybko załącznik ilustrujący ideę. Zależy mi na pominięciu okienka wyszukaj/zamień. Bo w tej chwili żeby powyższy sposób zadziałał muszę na dzień dobry wywołać okno wyszukiwania czyli ctrl+f, Nigdzie nie pisałem o tym okienku. Nie musisz go wywoływać. Wyszukujesz za pomocą funkcji wyszukaj.pionowo....
Po mojemu: zbyt mały rozmiar tablicy, "niekopiowalny" trzeci argument, ostatni powinien być "dokładne przeszukiwanie" (FAŁSZ). Spróbuj =WYSZUKAJ.PIONOWO(B$12;'Adresy obiektów'!A:K;WIERSZ()-16;0&... Wpisz formułę w B18 i przeciągnij/skopiuj w dół.
Witam Mam problem z komputerem. Wczoraj podczas próby uruchomienia starszej wersji systemu (xp, bo mam 2 systemy zainstalowane) włączyło się skanowanie dysku D i zaczęło się kasowanie plików – „usuwanie segmentu rekordów oddzielonego pliku” więc zrestartowałem komputer aby nie utracić danych (a nie było innej możliwości przerwania...
Prościej chyba się nie da. Z tym, że w tym przypadku nie szukasz k-tej naj/mniejszej/większej, więc wystarczy MIN, MAX (tablicowe). Np =MAX(JEŻELI(Dane!$A$2:$A$613... Możesz oczywiście "skomplikować" sobie użyciem kolumny pomocniczej w arkuszu "Dane" i wtedy wystarczy "zwykłe" MIN/MAX, ale po...
Witam. Dostało mi się w pracy dziwne zadanie... Na podstawie pewnych raportów przejazdów samochodów mam sprawdzać moment, w którym samochód dojechał do ostatniego punktu na zaplanowanej trasie. Tras jest aktualnie niewiele, ale w związku z dynamicznym rozwojem firmy i nowymi wymogami stawianymi przez "górę" (początkowo chodziło o sprawdzanie tylko miejsc...
witam...no już mi ręce opadają.... Porwałem się z motyką na księżyc i już naprawdę sporo zrobiłem... potrzebuję pomocy... Chodzi mi o napisanie funkcji, która będzie w danej komórce przepisywała wartość ostatniej komórki z pewnego zakresu ponad tą komórką... Dodam, że nie wszystkie będą wypełnione i często też będą puste. no i jeszcze do tego tak musi...
http://obrazki.elektroda.pl/4155164900_1... Witam wszystkich Tym razem chciałbym zaprezentować jeszcze programowy projekt radioodbiornika internetowego. Prezentowany projekt jest rozszerzeniem przedstawionego wcześniej projektu odtwarzacza i dyktafonu na STM32F407VG. Połączenie z Internetem zapewnia moduł WiFi WF121-A (internal antenna)...
Witam, potrzebuję makro do Excela w VBA. Łamie sobie głowę, żeby to napisać i może ktoś umiałby to poskładać w sposób logiczny w makro. Z góry mówie, że to wygląda na dość obszerne makro ale myśle, że dla kogoś kto dobrze ogarnia VBA nie będzie z tym miał problemu. Dla mnie jest to troche ciężki temat :| Program ma kopiować komórki J2:J, K2:K, L2:L...
No dobra ;) Generalnie każdą formułę można wstawić makrem, wystarczy ją nagrać macro recorderem i troszkę zmodyfikować. Dla WYSZUKAJ.PIONOWO jest to coś takiego: [syntax=vb]Private Sub CommandButton1_Click() On Error GoTo myErr Application.ScreenUpdating = False Application.Calculation = xlCalculationManual With Sheets("Arkusz1") ost_wiersz = .Range("A"...
Witam! Ostatnio często miałem problemy z internetem. Przy włączaniu zakładek typu youtube rozłączał mi się internet lub skakał ping (30ms - 4000 ms). Wizyta informatyka wykazała, że router jest zbyt słaby na tyle osób korzystających z sieci. Zakupiłem więc Router TP-LINK Archer C7(AC1750 Wireless Dual Band Gigabit Router). Pingi przestały skakać, lecz...
https://obrazki.elektroda.pl/5398363000_... Artykuł opisuje oprogramowanie mojego autorstwa służące do katalogowania swoich zbiorów elektroniki (głównie układów scalonych). Motywacja Pewnie każdy z elektroników-praktyków cierpi na chorobę zwaną zbieractwem, objawiającą się gromadzeniem różnej maści podzespołów, mających w zamyśle...
Marka: Energizer Model: Inteligentna wtyczka Energizer Outdoor Numer modelu: EOX3-1002-ME1 Kupiony od: Menards (sklep dla majsterkowiczów w Stanach Zjednoczonych) Opis: Czarna zewnętrzna (stopień ochrony IP65) inteligentna wtyczka z dwoma gniazdkami 15A https://obrazki.elektroda.pl/7500807500_... Kupiłem to początkowo jako eksperyment,...
witam potrzebuję pomocy w ułożeniu funkcji. chciałbym poprawić liczenie wydajności u siebie w pracy. wykonując dany produkt na różnych maszynach powinna być inna norma a tak nie jest i chciałbym to zmienić i dedykować każdej maszynie inne wartości. do tej pory w arkuszu 1 wpisywałem nazwę wyrobu np. "ABCD" i program z danych z arkusza 2 o nazwie SPIS...
Witam. Potrzebuję pomocy w ułożeniu funkcji. Chciałbym poprawić liczenie wydajności u siebie w pracy. Wykonując dany produkt na różnych maszynach powinna być inna norma a tak nie jest i chciałbym to zmienić i dedykować każdej maszynie inne wartości. Do tej pory w arkuszu 1 wpisywałem nazwę wyrobu np. "ABCD" i program z danych z arkusza 2 o nazwie SPIS...
Cześć, mam podobny problem który był już poruszany, ale zdaje się ze mniej skomplikowany i nie nie mogę dopasować go do tamtych rozwiązań. Mam plik w którym jest kilka arkuszy z zaciągniętymi raportami. Teram muszę zrobić z nich raporty. Niestety utknęłam na pierwszym :( Próbuję w zakładce "AAA" w zakresie "A3:ostatni wiersz z danymi" odnaleźć komórkę...
BARDZO WAŻNY LINK DO POSTA Z KOLEJNYMI ARKUSZAMI https://tinyurl.com/yaxya64x postarajmy się wraz ze wsparciem grup FB stworzyć dobry grunt by jak najbardziej zwiększyć swoje szanse. daty egzaminów: W innych egzaminach praktycznych CKE wróciło do "starego" systemu czyli jeden arkusz na dzień. Dane na podstawie obserwacji tego co się dzieje na E.13....
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...
Witam Mam smartfona Kazam Tornado 348. Używam Windows 10. Chciałbym sprawdzić w nim status bootloadera poprzez wejście w tryb fastboot. Kod *#*#7378423#*#* nie działa. Nie zamieściłem dokładnych linków, ponieważ to jest mój pierwszy post i nie mam na razie takich uprawnień do wklejenia zewnętrznych linków, dlatego napisałem opisowo jak te linki wyszukać...
wyszukać wiersz ostatni wiersz wyszukać ostatni kolumna
transit pompa ciśnienie kompresorze czyścić mosiądz
stacje lutownicze niskie napięcie strojenia
TrunkTracker Uniden - Monitorowanie Systemów Trunkingowych Sprężyny w mechanizmie otwierania kieszeni kasety magnetofonu: ich rola i znaczenie
