Telefonszámunk: 1-472-0679

Hozzászólás: Egyszerű kereső

Kezdőlap Fórumok Excel programozás Egyszerű kereső Hozzászólás: Egyszerű kereső

#2502
horvimi
Adminisztrátor

    Szia!

    Ott keresd a problémát, hogy nézd meg, hogy működik a keresés, amikor kézzel keresel.
    Amikor minden előforduláson átmentél a „Következő” gombbal, akkor elkezdi a keresést elölről, és újra az első találatra ugrik. Ezért a .find – .findnext ciklusoknál azt csinálják, hogy megjegyzik az első találat (.find) celláját, és a ciklus addig fut, amíg a .findnext újra az elsőnek megtalált cellára ugrik.

    Itt van két link, tanulmányozd:
    http://www.ozgrid.com/forum/showthread.php?t=168157
    http://www.ozgrid.com/forum/showthread.php?t=37604

    Még okozhat esetleg további problémát az, hoyg a találatok A oszlop végére írásánál SELECT-et használsz. meg kéne próbálni select nélkül, egyből beleírni.

    Cells(ActiveCell.CurrentRegion.Cells(ActiveCell.CurrentRegion.Cells.Count).Offset(1, 0).Row, ActiveCell.Column).Value = keresett.Address
    

    Imre

    • A hozzászólás módosításra került: 8 years telt el-horvimi.
    • A hozzászólás módosításra került: 8 years telt el-horvimi.