Przepraszam, przez roztargnienie trochę namieszałem. Wartości muszą być takie same w kolumnach od "B" do "F" oraz "H" oraz "K". W kolumnie "A" jest liczba porządkowa (czyli nieważna w tym przypadku), a w kolumnie "G" - liczba sztuk na komplet, co w liście produkcyjnej jest również mało znaczące. Czy...
Jak już chcesz usuwać wiersze z zakresu, to wykonaj pętlę od ostatniej zapisanej do pierwszej komórki - mniej problemów. Po drugie: te selecty to są zupełnie niepotrzebne. To makro może być w następującej postaci: [syntax=vb]Sub usun() Dim lLstRw As Long 'ustalenie ostatniej zapisanej komórki...
Witam W załączniku excel. Mam pytanie jak usunąć duplikaty wierszy jednocześnie przenosząc dane. Chodzi o to, że mam dwa wiersze postaci: 1 Nazwa 1 Adres 1 s1 tak 1 Nazwa 1 Adres 1 s1 tak a chce uzyskać: 1 Nazwa 1 Adres 1 s1 tak tak Potrafię usuwać samu duplikaty jeśli wiersze są takie...
Moja sugestia jest jednak taka, żeby te pliki wrzucić do tabeli w Accessie i tam je analizować. To a propos pytania "co byście zmienili". Jeśli już się uprzeć przy pliku, to usuwanie większej ilości wierszy pojedynczo poleceniem .Delete jest baaaardzo wolne, zagnieżdżona pętla też nie pomaga. 4...
Witam, W pracy wyciągam raport w Excelu zawierający 35 kolumn (A-AI) i zmienną liczbę wierszy. Stworzyłam plik w Excelu do analizy tych danych, tak więc jedna zakładka zawiera wklejone dane a kilka innych tabele i wykresy przestawne zrobione na ich podstawie. Ponieważ nie wszystkie kolumny z raportu...
Hej, szukam podpowiedzi jak wykonać w tabeli excelowskiej pewną rzecz: - mam trzy kolumny: 1. numer faktury 2. przedmiot sprzedaży 3. firma kupująca; czyli dla danej faktury mogę mieć jeden wiersz - jeśli sprzedaż dotyczyła tylko jednego produktu, lub wiele wierszy, jeśli sprzedaż dotyczyła kilku...
Witam, ja mam nieco inny problem, mianowicie w obszarze arkusza o nazwie "LISTA" w ostatniej kolumnie "AO" wpisuję "X" jako pozycja zrealizowana. Chciałbym aby przy ponownym odświeżeniu pliku, bądź też otwarciu, wszystkie pozycje odznaczone w tej kolumnie "X" em były usunięte bez problemu dla...
Witam. Mój problem wygląda następująco: Dostaje plik excela w którym są dane z kilku plików pdf. Dane wyglądają następująco: Nagłówek - kilka linijek Dane - tabela numerowana od 1 do różnie czasem do 100 czasem ponad 1000 pozycji. Stopka - kilka linijek Nagłówek itd. Chodzi mi o takie makro...
Wpisywałeś w google "excel usuwanie pustych wierszy" ? :) Zresztą to co zaproponował adamas_nt robi dokładnie to, co chcesz.
Witam wszystkich forumowiczów! Jestem absolutnie początkujący jeśli chodzi o programowanie w VBA w Excelu, a potrzebne mi jest makro, które (po jego aktywowaniu np. kombinacją klawiszy) wytnie jeden wiersz z jednego arkusza i wstawi go do drugiego, w pierwsze wolne miejsce. Skoroszyt będzie się składać...
Podaję przykładowy kod procedury sumującej wiersze zawierające takie same dane w kolumnie "A". Dane muszą być posortowane.[syntax=vb] Sub Sumuj_Wiersze() With ThisWorkbook.Worksheets("Arkusz1") ostatnia = WorksheetFunction.CountA(Columns(1)) + 1 For wiersz = ostatnia To 2 Step -1 If .Cells(wiersz,...
Przepraszam że na chwilkę wrócę do postu wyżej Z tym że wracając do tematu poprę kolegę marcina z tym wyszukiwaniem "/" i znakami przed i po. Jest to w miarę logiczne . A opis nie może być za długi więc i tych faktur nie będzie za dużo w jednym opisie. Banki z reguły przy wprowadzaniu opisu ograniczają...
Witam, Mam arkusz kalkulacyjny, który zawiera dane wyglądające w następujący sposób: Imię, naziwsko (xxxx xxxx / użytkownik) Telefon Mail Takich danych jest kilka tysięcy. Szukam sposobu, aby usunąć z arkusza duplikaty (ponieważ niektórzy użytkownicy się powtarzają) z zachowaniem unikalnego...
Witam, pierwszy raz piszę na forum i proszę o wyrozumiałość. Proszę o pomoc w dwóch problemach. 1. Chciałbym w excel ponumerować wiersze takim ciągiem 11112222333344445555 itd. ale liczba dla kolejnej komórki w kolumnie nie ma się powtarzać tylko 4 razy ale aż 32. Chciałbym tak wypełnić arkusz składający...
OK, faktycznie działa. Skoro więc zarzucamy temat makra, i korzystamy z konsoli to jeszcze jedna sprawa: czy jest szansa żeby w składni polecenia łączącego pliki w całość zawrzeć warunek, który będzie pomijał ostatni wiersz każdego pliku CSV. W plikach źródłowych ostatni wiersz jest podsumowaniem, które...
Cześć, potrzebuję zablokować możliwość usuwania raz wpisanych wierszy i kolumn. Gdy używam opcję 'Chroń arkusz' z zaznaczeniem wszystkich opcji dla użytkownika poza 'usuwanie kolumn/wierszy' to blokuje mi możliwość jakiejkolwiek edycji którejkolwiek z komórek, czy to pustej czy z danymi. Wiem,...
Musisz na początek znaleźć jakiś wyróżnik wierszy do usunięcia. Co one mają innego niż cała reszta. Potem wystarczy tylko to wykorzystać. Od tego co zauważysz będzie zależał algorytm i kod makra. Wiersze często najwygodniej usuwać od końca, tak może (nie zawsze musi) być łatwiej.
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...
Dzięki za wędkę ale przydałby się jeszcze robak :) Powalczę w wolnej chwili z kodem. Dodano po 3 No dobra znalazłem i robaka Działa tylko dla kolumny A zgodnie z moimi założeniami Private Sub Worksheet_Change(ByVal Target As Range) If Target.Value = "" And ActiveCell.Column...
Witam! To mój pierwszy post w tej części forum. Natrafiłem na problem, znalazłem rozwiązanie, może komuś to się przyda. Zarejestrowałem proste makro, które w pierwszej części (tylko ta jest istotna) miało u dołu tabeli, ale przed wierszem podsumowania tworzyć dodatkowy wiersz będący kopią jednego...
Niestety nie znam sie na programowaniu a moje poszukiwania nie dały spodziewanego efektu. Mam dość spory plik, w którym w kolumnie G mam nazwy które się powtarzają. Chciałabym przenieść unikatowe rekordy do kolumny M. Niestety zakres nie dotyczy całej kolumny, bo dane są w układzie co 10 wierszy kolejny...
Witam, Mam problem który może mi rozwiązać tylko makro, otrzymałem excel z danymi w którym mam w jednej kolumnie nazwy odbiorców w kolejnych dane sprzedażowe. Problem polega na tym że zawsze pierwszy wiersz dla danego odbiorcy jest sumą wszystkich pozostałych (taki wiersz sumujący sprzedaż dla danego...
Tak szczerze, zaraz wytłumaczę dlaczego "gotowiec" by mi się przydał: znam się tak "trochę" na excelu, ale na podstawowych funkcjach itp, nic nie wiem na temat makr, vba itp i moje rozumowanie w przypadku twojej odpowiedzi wygląda tak: " ustalasz ilość wierszy do wyszukiwania na podstawie ostatniej...
Witam Potrzebuje pomocy przy napisaniu makra excel W kolumnie M mam 10 typów wartości liczbowych powtarzających się, pomieszanych. Chciał bym aby makro znalozło wiersze w kolumnie M zaierające wartości 1224, 1228 i 1232 Po czym usunęło całe wiersze, czyli wszystkie dane we wszystkich kolumnach...
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 ...
Witam, Czy istnieje jakiś sposób na usunięcie serii wersów w jednakowych odstępach? Poniżej jest część kodu z excela: 3 kolumny i ok 7000 wersów. Chciałbym zrobić z tego wykres z jedną osią X i dwoma osiami Y (wiem jak to zrobić :) ) po obu stronach wykresu. Ale problem pojawia sie z tak dużą ilością...
Witam Czy ktoś miałby chwilkę i mógłby mi pomóc? (może być makro lub jeśli się da to funkcje z arkuszem pomocniczym). Mam problem z kopiowaniem wierszy i ich dublowaniem do gotowego arkusza. Mam skoroszyt, który zawiera 3 arkusze robocze: "Re_1", "Re_2" , "Re_3" oraz arkusz wynikowy "Wynik". Do...
Witam Mam w załączniku arkusz exela z przyciskiem który usuwa puste wiersze w "Arkusz1" sugerując się kolumną "A". Jak mam zrobić żeby ten sam przycisk usuwał mi to samo tylko że w "Arkusz2". Bardzo proszę o pomoc
Witam. Proszę o podpowiedź, jak usunąć wiersz w listboxie. Próbuje poniższym kodem:[syntax=vb]Private Sub ListBox1_Click() Me.ListBox1.RemoveItem (Me.ListBox1.ListIndex) End Sub[/syntax] Wiersz co prawda się usuwa, ale wyskakuje błąd.
Analizowałeś to makro? Przyjrzyj się co przypisujesz do zmiennej "multi" i to przed otwarciem pliku źródłowego. Nie powinno być With DoSkop.Worksheets("AKKO"&#... Set reg1 = .Range("a2:a41000")... itd Jeśli filtrujesz, to ustal maskę: fileFilter:="Pliki Excel (*.xl*),*.*," Po...
Cześć, Poniżej napisałem kod odnośnie kasowania całego wiersza w Excelu za pomocą przycisku. Nie wiem dlaczego, ale wartości wprowadzone po przez user form do różnych komórek w wierszu pozostają w tych komórkach, mimo że kod powinien wyczyścić wszystkie komórki. Czy ktoś może mi napisać jak...
Witam, męczę się z jedną rzeczą w vba. Muszę przelecieć wszystkie wiersze ( od dołu ). W każdym wierszu kolejna pętla sprawdza każdą komórkę z warunkiem. Warunek jest taki, że jeśli w pętli napotka wiersz, w którym w żadnej komórce nie będzie koloru, to ma go usunąć. If cell.Interior.ColorIndex...
Witam serdecznie. Potrzebuję prostego makra, które za jednym zamachem usunęłoby wiersze pod dwoma warunkami: Usuwa tylko w przypadku, gdy: 1. W kolumnie G w opisie nie ma słowa "invoice". Uprzedzam, że są tam też inne słowa i liczby 2. W kolumnie A nie ma kwoty "5.00" Niestety nie za bardzo...
Witam. Potrzebuję stworzyć makro, które usunie mi wszystkie wiersze oprócz wierszy zawierających słowo "kod", wiersza poprzedzającego ten wiersz + wiersz, w którym znajduje się kwota 0,00. Czy ktoś mógłby mi z tym pomóc? Z góry b. dziękuję.
Moje skrypty są troche słabe, coś tam znalazłem w necie, troche poprzerabiałem i nawet działa, nie działa natomiast usuwanie wiersza jeżeli w kolumnie A mam coś takiego: "05-lut-2016 17:23 Start Template Page 3" z tego wszystkiego zawsze w zawartości stałe...
Witam serdecznie wszystkich, Chciałbym was uprzejmie prosić o pomoc w stworzeniu następującego makra. Jeżeli scalona komórka (składająca się z kolumn D:I) zawiera tekst "brak" to Macro usuwa ten wiersz oraz 2 wiersze powyżej i 11 wierszy poniżej. Z tym, że: - słowo "brak" jest wynikiem wpisanej...
Witam, Proszę o pomoc w napisaniu makra, które będzie usuwało całe wiersze, w których data będzie starsza niż 2016-05-02 (kolumna z datą to kolumna B) we wszystkich arkuszach. Znalazłam na jakiejś stronie kod z pętlą, która przechodzi przez wszystkie arkusze, ale nie potrafię napisać kodu odpowiadającego...
Witam. Chciałbym za pomocą Visual Basic .Net przeszukać plik Excela i jeśli w kolumnie załóżmy od B2 do B200 będzie pusta komórka to, żeby za pomocą VB.Net skasować cały wiersz. Jest to możliwe???Proszę o pomoc Dodano po 20 Znalazłem coś takiego jak poniżej na zdjęciu tylko że napisane w VBA....
Cześć, chciałam mieć makro które usunie w poszczególnych zakładkach po 3 określone wiersze, coś jednak mi nie wychodzi, mam wrażenie, że się zapętla. napisałam coś takiego: Sub Makro4() Dim arkusze, arkusz arkusze = Array("(1)", "(2)", "(3)", "(4)", "(5)", "(6)", "(7)", "(8)", "(9)", "(10)",...
Witam, poszukuję makra, które usunie wiersz jak znajdzie w nim w kolumnie P słowo "DELETE". Takich wierszy jest kilka. Z góry dzięki za pomoc. Wydzieliłem jako nowy temat. Nie podpinaj się pod cudze wątki (w dodatku archiwalne). RADU23
Witam. Mam pytanie o możliwość usunięcia całego wiersza klikając na klawiaturę. Chodzi mi dokładnie o taką funkcję VBA: jak zaznaczę jakąś komórkę, np. "I3" w arkuszu to po kliknięciu na przycisk "Delete" na klawiaturze spowodowałoby usunięcie całego wiersza "3". Czy jest taka możliwość?
Mam skoroszyt excela w którym w poszczególnych arkuszach (każdy miesiąc ma osobny arkusz) przechowywane są dane o pracownikach i jak pracowali w danym miesiącu. Czasem pracownik w ciągu miesiąca pracuje na kilku punktach pracy czyli zmienia lokalizacje. Przykład w arkuszu X pracownik o nazwisku i imieniu...
Potrzebuję czegoś cgyba podobnego, ale jednak nie mogę dopasować... Potrzebuję makro, które usunie mi wszystkie wiersze nie zawierające w kolumnie K słowa "bio" ... Pomożecie? W tej kolumnie są ciągi znaków i super jakby makro szukało tylko słowa "bio", a nie np. " bio grafia" czy "przedsię bio rstwo" ...
Czy wiesz, że w "Arkusz2" prawdopodobnie w wyniku kopiowania, wklejania a następnie usuwania wierszy jest ponad 500 przycisków o nazwie "CommandButton1"? Kiedyś był już podobny temat poruszający ten problem. Kopiowanie i wstawianie wiersza z przyciskiem działa OK, ale usunięcie wierszy powoduje układanie...
Czy można je blokować do edycji po wpisaniu danych lub odblokować jeżeli zajdzie taka potrzeba. Z tym pierwszym to żaden problem, wystarczy wykorzystać zdarzenie Worksheet_Change . Natomiast jak chcesz zrealizować odblokowanie? CheckBox w każdym wierszu? Trochę proszenie się o kłopoty. Chyba, że wszyscy...
Tu dodałem jeszcze usuwanie wiersza z pewnymi zabezpieczeniami edit: Teraz mi przyszło że zamiast przycisku edytuj kod z pod tego przycisku można umieścić na podwójnym kliknieciu w listbox (na danym wierszu) wtedy dane się zczytają do okienek edycyjnych. Podmieniłem załącznik
Na pewno potrzebna Ci będzie jedna pętla (do wyboru: Do, For), która będzie kolejno pobierała wartość komórki do porównania z kolumny A arkusza źródłowego. Dalej masz wybór. Druga, wewnętrzna pętla pobierająca wartość z E arkusza docelowego i porównanie w instrukcji warunkowej. Jeśli prawda, usuwasz...
Można usuwać puste wiersze na dwa sposoby. Pierwszy: 1. Zaznacz cały rejestr razem z wierszem nagłówka ( jak to szybko zrobić patrz PS ) i z menu Dane wybierz polecenie Filtr/ Autofiltr . 2. Rozwiń jedną z list i wybierz pozycję Puste . Widoczne będą tylko puste wiersze. 3. Zaznacz całe wiersze,...
Z Accessem miałem styczność tylko raz i z tego co pamiętam, to nie pozwala usuwać wierszy, tzn. zostawia je puste, tworzy wiersz o nowej numeracji i tworzy się bałagan, a ja będę przekopiowywał, przenosił i kombinował na wiele sposobów, excel jest do tego łatwiejszy. Proszę jeszcze raz o pomoc w excelu;p No...
Ok to muszę odszukać ta zamiana ręczna. Tak po wstawieuniu nowego wiersza będzie pusta komórka bez formuły to makrem myślałem o tym by zaznaczać komórkę A5 i w dół tak jak zaproponowałem. Zastanawia mnie najbardziej jak stworzyć kod by usuwalo mi wiersz jak cały zakres jest pusty. Bo teraz usuwa tylko...
Czy ja mógłbym odświeżyć lekko temat i zapytać czy jest szansa żeby ktoś edytował ostatni plik który wstawił (at)marek003 bo interesuje mnie tylko jeden wiersz tej całej funkcji a mianowicie wiersz numer 3, gdzie mam godziny pracy, a widzę że w komórce E3 jest funkcja takiej długości że mi ręce opadły...
Witam. Szukam makra, do excela, które będzie przeszukiwało cały wiersz numer 1, w celu znalezienia wartości np.: MSISDN oraz KOD SPRZEDAWCY I kiedy znajdzie taki wpis - usunie całą kolumnę "MSISDN" oraz "KOD SPRZEDAWCY" wraz z wartościami i danymi, które znajdują się poniżej tej komórki. Dodam,...
OKNO -> zablokuj okienka następnie dodajesz usuwasz tyle wierszy i kolumn ile potrzebujesz i jak potrzebujesz aby nie były przesuwane podczas edycji. Pozdrawiam
1)Prawie super tylko nie wiem dlaczego nie bierze pod uwagę ostatniego wiersza bez względu na liczbe w danym arkuszu?? 2)Jeszcze mam jedno pytanko w sprawie kasowania.Chciałbym usunąć wiersze zawierające konkretny tekst próbowałem użyć formuły do usuwania pustych wierszy ale nie wiedzieć czemy po...
W zakładce "Pracownicy" wkleiłem ten kod ale nic się nie dzieje Dodano po 16 A jeśli chodzi o formułę "=wiersz()" to on działa ale pokazuje aktualny wiersz w jakim znajduje się formuła i przeciągnięcie jej w dół pokazuje mi co drugą cyfrę bo komórki są spajane po dwie, a ja chcę żeby pokazało...
Dzięki wielkie. Imię dodaje tylko do pierwszego wiersza z danego skoroszytu. Ale najważniejsza jest prędkość. Zrobię testy i zaprezentuje wyniki:) Czas na wyniki testu:ść Ilość plików: 142 stare makro: 1. wczytywanie z formularzy: 35sek 2. Dodawanie: 1min 2sek Nowe makro: 1. wczytanie plus dodanie...
Intersect(Target, Columns(...)) zwraca zakres komórek typu Range(), będący wspólną częścią - w przypadku zdarzenia Worksheet_Change - obszaru, który uległ zmianie (Target) oraz wybranej kolumny (Columns(...)). Tym obszarem który uległ zmianie (Target) może być tylko jedna komórka (np. kiedy wpisujesz...
Witam, Jestem początkujący i potrzebuje pomocy. Chciałbym ukryć puste wiersze za pomocą VBA. Znalazłem taki kod ale do usuwania, próbowałem go przerobić ale mi nie wychodzi. Bardzo proszę o pomoc. [syntax=vb]Sub usuwanie_pustych_wierszy() For i = Cells(65536, "A").End(xlUp).Row To 2 Step -1 If...
Pewnie masz format ogólny i dlatego ucina kropkę... Po zmodyfikowaniu: -zmienia format kolumn wynikowych na tekstowe -dokłada kropkę, jeśli rzeczywiście jej nie ma -usuwa wiersz, jeśli pierwszy ciąg nie jest liczbą[syntax=vb]Sub Rozdziel() Dim wrs As Long, temp As Variant, tekst As String wrs...
Macieju , dokładnie oto mi chodziło. Pomogłeś mi, masz ode mnie punkty. Wiedział byś może jak poprawić kod żeby zakres komórek, które mają zostać aktywne, działał automatycznie w dół oraz w bok? Chodzi mi oto że gdy wstawię lub usunę nowy wiersz lub kolumnę do tabeli, nowe komórki będą od razu...
Korzystając z ciekawostki kolegi PRL chciałbym przestawić rozwiązanie mojego problemu z kilku postów wyżej. Chodzi o to, że po usunięciu pozycji dwuklikiem móc cofnąć operację usunięcia wiersza. Makro poniżej sprawia, że po podwójnym kliknięciu w arkuszu "szablon" w pierwszej kolumnie w danym wierszu...
Jest super, a powiedz mi jak zrobić taki samo makro "dodaj dodaj wiersz" tak aby na raz dokładało 5 wierszy Chciałbym dać jeszcze przycisk do usuwania wierszy jak doda się za dużo
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"...
Chciałbym umieszczać wiersze jeden pod drugim wg LP Tak samo chciałbym usuwać wiersze puste z zakładki "Sprawy" Procedura zdarzeniowa, którą sugerujesz byłaby jeszcze lepszym rozwiązaniem. Tak jak pisałem wcześniej, vba to dla mnie póki co magia, ale robię co mogę aby stała się nauką :) Poniżej...
Zakładam, że za aktualizowanie odpowiedzialne jest jakieś makro. Dopisz wstawianie komórki (Range("A1").Insert Shift:=xlDown) i usuwanie końcowej przed zasadniczą procedurą. Dzięki za podpowiedź, ale to makro które aktualizuje komórkę A1 jest zahasłowane i nie da rady nic dopisać. Trzeba by zrobić...
witam, mam pewien problem, w kolumnie G mam podaną firmę, w kolumnie K model, w kolumnie I kolor - mało istotne, w kolumnie J - ilość sztuk chciałbym, żeby funkcja zliczała mi ilość sztuk produktu danej firmy i modelu, ignorując kolor, postawiając zapis jako jeden wiersz (usuwa wszystkie wiersze z kolorami) nie...
Moje rozwiązanie: Zaimportuj wszystko do jednej tabeli - dodając dodatkową kolumnę - numer/nazwa tabeli czyli byłoby takie kolumny rok , mc, dzien, godzina, wartosc, numer_lub_nazwa_tabeli Oczywiście wtedy wiersze (jeśli chodzi o date/godzine) powtarzały by się , ale różniły by się conajmniej numerem...
Ad.2 Kopiowanie wiersza z przysikiem, to żaden problem. Problemy zaczynaja sie przy usuwaniu wierszy, bo przycisk zostaje i zwykle nakłada się na następny. Po jakimś czasie może być ich mnóstwo "na kupce" Ad.1 Napisać makro wg Twojego opisu, to, na oko, żaden problem. Sugerowałbym którąś z procedur...
Cześć, Potrzebują pomocy z następującą sytuacją. Mianowicie mam raport w Excelu, z którego usuwam codziennie niepotrzebne dane. Używam do tego następującego kodu, który duplikuje tyle razy ile potrzebuję różnych rzeczy do usunięcia: [syntax=vbscript] Last = Cells(Rows.Count, "A").End(xlUp).Row For...
1. 1. Nie kasuje komórek z zakresu Kod: br.Sheets(s).Range("39:56,97:100,141:144... To jest mój błĄd, miało być o 9 wierszy mniej, poniewaz kopie z a10 do a1 na sbiorczym t.j. range("30:47, 88:91, ... itd. teraz makro usuwa wiersze z...
Witam Zadanie które mam do wykonania polega na tym, iż mam dostępny arkusz "baza" w którym znajduje się ok 10 000 wierszy, każdemu wierszowi odpowiada kolejno w kolumnach od A do C , nr punktu , współrzędna X i współrzędna Y i muszę ustawić numery zaczynając od numeru C27 i kolejno każdy...
Hej, chciałbym zmienić wiersz "Range("A66:N66" & i + 1).ListObject.ListRows.Add AlwaysInsert:=True" tak, aby zamiast A66:N66 podać nazwę nagłówka tabeli. Niestety nie mogę odwoływać się do konkretnych komórek ponieważ powyżej utworzonej tabeli użytkownik ma możliwość dodawania i usuwania wierszy. Private...
Żebyśmy się zrozumieli. Nie wiele potrafię, to jest fakt niezaprzeczalny :) Poza tym makro czyszczące dane z bloku pierwszego jest celowo przypisane tylko do pierwszego bloku ponieważ: Tych bloków/tabel w praktyce będzie wiele.. 20, nawet 40. Czyszczenie każdego z nich byłoby karkołomnym. W rzeczywistości...
Czyli do każdego dodanego towaru a magazynie ma być info o nr faktury?? i wpisanie faktury twoim zdaniem jakie info powinno zawierać?? Powinno to (wg mnie) wyglądać tak: Arkusz "magazyn" (asortyment) - gdzie wpisujesz każdy nowy towar z cechami, o których pisaliśmy. Stany wyliczałby Excel na podstawie...
Witam, Mam problem z makrem, które znalazłem na forum i które staram się przerobić pod moje potrzeby. Docelowo, makro ma sprawdzać czy w komórce w kolumnie F arkusza 1 jest wyraz "tak" i jeżeli to się potwierdzi to kopiować w pierwsze wolne miejsce w kolumnie D akrusza 2 zawartość komórki B arkusza...
Strasznie ogólnie zadane pytanie. Może być wiele sposobów ale by odpowiedzieć tak ogólnie to: Uzależnić początek drugiego zakresu od końca pierwszego zakresu. Np zamiast Range stosować Cells (Choć Range też można przecież parametryzować) Można używać Row i dodawać lub usuwać wiersze. Nie wiem...
Witam, Mam makro do usuwania wierszy, które zawierają w kolumnie A "0". Proszę pamiętać o używaniu znaczników syntax . Opcja Listing kodu . - arnoldziq
super! dodałem i wszystko działa jak należy!! Miałem tylko problem z usuwaniem pustych wierszy... napisalem makro kasujące gdy jakieś pole jest puste... działa ale bardzo długo przelicza.... Poniżej makro: Sub Kasuj() For i = Cells(65536, "A").End(xlUp).Row To 3 Step -1 If Cells(i, "B").Value =...
Wygląda to trochę inaczej niż założenia o jakich była mowa w pierwszym poście, tematy się powtarzają. Dla filtra potrzebna będzie lista unikatowych nazw tematów, realizowana w arkuszu przez wstaw>wklej specjalnie i dalej jak w moim przykładzie. Lub makro (uruchamiane np przy aktywacji arkusza "Menu")...
Witam potrzebuje utworzyć formułę która będzie generowała kolejne arkusze a następnie przepisywała do nich dane z kolejnych wierszy podstawowego arkusza.Arkusze wynikowe muszą powstawać według określonego wzorca próbowałem robić to w taki sposób że potworzyłem komórki z odwołaniami do komórek źródłowych...
Witam po przerwie, czas definitywnie zamknąć temat. Trochę czasu potrzebowałem na to aby zgłębić tajniki VBA i dokończyć mój pomysł na "tip top". Dzięki pomocy Marka i kol. PRL połknąłem bakcyla i się trochę podszkoliłem. Dopieściłem trochę kod wyjściowy aby tabelki końcowe ładnie wyglądały i aby dodać...
Ad.1 i 2 Najprościej: nazwij je przy tworzeniu Np dla pierwszego wykresy dodaj na końcu Wykres_01.Name = "Wykres1" wtedy: Sheets(Zak).Shapes(... Workbook.Open wywołaj makra usuwania i tworzenia. Jeśli będą nazwane (pkt.1), nie będzie trzeba nawet pętli, instrukcji warunkowej,...
Działa ale też nie do końca tak jak trzeba - nie przenosi szerokości komórek i formatowania warunkowego. Ale spox poradziłem sobie w inny sposób. Na bazie poprzedniej procedury nagrałem sobie makro, które usuwa zbędne wiersze i zmienia nazwę arkusz i pozamiatane. Jeszcze raz wielkie dzięki za pomoc.
marcinj12, Dzięki za tę podpowiedź. Poprawie to w kodzie i zobacze czy choć trochę przyspieszyło. Szczerze mówiąc to nie wiem, która zajmuje więcej czasu, wydaje mi się, że delete, ponieważ jest odpalana dwa razy (w dwóch arkuszach). Jeżeli chodzi o ilość danych, to przy około 300 wierszach radzi...
Wariant z blokowaniem zakresu komórek przy otwieraniu i zamykaniu zeszytu. 1. Na wszelki wypadek w procedurze 'Private Sub WorkSheet_Change(ByVal Target As Range)', w danym arkuszu, zmienić deklarację zmiennej z 'Dim i As Integer ' na 'Dim i As Long ' 2. W module 'ThisWorkbook' wkleić kod: 885619...
Problem rozwiązany dodałam do kodu 3 Application.ScreenUpdating = True Set Skonsolidowany = Worksheets.Add() Plik = Dir(Folder & "*.xls") Do Until Len(Plik) = 0 Licznik = Licznik + 1 Application.StatusBar = "Konsolidacja pliku nr " & Licznik ...
Witam Mam tabelę w excelu 2000: Zaczyna się od 6 wiersza i kolumny B (6 wiersz to nagłówki tabeli). W kolumnie C wpisywane są daty (w formacie RRRR-MM-DD). Chciałbym aby po wpisaniu dat w komórkach: C3 i C4 (i zatwierdzeniu w obojętnie jaki sposób, np. po wciśnięciu przycisku filtruj umieszczonym...
:D :D :D Wiem że autor jest już "zadowolony" ale Jako laik zapytam ... ja też za kolegą zapytam: jak zmusić excela do usunięcia zbędnych wierszy i kolumn by ich nie było wcale [zaznaczam że nie chcę ich ukrywać]. A że już nie jestem takim laikiem jak kolega walek33 :D to wiem, że istnieje...
Przepraszam będę dołączał. Niestety nie działa. Kiedy zaznaczam jakąś komórkę w zakresie Excel automatycznie zaznacza jak na rysunku cały zakres danych w kolumnie B, przy tworzeniu tabeli. Podobnie jest jak usuwam dane w A nie zmniejsza jej automatycznie. Według mnie on dotyczące tworzenia tabeli powinien...
Wydaje mi się, że najlepszym rozwiązaniem w przypadku wartości stałych, wpisywanych z klawiatury jest stosowanie grupowania arkuszy. Wtedy w obu arkuszach jest dokładnie ta sama zawartość. Pozwala to również na formatowanie komórek, ukrywanie i odkrywanie wierszy, usuwanie i wstawianie wierszy. Trzeba...
Uzywam excela 2002 SP3. Wstawiam plik może będzie bardziej przejrzyście. Wpisując w Blad2 w komórce np. ''P1'' w Blad1 jest funkcja JEŻELI i zaznacza to ''X'' a później kopiuje mi wszystkie wiersze z ''X'' w kolumnie ''O'' do Blad2 zaczynając od wiersza drugiego z tym że nie wiem dlaczego ale usuwa mi...
Wklej do modułu i wypróbuj takie makro (zrobiłem kopiowanie, bo prościej ale możesz sobie zmienić na wstawianie): a usuwając "zgubisz" w końcu te sformatowane (z obramowaniem). Pomijam kwestię rozmieszczenia na stronie, tu poradzisz sobie sam ;)
Witam serdecznie, mam problem dotyczący wklejania danych w postaci tekstu do Excela. Konkretnie, kiedy wklejam do Excela tekst skopiowany ze strony internetowej (kopiowane dane to opisy produktów) do konkretnej komórki odpowiadającej danemu produktowi, a w tekście są "twarde entery", każdy kolejny...
Witam! Mam w pliku Excel arkusz dla każdego tygodnia roku kalendarzowego o nazwach T-01, T-33, T-43 itd. W arkuszu posiadam makro do szybkiego tworzenia nowego arkusza przenoszące układ i formatowanie obecnego arkusza i dodatkowo przenoszące do nowo tworzonego arkusza wiersze dla których wartość w...
Witam Tabela z uprawami - po wprowadzeniu działek do arkusza (kolumna C i D) okazuje się ze na niektórych polach jest więcej niż jedna uprawa. Wtedy wstawiam wiersz poniżej danej działki i wpisuję kolejne uprawy na danej działce (tylko kolumna E, G, F, natomiast C i D zostają puste w tym wypadku). Podobnie...
Makro poniżej przesuwa nazwiska w prawo o wartość numeru grupy+1, a następnie usuwa puste komórki w obszarze danych. Nazwiska nie są posortowane. Jeżeli jest potrzeba. sortowania to na początku makra dopisać sortowanie.[syntax=vbscript]Sub Przepisz_Nazwiska() Dim Tab_Opis As Variant With ActiveSheet Tab_Opis...
Witam. Potrzebuje makra, które kopiuj dane z arkusza Excela "BAZA" do arkusza excela "baza1" i usuwa duplikaty (imie i nazwisko) które występują kolejny raz w kolumnie C. W arkuszu "baza" funkcje Excela muszą zostać. Przeszukałam internet i nie znalazłam kodu.Wierszy będzie maximum 100 z których należało...
Witam, chciałabym stworzyć makro porównujace dwa wskazane przeze mnie pliki. Układ obu plików jest taki sam. Na kilkaset wierszy czasami zostanie zmieniony tekst/kwota lub całkiem usunięty/dodany nowy wiersz. Widziałabym to tak że wskazuje konkretne dwa pliki, a makro porównując je usuwa powtarzające...
No tak, racja ;) Plik będzie codziennie aktualizowany przez dwie osoby- dla nich przeznaczone są dwie pierwsze zakładki. Będą w nim zawarte zrealizowane zlecenia (każde zlecenie ma indywidualny numer) ale tylko z tego konkretnego dnia. Codziennie liczba zleceń (a wiec liczba wierszy) w poszczególnych...
Import obu tabel do Access, utworzenie kwerendy z relacja, 5 minut i masz gotowy wynik. Inna opcja to power query w samym Excelu także 5 minut plus jakieś 40 minut na poszukanie i zapoznanie z powyższymi propozycjami. Dzięki za podpowiedź, ale plik ma być również dla innych użytkowników, którzy...
