Sarakkeessa A ja B on kummassakin nimilista (sukunimi, etunimi) ja sarakkeeseen C pitäisi saada vain ne nimet, jotka esiintyvät kummassakin listassa. Miten onnistuu?
Nimilistojen suodattaminen?
webnovice
3
119
Vastaukset
- makroton
Yksinkertainen kaava ilman makroa.
Huom! Kaava ei listaa nimiä C-sarakkeelle C1:sestä alkaen alaspäin järjestyksessä, vaan antaa A-sarakkeella olevan nimen kohdalle C-sarakkeeseen vastauksen, että nimi löytyy B-sarakkeelta
C1=JOS(ONVIRHE(VASTINE(A1;B:B;0));"";A1) - kopioi kaava alaspäin niin pitkästi kuin tarvetta
Jos on tarvetta saada nimet C-sarakkeelle peräkkäin, niin kopioi C nimet ja liitä ne määräten jonnekkin asetuksella "Arvot" ja lajittele ne siellä ja liitä sitten takaisin C-sarakkeelle alekkain.- webnovice
Kiitos, kaavasi toimii teoriassa, mutta ei toimi minulla jostain syystä.
Sarakkeiden A ja B nimilistat ovat eri lähteistä, vaikka ovat aivan samassa muodossa (sukunimi, etunimi).
Jos kopioin sarakkeesta A sarakkeeseen B saman nimen, tai kirjoitan käsin nimen sarakkeeseen B,, kaavasi toimii. Nyt se ei kuitenkaan toimi - ikään kuin solut sisältäisivät jotain näkymätöntä informaatiota, jonka Excel tulkitsee erisisältöiseksi soluksi. Olen kohdasta "Muotoile solut" kaikki pois, mutta ei auta sekään.
Onko kellään aavistustakaan, mistä voisi johtua?
taatusti solussa on ei tulostettav(i)a merkkejä...
kokeile ekaksi vertailla soluja kaavoilla =PITUUS(C1) ja =PITUUS(D1)
jos luku molemmissa sama niin identtinen teksti, jos poikkeaa niin ei tulostettavia merkkejä löytyy...
kokeile funktiota =POISTA.VÄLIT(D1) ja testaa pituus uudelleen. Tämä yleensä auttaa... jos ei niin sitten
laita koodinpätkä moduuliin ja kirjoita haluamaasi soluihin verrattavien 2 solujen osoitteet kaavaan tyyliin
=Käännä(C1) ja =Käännä(D1)
kaava listaa numerokoodina solujen tekstin ja vertaat sitten niitä keskenään ja toteat mikä, niissä on erona. Sen jälkeen vaan valikosta LISÄÄ/MERKKIlomakkeen alareunassa kohtaan Merkistö kirjoitat ko.eriävän luvun ja se korostetaan merkistössä...
seuraavaksi sitten etsi korvaa jne...
tai oikeestihan mun ois pitänyt tehdä universaalimakro tolle putsaukselle, mutta...
Function Käännä(Solu As Range) As String
For i = 1 To Len(Solu)
Käännä = Käännä & " " & Asc(Mid(Solu, i, 1))
Next
End Function
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
- 1165571
Suomen kaksikielisyys - täyttä huuhaata
Eivätkö muuten yksilöt pysty arvioimaan mitä kieliä he tarvitsevat? Ulkomaalaiselle osaajalle riittää Suomessa kielitai954821Työeläkeloisinta 27,5 mrd. per vuosi
Tuo kaikki on pois palkansaajien ostovoimasta. Ja sitten puupäät ihmettelee miksei Suomen talous kasva. No eihän se kas1404774Mikä on vaikeinta siinä, että menetti yhteyden kaivattuun, jota vielä ajattelee?
Mikä jäi kaihertamaan? Jos jokin olisi voinut mennä toisin, mitä se olisi ollut? Mitä olisit toivonut vielä ehtiväsi san3682235- 1202092
- 1081817
- 2561577
- 3711318
Pääsit koskettamaan
Sellaista osaa minussa jota kukaan ei ole ennen koskettanut. Siksi on hyvin vaikea unohtaa sinut kokonaan.591151- 2231143