Miten saadaan osoitelistoja verrattua excelissä?

H1ppu

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.

11

289

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • 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ä
      • 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

    1. Suureksi onneksesi on myönnettävä

      Että olen nyt sitten mennyt rakastumaan sinuun. Ei tässä mitään, olen kärsivällinen ❤️
      Ikävä
      65
      1443
    2. Perusmuotoiset TV-lähetykset loppu

      Nyt sanoo useiden HD-muotoistenkin kanavien kohdalla äly-TV, ettei kanava ole käytössä, haluatko poistaa sen? Kanavia
      Apua aloittelijalle
      110
      900
    3. No ei sun asunto eikä mikään

      muukaan sussa ole erikoista. 🤣 köyhä 🤣
      Ikävä
      58
      741
    4. YLE Äänekosken kaupunginjohtaja saa ankaraa arvostelua

      Kaupungin johtaja saa ankaraa kritiikkiä äkkiväärästä henkilöstöjohtamisestaan. Uusin häirintäilmoitus päivätty 15 kesä
      Äänekoski
      47
      734
    5. Mitä mietit Honey?

      Kulta nainen ❤️❤️
      Ikävä
      57
      710
    6. Missä kaikessa olet erilainen

      Kuin kaivattusi? Voin itse aloittaa: en ole vegaani kuten hän. Enkä harrasta tietokonepelejä lainkaan.
      Ikävä
      39
      697
    7. Linnasuolla poliisi operaatio

      Kamalaa menoa taas meidän ihanassa kaupungissa. https://www.uutisvuoksi.fi/paikalliset/8646060
      Imatra
      25
      665
    8. Hyvin. Ikävää nainen,

      Että vainoat ja stalkkaat miestäni.onko tarkoituksesi ehkä saada meidät eroamaan?no,siinä et tule onnistumaan
      Ikävä
      70
      653
    9. Uskomaton tekninen vaaliliitto poimii rusinoita pullasta

      Korni näytösesitelmä menossa kaupunginvaltuustossa. Juhlia ei ole kokouksista tiedossa muilla, kuin monipuolue paikalli
      Pyhäjärvi
      67
      650
    10. Katsoin mies itseäni rehellisesti peiliin

      Ja pakko on myöntää, että rupsahtanut olen 😆. Niin se ikä saavuttaa meidät kaikki.
      Ikävä
      41
      647
    Aihe