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.
tietojen lukumäärä?
3
347
Vastaukset
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 :-)- MarXo
Siis mitä ihmettä? Mihin tuollainen pitäisi kirjoittaa?
- Nimimerkki
MarXo kirjoitti:
Siis mitä ihmettä? Mihin tuollainen pitäisi kirjoittaa?
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Anteeksi mies
En vaan osaa kohdata sinua ja olla normaali. En tiedä mikä vaivaa. Samaan aikaan tekee mieli tulla lähelle ja kuitenkin6212098Mietin aina vain
Minä niin haluaisin nähdä sinut. Ei tuo yhden ainoan kuvan katsominen paljon helpota... Miksi sinä et voisi olla se roh175141Hetken 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 r344678Outoa että Trump ekana sanoutui irti ilmastosopimuksesta
kun Kaliforniaa riepottelee siitä johtuvat tuhoisat maastopalot. Hirmumyrskytkin ovat USA:ssa olleet tuhoisia.4682370Palstan henkisesti sairaat ja lihavat
Täällä on sairaita, työttömiä ihmisiä kirjoittelemassa joilla ei ole tarkoituksena kuin satuttaa ihmisiä. Jos eksyt pals1142250Saan kengurakkaan kotiin viikon päästä
Mitä tapahtui? Martina hehkutti tätä stoorissaan reilu viikko sitten, mutta eipä aussimiestä Suomessa näkynyt, vaan tapa2931813FinFamin ryhmät
Älkää hyvät ihmiset luottako tähän tahoon. Ryhmiä on, mutta eivät ne toimi. Ihmisiä savustetaan ulos, vaikka näissä piir01471Osmo 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 luontoseikkailu931320- 391226
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. I101205