Excel-sivuilla näyttää käyvän pätevää sakkia, joten rohkenen kysyä, miten ratkaisen seuraavan ongelman: Taulukossa yksi on solualue, johon kirjoitetaan tiettyjä arvoja. Vaihtoehtoisia arvoja on kymmeniä. Taulukossa kaksi on solu, johon tulisi saada tieto, että yhteen tai useampaan em. solualueen soluista on kirjoitettu jokin haluttu arvo. Tämä tieto tulisi olla esitettynä arvoilla 1 (tosi) tai 0 (epätosi).
Hakuapua
5
386
Vastaukset
- paavali50
=JOS(LASKE.JOS(A:A;C6)>0;1;0)
- aukkoja edelleen
Ihan mukava kaava tuokin, mutta en näe siinä ratkaisua tähän ongelmaani. Taulukossa kaksi on vain yksi solu, jonka tulos olisi 1, mikäli yksi tai useampi ehdon täyttävä numero löytyy taulukon yksi solualueelta (esim. B6:C9). Muuten arvo olisi 0. Hakuehdot täyttäviä numeroita on kymmeniä.
Toisaalta kaavaksi voisi käydä myös sellainen, että mikäli taulukon yksi solualueella B6:C9 on yksikin kelpoisuusehdon täyttävä tieto, taulukossa kaksi olevan tulossolun arvona olisi 1, muuten arvona olisi 0.- ..................
=IF(SUM(Sheet1!B6:C9)>0;1;0)
- Aukot pienenevät...
Kumpikin kaavoista on hyödynnetty. Nokkela täytyy olla, että ymmärtää käyttää laskukaavaa, vaikka varsinaista laskutulosta ei haekaan ;)
Arrayhin haettavat luvut. Nyt "Tulos" taulukon soluun A1 vertailun tulos.
taulukon moduuliin...
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim Laskuri As Long
Dim Haettavat As Variant
Dim Loydettysolu As Range
Haettavat = Array(11, 22, 33, 44, 55)
With ActiveSheet
For Laskuri = LBound(Haettavat) To UBound(Haettavat)
Set Loydettysolu = .Range("B6:C9").Find(What:=Haettavat(Laskuri), MatchCase:=True)
If Loydettysolu Is Nothing Then
Sheets("Tulos").Range("A1") = 0
Else
Sheets("Tulos").Range("A1") = 1
Exit For
End If
Next Laskuri
End With
End Sub
Ketjusta on poistettu 1 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
- 14710843
- 525180
Taas ryssittiin oikein kunnolla
r….ä hyökkäsi Viroon sikaili taas ajattelematta yhtään mitään https://www.is.fi/ulkomaat/art-2000011347289.html452393- 292083
Vanha Suola janottaa Iivarilla
Vanha suola janottaa Siikalatvan kunnanjohtaja Pekka Iivaria. Mies kiertää Kemijärven kyläjuhlia ja kulttuuritapahtumia131671Valtimon Haapajärvellä paatti mäni nurin
Ikävä onnettomuus Haapajärvellä. Vene hörpppi vettä matkalla saaren. Veneessä ol 5 henkilöä, kolme uiskenteli rantaan,411502Tiedän kuka sinä noista olet
Lucky for you, olen rakastunut sinuun joten en reagoi negatiivisesti. Voit kertoa kavereillesi että kyl vaan, rakkautta291204Känniläiset veneessä?
Siinä taas päästiin näyttämään miten tyhmiä känniläiset on. Heh heh "Kaikki osalliset ovat täysi-ikäisiä ja alkoholin v351156Daniel Nummelan linjapuhe 2025
Kansanlähetyksen toiminnanjohtajan Daniel Nummelan linjapuhe tänään. Rehellistä analyysiä mm. evlut kirkosta ja piispo92915TÄSTÄ TAITAA TULLA SUOMEN HISTORIAN SUURIN USKONNONVAPAUDEN OIKEUDENKÄYNTI.
Sinun täytyy hyväksyä se että jos sinä vetoat uskonnonvapauteen, silloin sinun tulee antaa myös muille vastaava vapaus o317872