Excel Forum - Porady, Pomoc,  Excel Help, Excel FAQ Strona Główna
 FAQ  RegulaminRegulamin  Szukaj   Użytkownicy   Grupy   Rejestracja   Profil   Twoje wiadomości   Zaloguj 


Poprzedni temat «» Następny temat
ID tematu: 64085 Skopiuj do schowka Usuwanie zdublowanych wartosci w wybranych kolunach
Autor Wiadomość
MichalScz 
forumowicz


Posty: 12
Wysłany: 09-02-2019, 18:28   Usuwanie zdublowanych wartosci w wybranych kolunach

Cześć,
Chciałbym napisać makro, które usunie zdublowane wartości z wybranych kolumn nie usuwając całych wierszy. Dodatkowo pierwszy rekord z każdej zdublowanej wartości musi pozostać w kolumnie. Na przykład kolumna A zawiera liczby porządkowe. Wiersz 3 i 4 mają przypisaną liczbę porządkową "1". Chciałbym w komórce A3 zostawić "1" a usunąć dubel z komórek A4. Muszę tak obrobić kolumny A, G, K, T. Jakieś pomysły? W załączniku plik wyjściowy i plik docelowy.
Pozdrawiam.
Michał.

Docelowy.xls
Pobierz Plik ściągnięto 11 raz(y) 36.5 KB

Wyjściowy.xls
Pobierz Plik ściągnięto 10 raz(y) 36.5 KB

ID posta: 362268 Skopiuj do schowka
 
 
BrunO 
ExcelSpec



Pomógł: 126 razy
Posty: 551
Wysłany: 09-02-2019, 19:41   

Takie makro mi wychodzi.
Kod:
Sub usun_duplikaty()

Dim nr As Long
Dim r As Long
Dim LastR As Long

r = 3

Do Until Cells(r, "A").Value = Empty
    If Cells(r, "A").Value = nr Then
        Cells(r, "A").Value = Empty
        Cells(r, "G").Value = Empty
        Cells(r, "K").Value = Empty
    Else
        nr = Cells(r, "A").Value
    End If
    r = r + 1
Loop

End Sub


Pamiętając poprzedni topic zakładam, że będzie odpalane w aktywnym arkuszu, jeśli nie, trzeba w makrze uwzględnić jego nazwę.

Wyjściowy.xls
Pobierz Plik ściągnięto 9 raz(y) 43.5 KB

Ostatnio zmieniony przez BrunO 09-02-2019, 19:58, w całości zmieniany 1 raz  
ID posta: 362270 Skopiuj do schowka
 
 
MichalScz 
forumowicz


Posty: 12
Wysłany: 09-02-2019, 19:50   

Mistrz!!! Działa jak złoto :) Dziękuję.
ID posta: 362271 Skopiuj do schowka
 
 
Wyświetl posty z ostatnich:   
Odpowiedz do tematu
Nie możesz pisać nowych tematów
Nie możesz odpowiadać w tematach
Nie możesz zmieniać swoich postów
Nie możesz usuwać swoich postów
Nie możesz głosować w ankietach
Nie możesz załączać plików na tym forum
Możesz ściągać załączniki na tym forum
Dodaj temat do Ulubionych
Wersja do druku

Skocz do:  

Powered by phpBB modified by Przemo © 2003 phpBB Group
Theme xandgreen created by spleen& Programosy modified v0.3 by warna
Opieka techniczna www.marketingNET.pl

Archiwum

Strona używa plików cookies.

Kliknij tutaj, żeby dowiedzieć się jaki jest cel używania cookies oraz jak zmienić ustawienia cookie w przeglądarce.
Korzystając ze strony użytkownik wyraża zgodę na używanie plików cookies, zgodnie z bieżącymi ustawieniami przeglądarki.
Sprawdź, w jaki sposób przetwarzamy dane osobowe