Új hozzászólás Aktív témák

  • Fferi50

    Topikgazda

    válasz Mr.Scofield #23663 üzenetére

    Szia!

    Egyszerű: azért, mert torlo makródban cellánként törölsz és alapesetben ez azzal jár együtt,hogy a törölt cella helyére becsúszik a következő cella, jelen esetben az A helyére a B, a B helyére a C, de ugye Te utána az A-cellát már nem törlöd mégegyszer, csak a B-t és ilyenmódon a C törlése már teljesen felesleges is, mert abban már régen nincs is adat. (Próbáld ki manuális törléssel, hogy lásd, miről is beszélek.)

    Megoldás: töröld egyben a 3 cellát, vagy töröld 3 x az A oszlopban levő cellát.
    Egyben törlés: Sheets("Adatok").Range(Sheets("adatok").Cells(sorszam, "A"), Sheets("adatok").Cells(sorszam, "C")).Delete

    De még jobb szerintem, ha csak a tartalmat törlöd: cells(sorszam,"A").clearcontents, de ezt is csinálhatod egyszerre mindhárom cellán.

    Üdv.

Új hozzászólás Aktív témák