Ongelma: On kaksi eri pituista osoitelistaa excelissä, lista A ja lista B. Listaan A sisältyvät myös kaikki ne osoitteet, jotka ovat listassa B (eli lista B on osa listasta A). Nyt tarvitsisi selvittää ne osoitteet, jotka eivät ole listalla B, ja tehdä niistä lista C. Miten onnistuu? Kyse ei siis ole duplikaattien poistosta, ja osoite on säpö, joten kaikki tiedot voidaan laittaa samaan taulukkoon eri sarakkeisiin.
Miten saadaan osoitelistoja verrattua excelissä?
11
292
Vastaukset
- Tämmöinen
Sub Puuttuvat()
Dim r1, r2, r3 As Integer
Dim haettava As String
Dim löytyi As Boolean
r1 = 1
r3 = 0
Do
haettava = Cells(r1, 1)
r2 = 0
Do
r2 = r2 1
löytyi = Cells(r2, 2) = haettava
If löytyi Then Exit Do
Loop Until Cells(r2 1, 2) = ""
If Not löytyi Then
r3 = r3 1
Cells(r3, 3) = haettava
End If
r1 = r1 1
Loop Until Cells(r1, 1) = ""
End Sub - H1ppu
Kiitos, ja auts, en ole noin pro =) Koitan askarrella tuon kuitenkin. Osaisiko joku antaa ohjeet rautalankaversiona?
- Tämmöinen
Paina Alt F11
- Aukeaa VBA-editori. Sieltä:
Insert – Module
- Kopioi yllä oleva makro tähän Moduliin
Makro suoritetaan Excelistä esim.
Paina Alt F8
- Valitse makro listalta ja paina Run - H1ppu
Kiitos, onnistui!!
- Haitko-tätä
Tätäkin voi kokeilla: http://i.imgur.com/JsLs5hA.png
- H1ppu
Kokeilin, mutten saanut toimimaan. Missähän voisi olla vika? C-sarakkeessa on seuraava kaava, muttei palauta yhtään arvoa, tulee pelkkää tyhjää C-sarakkeeseen:
=IF(ISNA(VLOOKUP(A1;$B$1:$B$10;1;0))=1;A1;"") - Haitko-tätä
H1ppu kirjoitti:
Kokeilin, mutten saanut toimimaan. Missähän voisi olla vika? C-sarakkeessa on seuraava kaava, muttei palauta yhtään arvoa, tulee pelkkää tyhjää C-sarakkeeseen:
=IF(ISNA(VLOOKUP(A1;$B$1:$B$10;1;0))=1;A1;"")C-sarakkeen tyhjä solu tarkoittaa sitä että A1 solussa oleva arvo löytyy joltakin riviltä B-sarakkeen soluista.
=JOS(ONPUUTTUU(PHAKU(A1;$B$1:$B$5;1;0))=1;A1;"")
ja käänteisenä näin
=JOS(ONPUUTTUU(PHAKU(A1;$B$1:$B$5;1;0))=0;A1;"") - H1ppu
Jep, mutta c-sarakkeeseen ei palaudu mitään, oli a-sarakkeen arvo b:ssä tai ei. Koitin toistaa myös leikkeessä olleilla luvuilla, jotta tulisi ihan samoin (paitsi mun excel on englanniksi), muttei onnistunut. Kumma. Makrolla sain toimimaan, mutta tämänkin tavan haluaisin oppia.
- Haitko-tätä
H1ppu kirjoitti:
Jep, mutta c-sarakkeeseen ei palaudu mitään, oli a-sarakkeen arvo b:ssä tai ei. Koitin toistaa myös leikkeessä olleilla luvuilla, jotta tulisi ihan samoin (paitsi mun excel on englanniksi), muttei onnistunut. Kumma. Makrolla sain toimimaan, mutta tämänkin tavan haluaisin oppia.
Hitto, excelissä tuo meneekin näin:
=JOS(ONPUUTTUU(PHAKU(A1;$B$1:$B$10;1;0));A1;"")
- JOSLASKEJOS
Yksi mahdollisuus.
C1=IF(COUNTIF(B:B; A1)=0; A1; "")- H1ppu
Kiitos! Tämäkin toimii! :)
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Ikävöin sinua kokoyön!
En halua odottaa, että voisin näyttää sinulle kuinka paljon rakastan sinua. Toivon, että uskot, että olen varsin hullun443126Kova karman laki
Karman lain kautta pahantekijä tehdessään pahaa toteuttaa koston ja rangaistuksen sille jolle pahaa on tehty. Tämä tarko5081917Päivieni piristys, missä olet?
Toit iloa ja valoa mun elämään ☀️ Nyt mennyt kohta viikko ettei ole nähty. Kaipaan nähdä sua silti ja pelkään vaikka tei171900Näen jatkuvasti Sompasaunalla alastomia miehiä ja naisia
jotka menevät siihen viereiseen rantaan myös uimaan alasti. Sompasaunat on siis Mustikkamaalla Helsingissä, ja kuljen si781680- 181502
Jos sinä olisit pyrkimässä elämääni takaisin
Arvelisin sen johtuvan siitä, että olisit taas polttanut jonkun sillan takanasi. Ei taida löytyä enää kyliltä naista, jo431388- 261322
Millainen kaivattusi luonne on?
Millaisia luonteenpiirteitä arvostat kaivatussa? Oletteko samanlaisia luonteeltanne?901319Helena ja Mikko Koivun ero jatkuu edelleen ja loppua ei näy.
Voi eikä, miksi menee noin vaikeaksi avioero ja sopua ei tää ex- pari vaan saa.1141147UPM suunnittelee paperintuotannon lopettamista LPR:ssa
Ilta-Sanomissa oli uutinen. Metsäyhtiö UPM suunnittelee paperintuotannon lopettamista Kaukaan-tehtaalla Lappeenrannassa1101123