Andmete täielikuks ülekandmiseks praegusest lahtrivahemikust uude tabelisse peate teadma, kui suur on kasutatud lahtrite vahemik aktiivse lahtri ümber. Või võite lasta Excelil seda teie eest teha ja kopeerida g
Kas soovite automaatselt kopeerida kõik lahtrid makro külgnevast lahtrivahemikust? See on eriti kasulik, kui soovite kasutajate sisendile paindlikult reageerida ega tea, kui suured on sisestatud andmealad.
Selle töö tegemiseks saate kasutada makro. Makro määrab kõik lahtrid aktiivse lahtri ümber ja kopeerib täpselt need lahtrid uude töövihikusse.
Järgmisel joonisel on tabel kolme erineva andmealaga. Need on värvikoodiga hõlpsamini nähtavad.
Kõik lahtrid, mis ühenduvad naaberrakkudega ilma tühjade lahtriteta, loetakse kokku kuuluvateks.
Sobiva makro abil saate tagada, et pärast lahtrivahemiku lahtri klõpsamist kopeeritakse kõik sellele kuuluvad lahtrid uude tabelisse. Siin on sobiv programmi kood:
Praeguse ala alamkoopia ()
Hämardage allikaala vahemikuna
Hämardage NewSheet töölehena
Määra lähteala = ActiveCell.CurrentRegion
Määra NeuesBlatt = Töövihikud. Lisage töölehed (1)
Allika piirkond. Kopeerimise sihtkoht: = NeuesBlatt.Range ("A1")
End Sub
Enne makro kutsumist klõpsake tabeli mis tahes lahtrit. Makro määrab kõik lahtrid, mis koos valitud lahtriga kuuluvad vahemikku, ja kopeerib selle andmevahemiku uude tühja töövihikusse. Järgmine joonis näitab, milline näeb välja tulemus pärast makro kutsumist, kui esimese makro tabeli lahter E9 on valitud enne makro käivitamist.
Makro sisestamiseks vajutage Excelis klahvi ALT F11, et avada VBA redaktor. Valige VBA redaktoris käsk INSERT - MODULE ja sisestage makro. Makro käivitamiseks aktiveerige Excelis klahvikombinatsioon ALT F8. Kaks kiirklahvi VBA redaktori käivitamiseks ja makro töötavad kõikides Exceli versioonides.
