tietojen lukumäärä?

MarXo

Hei,

Saako jollain kaavalla välilehtien "1" ja "2" sarakkeissa A olevat tiedot välilehden "3" sarakkeeseen A niin ETTEI sinne tule tietoja tuplana. Eli siis jos sama tieto esiintyy sekä välilehdessä "1" että "2" niin välilehteen "3" tulee vain yhden kerran tuo tieto.

3

347

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • hakee nyt Taul1 ja Taul2 A-sarakkeen tiedoista Taul3 A-sarakkeeseen uniikit tiedot

      moduuliin...

      Sub Uniikit()
      Dim Vika As Double
      Dim eka As Range
      Dim toka As Range
      On Error Resume Next

      Application.ScreenUpdating = False
      Application.DisplayAlerts = False

      Worksheets("Taul1").Activate
      Vika = Range("A65536").End(xlUp).Row
      Set eka = Range("A1:A" & Vika)

      Worksheets("Taul2").Activate
      Vika = Range("A65536").End(xlUp).Row
      Set toka = Range("A1:A" & Vika)

      Sheets("Huuhaa").Delete
      Worksheets.Add().Name = "Huuhaa"
      Worksheets("Huuhaa").Activate
      Range("A:A") = ""
      Range("A1") = "uniikit"
      eka.Copy Range("A2")
      Vika = Range("A65536").End(xlUp).Row 1
      toka.Copy Range("A" & Vika)

      Worksheets("Taul3").Activate
      Sheets("Huuhaa").Columns("A:A").AdvancedFilter Action:=xlFilterCopy, CopyToRange:=Range("A1"), Unique:=True
      Range("A1").Select
      Sheets("Huuhaa").Delete
      Application.ScreenUpdating = True
      Application.DisplayAlerts = True

      Set eka = Nothing
      Set toka = Nothing
      End Sub

      Keep Excelling :-)

    Ketjusta on poistettu 0 sääntöjenvastaista viestiä.

    Luetuimmat keskustelut

    1. Anteeksi mies

      En vaan osaa kohdata sinua ja olla normaali. En tiedä mikä vaivaa. Samaan aikaan tekee mieli tulla lähelle ja kuitenkin
      Ikävä
      62
      12098
    2. Mietin aina vain

      Minä niin haluaisin nähdä sinut. Ei tuo yhden ainoan kuvan katsominen paljon helpota... Miksi sinä et voisi olla se roh
      Tunteet
      17
      5141
    3. Hetken jo luulin, että en ikävöi sinua koko aikaa

      Mutta nyt on sitten taas ihan hirveä ikävä jotenkin. Tiedätköhän sinä edes, kuinka peruuttamattomasti minä olen sinuun r
      Ikävä
      34
      4678
    4. Outoa että Trump ekana sanoutui irti ilmastosopimuksesta

      kun Kaliforniaa riepottelee siitä johtuvat tuhoisat maastopalot. Hirmumyrskytkin ovat USA:ssa olleet tuhoisia.
      Maailman menoa
      468
      2370
    5. Palstan henkisesti sairaat ja lihavat

      Täällä on sairaita, työttömiä ihmisiä kirjoittelemassa joilla ei ole tarkoituksena kuin satuttaa ihmisiä. Jos eksyt pals
      Ikävä
      114
      2250
    6. Saan kengurakkaan kotiin viikon päästä

      Mitä tapahtui? Martina hehkutti tätä stoorissaan reilu viikko sitten, mutta eipä aussimiestä Suomessa näkynyt, vaan tapa
      Kotimaiset julkkisjuorut
      293
      1813
    7. FinFamin ryhmät

      Älkää hyvät ihmiset luottako tähän tahoon. Ryhmiä on, mutta eivät ne toimi. Ihmisiä savustetaan ulos, vaikka näissä piir
      Salo
      0
      1471
    8. Osmo Peltola voitti ansaitusti Kultaisen Venlan - Kirvoitti yleisöltä mahtavan reaktion!

      JEE, onnea Osmo! Osmo Peltola voitti Vuoden esiintyjän Kultainen Venla -palkinnon. Isä-Peltsin ja Osmon luontoseikkailu
      Suomalaiset julkkikset
      93
      1320
    9. Ähtärin sotkut

      Ähtärin kaupungin tilintarkastus tai mikä lie ollut LAITETTU SALAISEKSI. 🤔🤔🤔
      Ähtäri
      39
      1226
    10. Olen vähän

      Hysteerinen se on totta. Etkai ymmärrä miten syvästi tunnen sinua kohtaan. Ja olet aina lähelläni. Olet osa jo jotain. I
      Ikävä
      10
      1205
    Aihe