MS Office -sovellukset on suunniteltu erittäin hyvinälykkäästi, enkä sano tätä vain siksi, että ne tekevät työstäni äärettömästi helpompaa. Sanon sen, koska se on totta. Muutama päivä sitten teimme postituksen YouTube-videoiden lisäämisestä Office 2013: hon ja huomautimme, että vaihtoehto puuttui MS Excelistä yksinkertaisesti siksi, ettei sitä tarvittu siellä. Tästä älykkyydestä puhun; tietäen, mitä ominaisuuksia tarvitaan tietyntyyppisissä sovelluksissa. Se varmistaa, että mikään epäolennainen tekee siitä lopputarjouksen. Olin yllättynyt siitä, että kun Excel antaa sinun lisätä lisää rivejä taulukkoon, se ei salli sinun valita lisäämiesi rivien määrää. Sinulla on muita työympäristöjä tämän suorittamiseen, kuten esimerkiksi valittavissa olevien rivien määrän valitseminen olemassa olevista ja sitten lisäystoiminnon käyttäminen. Tai voit toistaa lisäysrivin vaiheen niin monelle riville kuin haluat. Se on toistuva, mutta jos haluat säästää viisi minuuttia, tämä pieni makro voi hoitaa työn puolestasi.
Koska tämä vaatii makron, sinun on tehtävätallenna tiedosto makro-ominaisuuksiltaan Excel-tiedostona. Napsauta Tallenna nimellä -ikkunassa olevaa avattavaa Tallenna tyyppinä -painiketta ja valitse 'Excel Marco Enabled Workbook (* xlsm).
Seuraavaksi on aika kirjoittaa makro. Siirry Näytä-välilehteen ja luo uusi napsauttamalla Makro-painiketta. Nimeä se haluamallasi tavalla ja napsauta Luo. Seuraava ikkuna avautuu automaattisesti.
Tässä on merkitystä 'Sub' ja 'End Sub'linjat. Alarivi sisältää makroosi nimen, kun taas loppuosa merkitsee kyseisessä makroon liittyvien kommandien loput. Koska olet juuri luonut sen, näiden rivien välillä ei pitäisi olla mitään, kuten yllä olevassa kuvakaappauksessa. Liitä seuraava näiden kahden rivin väliin.
Dim CurrentSheet As Object
" Loop through all selected sheets.
For Each CurrentSheet In ActiveWindow.SelectedSheets
" Insert 5 rows at top of each sheet.
CurrentSheet.Range("a1:a5").EntireRow.Insert
Next CurrentSheet
Tämä koodi lisää viisi riviä ylhäältä. Sillä viitataan koodissa nimellä A1: A5. Jotta voit muokata sitä tarpeidesi mukaan, sinun on muokattava tätä aluetta. Ensimmäinen arvo viittaa siihen, mihin rivit lisätään. Jos muutat sen arvoksi A100, rivit lisätään yhdeksänkymmentäyhdeksän ensimmäisen rivin jälkeen. Kun olet asettanut vertailupisteen, sinun on annettava rivien lukumäärä.
Rivinumeroita määrittelee solualue A1: A5. Tämä alue lisää 5 riviä. Jos haluat löytää oikean alueen rivimäärillesi, esimerkiksi haluat lisätä 25 riviä A99: stä, lisäät 25 viitepisteeseen siten, että se on A99 ja miinus yksi solu siitä. Toisin sanoen A100 + 99 - 1 = A198. Lisäät rivejä etkä sarakkeita, joten vain numero muuttuu eikä sarakkeen kirjainta. Makro on päivitettävä aina, kun rivit on lisättävä, mutta se on vain pieni muokkaus ja toimii todella hyvin, joten se on vietetyn ajan arvoinen.
Makro Microsoftin tuen kautta
Kommentit