kost
(kost)
11 Czerwiec 2013 06:30
#1
Witam.
Jak zrobić w Excel-u coś takiego:
W kolumnie A mam np. jakieś adresy mail w kolumnie B też mam adresy mail
i chcę by do kolumny C zostały przekopiowane adresy z kolumny B ale tylko te które nie występują też w kolumnie A.
Mam nadzieję że w miarę zrozumiale napisałem o co mi chodzi.
----kolumna-A-----kolumna-B-----kolumna-C
1 mail2@wp.pl | mail3@wp.pl | mail3@wp.pl
2 mail4@wp.pl | mail2@wp.pl | mail5@wp.pl
3 mail7@wp.pl | mail5@wp.pl
Użyj funkcji WYSZUKAJ.PIONOWO(), która znajdzie Ci te wiersze, dla których akurat dany element występuje lub #N /D!gdy go nie znajdzie.
dla komórki C1:
=WYSZUKAJ.PIONOWO(B1;A:A;1;FAŁSZ)
pozostałe komórki uzupełnij automatycznie tym samym wzorem.
A potem sobie to przefiltrujesz po #N /D!i skopiujesz zawartość kolumny B.
Qoo
(Qoo)
11 Czerwiec 2013 08:21
#3
Sub Adresy()
Dim wiersze As Long
Dim IndexC As Long
Dim status As Boolean
wiersze = ActiveSheet.UsedRange.Rows.Count
IndexC = 1
For i = 1 To wiersze
status = True
For j = 1 To wiersze
If Cells(i, 2) = Cells(j, 1) Then
status = False
End If
Next j
If status Then
Cells(IndexC, 3) = Cells(i, 2)
IndexC = IndexC + 1
End If
Next i
End Sub
kost
(kost)
12 Czerwiec 2013 06:29
#4
Dzięki Pablo_Wawa kod działa.
Co do kodu Qoo to nie wiem jak go zastosować.
Qoo napisał makro, ale nie wyjaśnił nic więcej - jeśli nie pisałeś makr, to daj sobie spokój, ten problem da się rozwiązać “normalnie”.
Qoo
(Qoo)
12 Czerwiec 2013 08:23
#6
kost
(kost)
13 Czerwiec 2013 12:50
#7
OK. Wielkie dzięki za odpowiedzi!