Jeśli będziesz miała otwarte oba pliki (tylko :!: ) to w świeżym pliku możesz wykorzystać makro typu :spoko: : [syntax=vbscript]Option Explicit Sub duplikatclear() Dim ws As Worksheet Dim ww As Worksheet Dim i, lrs, lrw As Integer Dim db As Range Set ws = ThisWorkbook.Sheets(1) Set ww = Workbooks(2).Sheets(1) lrs = ws.Cells(Rows.Count, 6).End(xlUp).Row...
...albo zrobić tabelę przestawną z indeksem w wierszu + licznik z indeksu?? :)
Można napisać makro usuwające duplikaty. Ale na jakich zasadach? Jeśli nie Imię, nie nazwisko, nie Nr telefonu... Teraz widzisz po co wymyślono PESEL. Dla Excela :) Brakujące dane można uzupełnić w makro, ale priorytetową sprawą jest rozpoznanie duplikatów (wierszy dot. tej samej osoby). Przykład: http://obrazki.elektroda.pl/8548686700_1...
Przepraszam za opóźnienie w odpowiedzi. Niezmiernie dziękuje za pomoc. (at)cbrman - Twoje marko działa, ale u mnie niestety pobiera również nagłówki. Ale poradziłem sobie z problemem, zarejestrowałem makro, w którym usuwam duplikaty. Później połączyłem Twoje makro z moim, rejestrując trzecie makro, które uruchamiało je po kolei.
Witam, interesuje mnie kopiowanie duplikatów wartości z kolumny A (usunięcie tych wartości w kolumnie A) oraz przekopiowanie tylko wartości zdublowanych do kolumny E. Szczegóły w załączniku. Z góry dziękuję za pomoc.[/quote]
... [syntax=vbscript]Else MsgBox "Duplikat", vbExclamation, "Etykieta wprowadzona" a = Application.Match(Target, Range("A1:A" & Cells(Rows.Count, "A").End(xlUp).Row), 0) ActiveSheet.Unprotect Application.EnableEvents = False Rows(a).Delete Target = "" Application.EnableEvents = True ActiveSheet.Protect End If[/syntax]
cześć. Mam plik spakowany "duplikaty". Exel 2013.Dane jakie znajduja się w arkuszach:"arkusz1", "arkusz2","arkusz3" to cyfry, znaki specjalne i litery.Makro szuka duplikatów zawsze w kolumnie A, miedzy arkuszami:"arkusz1", "arkusz2","arkusz3". Makro jak znajdzie przynajmniej wartość duplikująca miedzy tymi arkuszami to wstawia do arkusza"WYNIK_DUPLIKATY",...
Dzień dobry. Poszukuję rozwiązania za pomocą Vba . Dane są zawarte w 6 kolumnach ok 2000 linii posiadają duplikaty i nie tylko-są też pojedyncze linie w liście. Makro powinno wycinać i wklejać do Arkusza2 w oparciu o duplikaty lub pojedyncze elementy Arkusza1 z kol"A" w zakresie linii do kolumny "E" . ( w całej liście w większości to duplikat choć występują...
makrem[syntax=vb]Sub usunDupKol() tRow = 3 While Cells(tRow, 1) <> "" For c = Cells(tRow, Columns.Count).End(xlToLeft).Column To 2 Step -1 If Application.CountIf(Rows(tRow), Cells(tRow, c)) > 1 Then Cells(tRow, c).Delete xlToLeft End If Next tRow = tRow + 1 Wend End Sub [/syntax]
Ja tylko zasugeruje że najlepiej by było wszystkie kolumny połaczyć i wtedy usuwać duplikat. Czyli jak dobrze rozumuje: test.Add lista(i, 1) & lista(i, 2) & lista(i, 3) & lista(i, 4), CStr(lista(i, 1)) & CStr(lista(i, 2)) & CStr(lista(i, 3)) & CStr(lista(i, 4))...
Jest sposób, aby excel usuwał duplikaty, poza komórkami z rekordem "Użytkownik"? :cunning: :?: Wiele :please: - makro, formuły, kolumny pomocnicze, filtrowanie itd. Załącz przykładowy plik (z fikcyjnymi danymi ale z rzeczywistym układem) to będzie można coś zaproponować. :D
A nie wystarczyło by nagrać makro, które kopiuje wszystkie te kolumny do jednej i usuwa duplikaty?:>
Hmm, bez makra... Pewnie da się kilkoma tablicowymi, ale aż takim orłem w funkcjach nie jestem ;) W załączniku wynik kombinacji z arkuszem pomocniczym. Trochę tam jeszcze nieporządek z funkcjami. No i listy zepsułem - myślałem, że ta tabelka to wynikowa ma być. Listę grubości wpisałem "na sztywno", a materiał... może tak właśnie będzie dobrze (można...
Mogę mieć plik w tym samym miejscu i z tą samą nazwą. Do tego dążę - żeby zautomatyzować. Nie chcę tabeli przestawnej bo muszę pracować na tych danych. Przerabiałam to już i się to nie sprawdziło. Dobra odpuśćmy ten temat. Czy możesz mi powiedzieć jak ponumerować wiersze, aby numery szły kolejno, ale jeśli wiersz się powtarza to zwróci ten sam numer?...
Nie pokazałeś w pliku przykładowym spodziewanego wyniku, ale mam nadzieję, że o to chodziło. W mojej propozycji makra wykorzystuję na zmianę formatowanie warunkowe i filtrowanie, a następnie usuwam wyfiltrowane wiersze, aby w końcu uzyskać efekt, o którym pisałeś. [syntax=vbnet]Sub Duplikaty() Application.ScreenUpdating = False Sheets("Arkusz1").Copy...
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 by usunąć duplikaty.
trafiłeś idealnie dzięki a ja jeszcze gafę strzeliłem bo na samym początku żeby usuwało duplikaty z kolumny A, ale żeby i usunęło również te dane z kolumny B (usuwamy duplikaty np. A2 zostanie usunięte i B2) a potem dopiero to co napisałeś
Utknęłam. Moje makro filtruje wiersze ze statusem New i je kopiuje, następnie otwiera drugi plik i dokleja te odfiltrowane wiersze i usuwa duplikaty. Jak zrobić, żeby dla każdego nowego wklejonego wiersza w ostatniej kolumnie (AE) dodawana była data?
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 są mi potrzebne, stworzyłam makro które: -usuwa duplikaty...
Cześć, Mam problem, mianowicie mam dwie kolumny w pliku. W jednej są dane a w drugiej dane do przypisania. Dane do przypisania mają takie same wartości, skorzystałem z makra które pozwala przypisać dane w jednej komórce jednak usuwa duplikaty. Nie jestem w stanie wyłapać w którym miejscu jest kod odpowiedzialny za usunięcie duplikatów. Może ktoś pomóc?...
To zależy jak często będzie to wykorzystywane. Jeżeli tylko raz to lepsze są funkcje Excela, bo z reguły szybciej się wykona zadanie. Jeżeli jednak będzie to powtarzane co jakiś czas to lepsze będzie makro VBA, bo masz pełną kontrolę nad tym co się wykonuje, a czas tworzenie nie jest powalający, jeżeli potrafisz trochę pisać w VBA.
Mam problem z usuwaniem duplikatów. W całej tabeli znajduje się wiele zdublowanych danych. Można usunąć duplikaty na podstawie kolumny A, która niestety zawiera czasem ok 70 tys. wierszy. Gdy uruchamiam makro, to się zacina. Czy ktoś mógłby coś poradzić? Dziękuję [syntax=vb] For i = Cells(Rows.Count, "A").End(xlUp).Row To 2 Step -1 If Cells(i, "A").Value...
Przy ReDim dni(1 To n) musisz wcześniej określić to "n". Tak ci nie przepuści. Tak na marginesie: Był już na forum łatwiejszy sposób usuwania duplikatów. Jak dobrze pamiętam - z wykorzystaniem błędu. Gdzie indeks tabeli był tym samym co dana w tabeli pod tym indeksem. edit ----------------------- Znalazłem usuwanie duplikatów w jednym przebiegu pętli...
Mam w Excel tabelę: ID CENA SUMA 1212 7311 114 1217 918 1111 7310 Chciałbym, aby makro vba znajdowało wszystkie wartości, które mają takie same ID (duplikaty), sumowało ich cenę, usuwało jeden zduplikowany wiersz i zostawiało w tabeli wynikowej tylko jeden z sumą. Czyli manualnie w przypadku tego pliku wynik byłby taki: ID SUMA 12 29 73 21 Jak można...
Wstęga Dane -> Usuń duplikaty. Zaznaczyć obszar danych, klik w usuń duplikaty, odznaczyć wszystkie kolumny oprócz A i B. OK. nie działa, ponieważ w tym wypadku potrzebuje dwóch wartości sprzedaży ,,38" potrzebuje, za dużo usuwa w tym wypadku. jedna za transport i druga za produkt. https://obrazki.elektroda.pl/6533043900_...
Arkusz z danymi, ponad 100tys. wierszy, ponad 50 kolumn. Chodzi o pozbycie się duplikatów z zachowaniem unikatowych danych. Np. Robię dodatkową kolumnę poprzez połączenie imię, nazwisko, firma, szereguję A-Z następnie zaznaczam formatowanie warunkowe i oznaczam duplikaty, następnie filtruję po kolorze (co przy tej ilości danych pewnie potrwa którąś...
Dziękuję za zainteresowanie, sprawa nie jest tak prosta jak się wydaję. Spieszę wyjaśnić do czego jest mi to potrzebne. Generalnie potrzebuję to do stworzenia słownika wyłącznie słów, których używam sam w swoich tekstach. Niektóre teksty (artykuły) są wręcz olbrzymie. Lista słów musi być w ten sposób ułożona (jedno po drugim) w pliku tekstowym i zaimportowana...
Prosiłem o plik Excela, a nie o obrazek. Pytałem, jak to ma działać? Czy to makro ma reagować każdorazowo jak zmieni się kolor (rozumiem, że sprawdzana ma być kolumna C), czy ma być wywoływane okresowo (np. przyciskiem) i ma sprawdzać całą kolumnę pod kątem pokolorowanych duplikatów? Czy może wystąpić taka sytuacja, że jakiś wpis ma już kolor i ten...
Witam, Mam bazę danych, w osobnym arkuszu utworzyłam sobie listę w której mogę wybrać nr klienta (nr klienta jest czasami z jakimś tekstem lub z jakimiś dodatkowymi liczbami ale mam go traktować jako jeden klient). Udalo mi się napisać proste makro (jestem poczatkujaca) które z wyfiltrowanej listy kopiuje te nr do osobnego arkusza, sortuje tam te dane,...
Witam, proszę o pomoc w temacie jak wyżej. Mam plik, w którym kolumny od A do Z (takie same w każdym arkuszu, a mam ich 5+ zbiorczy) zawierają różne dane tekstowe, jak w załączniku. Skopiowałem je do jednego arkusza i tu zaczyna się problem. Czasami niektóre dane powtarzają się - te same tytuły + nazwisko i imię autora w kilku arkuszach. W takim przypadku...
Usuń duplikaty ani tabela przestawna tu się nie przyda bo dochodzi warunek że usuń gdy puste ale nie gdy puste w Re_3 Stworzyłem w sumie proste makro (ono tylko tak wygląda) Pierwsza część kodu przepisuje wszystkie linie mające to samo zlecenie. Później następuje sortowanie. Następnie warunek sprawdza czy (w moim przypadku coś1) się powtarza jeżeli...
Witam, mam mały problem z wyszukaj.pionowo w VBA - bazuje na 2 plikach, które otwieram w trakcie trwania makra, nie mam jak przechowywać nazw pliku, bo to użytkownik je wybiera i jak się odnieść do drugiego pliku przez tą funkcję. Ewentualnie czy jest jakaś inna funkcja, która może to rozwiązać? Jak rozwiązać coś takiego: A a A c A n By wyszukać pionowo...
Temat rozwiązany. Pomocne okazały się obiekty Scripting Dictionary - pierwsza pętla tworzy tablicę unikalnych wzorców oraz kolekcje - druga pętla sprawdza, ile dla każdego z tych unikalnych elementów jest unikalnych wystąpień w kolumnie wartości. Pewnie dałoby się jeszcze coś zoptymalizować, ale najważniejsze, że działa. Dla zainteresowanych zamieszczam...
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 zakres. Udało mi się znaleźć procedurę usuwania...
usuwać duplikat duplikat usuwać excel usuwać duplikat
ubuntu karta graficzna kenwood 880sd farby usuwanie
Kalibracja wyważarki Beissbarth 825D - instrukcje i wskazówki O-ringi pompy paliwa Audi A6 C5 2.4 - wymiana i materiały
