Tervehdys,
noihin kahteen edelliseen viestiini viitaten.
Kunden viestissä oli seuraavanlainen haku systeemi:
Selection.AutoFilter Field:=1, Criteria1:=luokka
Tämä oli täysin toimiva, mutta vaikea koska kirjojen tai kirjailijoiden nimissä on monesti pitkiä tai vaikeita merkkejä, niinpä tuli tarve muodostaa lauseke jolla saatii haettua vain nimen osalla.
excelit.fi laittoi seuraavan,
Selection.AutoFilter Field:=4, Criteria1:="=*" & vapaa & "*"
Toimii loistavasti kirjojen ja tekijöiden kohdalla, mutta numeroita se ei ymmärrä. eli kun haluan hakea luokitteluni mukaan kun luokat on nimetty esimerkiksi:
5, 15, 22.5, 25.2
ja annan hakuehdoksi "5"
Loytää haku kaikki muut mitkä sisältää numeron 5 paitsi luokkaa 5, eli hienoinen virhe.
sitten vielä saako tohon excelit.fi:n antaman esimerkin field kenttään määritettyä samalla koko asiakirjan eli yllä olevassahan on field:=4 eli se ei ymmärrä hakea kuin yhdestä kentästä, menisikö se jollain for next jutulla, esim jos kopioitava kohde on tyhjä etsi seuraavasta tai jotain
Kiitoksia tuhannesti
noihin kahteen edelliseen viestiini viitaten.
Kunden viestissä oli seuraavanlainen haku systeemi:
Selection.AutoFilter Field:=1, Criteria1:=luokka
Tämä oli täysin toimiva, mutta vaikea koska kirjojen tai kirjailijoiden nimissä on monesti pitkiä tai vaikeita merkkejä, niinpä tuli tarve muodostaa lauseke jolla saatii haettua vain nimen osalla.
excelit.fi laittoi seuraavan,
Selection.AutoFilter Field:=4, Criteria1:="=*" & vapaa & "*"
Toimii loistavasti kirjojen ja tekijöiden kohdalla, mutta numeroita se ei ymmärrä. eli kun haluan hakea luokitteluni mukaan kun luokat on nimetty esimerkiksi:
5, 15, 22.5, 25.2
ja annan hakuehdoksi "5"
Loytää haku kaikki muut mitkä sisältää numeron 5 paitsi luokkaa 5, eli hienoinen virhe.
sitten vielä saako tohon excelit.fi:n antaman esimerkin field kenttään määritettyä samalla koko asiakirjan eli yllä olevassahan on field:=4 eli se ei ymmärrä hakea kuin yhdestä kentästä, menisikö se jollain for next jutulla, esim jos kopioitava kohde on tyhjä etsi seuraavasta tai jotain
Kiitoksia tuhannesti
Vastaukset 1
Vanhimmat
Haku ei toimi siksi koska käytät luokittelussa kahta eri tietotyyppiä eli numeroa (5) ja tekstiä (22.5), *-merkki haussa olettaa että haettava muoto on teksti. Jos muokkaat luokittelusi vastaamaan kaikki tekstimuotoa (eli 5 on silloin 5.00 jne) niin haku toimii.
For Next voisi toimia, esim näin:
For H = 1 To 5
Selection.AutoFilter Field:=H, Criteria1:="=*" & vapaa & "*"
MsgBox "Haku sarakkeesta " & H
'tähän suoritettava toiminto, kopiointi, siirto yms
Selection.AutoFilter Field:=H
Next H