Excel makro, lai pievienotu un nosauktu jaunu darblapu

Viena no vienkāršākajām ar darblapām saistītajām automatizācijām, ko varat lietot ar makro programmā Excel, ir jaunas darblapas pievienošana un nosaukšana. Lūk, kā šis makro darbojas un kā to izmantot.

Kā darbojas makro

Izlasot koda rindiņas, redzēsit, ka šis makro ir salīdzinoši intuitīvs:

Apakšmakro1()
1. darbība. Pastāstiet programmai Excel, kā rīkoties, ja rodas kļūda
    Par kļūdu GoTo MyError
2. darbība. Pievienojiet lapu un piešķiriet tai nosaukumu
    Izklājlapas.Pievienot
    ActiveSheet.Name = _
    WorksheetFunction.Text(Now(), "md-gggg h_mm_ss 
am/pm")
    Iziet Sub
'3. darbība. Ja šeit, radās kļūda; pastāstiet lietotājam
    Mana kļūda:
    MsgBox "Tā jau ir lapa."
Beigt apakš

Jums jāparedz, ka, piešķirot jaunajai lapai jau esošu nosaukumu, radīsies kļūda. Tātad 1. darbībā makro liek programmai Excel nekavējoties pāriet uz rindiņu MyError (3. darbībā), ja rodas kļūda.

2. darbībā tiek izmantota pievienošanas metode, lai pievienotu jaunu lapu. Pēc noklusējuma lapa tiek saukta par lapu xx, kur xx apzīmē lapas numuru. Jūs piešķirat lapai jaunu nosaukumu, mainot ActiveSheet objekta rekvizītu Name. Šajā gadījumā darblapai piešķirat nosaukumu ar pašreizējo datumu un laiku.

Tāpat kā ar darbgrāmatām, katru reizi, kad izmantojat VBA, lai pievienotu jaunu lapu, tikko pievienotā lapa automātiski kļūst par aktīvo lapu. Visbeidzot, 2. darbībā ņemiet vērā, ka makro aizver procedūru. Tas ir jādara, lai tas nejauši nepārietu uz 3. darbību (kas stājas spēkā tikai tad, ja rodas kļūda).

3. darbība informē lietotāju, ka lapas nosaukums jau pastāv. Atkal, šī darbība ir jāaktivizē tikai tad, ja rodas kļūda.

Kā lietot makro

Lai ieviestu šo makro, varat to kopēt un ielīmēt standarta modulī:

Aktivizējiet Visual Basic redaktoru, nospiežot Alt+F11.

Ar peles labo pogu noklikšķiniet uz projekta/darbgrāmatas nosaukuma projekta logā.

Izvēlieties Ievietot → Modulis.

Ierakstiet vai ielīmējiet kodu jaunizveidotajā modulī.


Kā neļaut Microsoft Word atvērt failus tikai lasīšanas režīmā operētājsistēmā Windows

Kā neļaut Microsoft Word atvērt failus tikai lasīšanas režīmā operētājsistēmā Windows

Kā neļaut Microsoft Word atvērt failus tikai lasīšanas režīmā operētājsistēmā Windows Microsoft Word atver failus tikai lasīšanas režīmā, padarot tos neiespējamu rediģēt? Neuztraucieties, metodes ir norādītas zemāk

Kā novērst nepareizu Microsoft Word dokumentu drukāšanu

Kā novērst nepareizu Microsoft Word dokumentu drukāšanu

Kā labot kļūdas, drukājot nepareizus Microsoft Word dokumentus.Kļūdas Word dokumentu drukāšanā ar mainītiem fontiem, nekārtīgām rindkopām, trūkstoša teksta vai pazaudētu saturu ir diezgan izplatītas. Tomēr nevajag

Izdzēsiet pildspalvas un marķiera zīmējumus savos PowerPoint slaidos

Izdzēsiet pildspalvas un marķiera zīmējumus savos PowerPoint slaidos

Ja prezentācijas laikā esat izmantojis pildspalvu vai marķieri, lai zīmētu uz PowerPoint slaidiem, varat saglabāt zīmējumus nākamajai prezentācijai vai izdzēst tos, lai nākamajā reizē, kad to parādīsit, jūs sāktu ar tīriem PowerPoint slaidiem. Izpildiet šos norādījumus, lai dzēstu pildspalvas un marķiera zīmējumus: Līniju dzēšana pa vienai […]

Veidojiet bibliotēkas saturu programmā SharePoint 2010

Veidojiet bibliotēkas saturu programmā SharePoint 2010

Stilu bibliotēkā ir CSS faili, paplašināmās stila lapu valodas (XSL) faili un attēli, ko izmanto iepriekš definētas šablona lapas, lapu izkārtojumi un vadīklas programmā SharePoint 2010. Lai atrastu CSS failus publicēšanas vietnes stilu bibliotēkā: izvēlieties Vietnes darbības → Skatīt Viss vietnes saturs. Tiek parādīts vietnes saturs. Stila bibliotēka atrodas […]

Formatējiet skaitļus tūkstošos un miljonos Excel pārskatos

Formatējiet skaitļus tūkstošos un miljonos Excel pārskatos

Nepārsedziet savu auditoriju ar milzīgiem skaitļiem. Programmā Microsoft Excel varat uzlabot informācijas paneļu un pārskatu lasāmību, formatējot skaitļus tā, lai tie tiktu rādīti tūkstošos vai miljonos.

Kā koplietot un sekot līdzi SharePoint vietnēm

Kā koplietot un sekot līdzi SharePoint vietnēm

Uzziniet, kā izmantot SharePoints sociālo tīklu rīkus, kas ļauj indivīdiem un grupām sazināties, sadarboties, koplietot un sazināties.

Kā programmā Excel konvertēt datumus Juliana formātos

Kā programmā Excel konvertēt datumus Juliana formātos

Jūlija datumi ražošanas vidēs bieži tiek izmantoti kā laikspiedols un ātra atsauce partijas numuram. Šāda veida datuma kodēšana ļauj mazumtirgotājiem, patērētājiem un pakalpojumu aģentiem noteikt produkta izgatavošanas laiku un līdz ar to arī produkta vecumu. Jūlija datumi tiek izmantoti arī programmēšanā, militārajā jomā un astronomijā. Savādāk […]

Kā izveidot Access Web App

Kā izveidot Access Web App

Programmā Access 2016 varat izveidot tīmekļa lietotni. Kas tad vispār ir tīmekļa lietotne? Tīmeklis nozīmē, ka tas ir tiešsaistē, un lietotne ir tikai “lietojumprogrammas” saīsinājums. Pielāgota tīmekļa lietotne ir tiešsaistes datu bāzes lietojumprogramma, kurai var piekļūt no mākoņa, izmantojot pārlūkprogrammu. Jūs veidojat un uzturat tīmekļa lietotni darbvirsmas versijā […]

Ātrās palaišanas josla programmā SharePoint 2010

Ātrās palaišanas josla programmā SharePoint 2010

Lielākā daļa SharePoint 2010 lapu ātrās palaišanas joslā lapas kreisajā pusē parāda navigācijas saišu sarakstu. Ātrās palaišanas joslā tiek rādītas saites uz piedāvāto vietņu saturu, piemēram, sarakstiem, bibliotēkām, vietnēm un publicēšanas lapām. Ātrās palaišanas joslā ir divas ļoti svarīgas saites: Visa vietnes satura saite: […]

Ko nozīmē risinātāja kļūdu ziņojumi programmā Excel?

Ko nozīmē risinātāja kļūdu ziņojumi programmā Excel?

Vienkāršām problēmām risinātājs programmā Excel parasti ātri atrod optimālās Risinātāja mainīgā vērtības mērķa funkcijai. Taču dažos gadījumos Solver ir grūti atrast Solver mainīgā vērtības, kas optimizē mērķa funkciju. Šādos gadījumos Solver parasti parāda ziņojumu vai kļūdas ziņojumu, kurā aprakstīta vai apspriesta problēma, ko […]