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

301

    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. Riikka Purra haluaa muuttaa

      maahanmuuttopolitiikkaa. Me suomalaiset halutaan, että Riikka Purra muuttaa pois suomesta eikä tuu ikinä takas....
      Maailman menoa
      57
      8742
    2. Maataloustuet pois

      Jokainen maksakoon harrastuksensa itse. Eihän golfin peluutakaan maksa yhteiskunta.
      Maailman menoa
      306
      6584
    3. Australia, Britannia ja Kanada tunnustivat Palestiinan

      Aikooko Petteri Lapanen pysytellä persujen ja uskovaisten panttivankina ja jättää Suomen historian väärälle puolelle?
      Maailman menoa
      99
      5907
    4. Mitä juuri sinulle kuuluu?

      Tänään? Rehellisesti.
      Ikävä
      152
      3800
    5. Joulukinkku NYT

      Sian kankuista tulee vielä pula. Nyt on oikea aika hankkia joulukinkku.
      Maailman menoa
      28
      3193
    6. Maahanmuuton vastustajat ovat vajakkeja

      Jokainen täysijärkinen suomalainen tietää, että Suomi ei pärjää ilman ulkomaalaisvahvistuksia.
      Maahanmuutto
      62
      3109
    7. Kaivattusi nimi

      Kaivattusi nimi on
      Ikävä
      154
      1904
    8. On asioita joita kadun

      Yksi niistä on eräs J mies. Olen vasta hiljattain tajunnut. Kuinka väärin tein. Tulit sydän tarjottimella.. mutta tässä
      Ikävä
      17
      1756
    9. Toivoisitko että hän löytäisi jonkun muun?

      Joka voi antaa mihin et kyennyt?
      Ikävä
      32
      1448
    10. Mitä sä pelkäät?

      Että paljastan sut ja touhusi? Elät jotain ihan omaa fantasiaasi ja ainoa virhees oli sekoittaa mut näihin sairaisiin le
      Tunteet
      19
      1196
    Aihe