Ongelma on kun haen tuloslistaan nimen niin jos jollain on sama aika niin vain ylempi nimi tulostuu listaan miten saan sen seuraavankin tulostumaan listaan vaikka sama aika onkin
PHAKU
eemeli kolme vuotta
1320
0Äänestä
Muut lukivat myös
Odottaa vastausta
Näihin keskusteluihin ei ole vielä vastattu. Ole ensimmäinen.
Vastaukset 1
Vanhimmat
http://keskustelu.suomi24.fi/show.fcgi?category=108&conference=4500000000000708&posting=22000000023268960
ja räätälöi sopivaksi hakualue nyt A sarake ja mistä palautetaan tiedot- offset on 0 pohjainen
tolla voit sitten hakea vasemmallekin(olen senkin joskus tänne postannut)eli nyt B sarakkeesta Offset(0, 1)
muutettu hakukoodi ja originaali funktio toimii edelleen...
Sub Testi()
On Error GoTo virhe:
Dim loydetty As Range
Set loydetty = LaajennettuHaku("mikko", Columns("A:A"), xlValues, xlPart, False).Offset(0, 1)
loydetty.Select
Union(loydetty, loydetty).Copy Range("Taul2!A65536").End(xlUp).Offset(1, 0)
Exit Sub
virhe:
MsgBox "Hakuehdollasi ei laytynyt yhtaan tietuetta!"
End Sub