Kārtojiet Excel diapazonu, veicot dubultklikšķi

Izplatot Excel pārskatus klientiem, bieži vien ir patīkami pievienot dažus zvaniņus un svilpes. Viens no vienkāršāk lietojamiem uzlabojumiem ir iespēja kārtot, kad tiek veikts dubultklikšķis uz kolonnas galvenes. Lai gan tas var izklausīties sarežģīti, ar šo makro tas ir salīdzinoši vienkārši.

Programmā Excel varat lejupielādēt šīs dubultklikšķa metodes darba piemēru .

Kā darbojas makro

Šajā makro vispirms atrodiet pēdējo tukšo rindu. Pēc tam izmantojiet šo rindas numuru, lai definētu kārtojamo rindu mērķa diapazonu. Izmantojot kārtošanas metodi, mērķa rindas tiek kārtotas pēc kolonnas, uz kuras veicāt dubultklikšķi.

Private Sub Worksheet_BeforeDoubleClick (ByVal Target As Range, Cancel As Boolean)
1. darbība: deklarējiet savus mainīgos
  Dim LastRow As Long
2. darbība. Atrodiet pēdējo rindu, kas nav tukša
  LastRow = Šūnas(Rindas.Skaits, 1).Beigas(xlUp).Rinda
3. darbība: kārtojiet augošā secībā kolonnā, kurā veikta dubultklikšķi
  Rindas("6:" & LastRow).Kārtot _
  Key1:=Šūnas(6, ActiveCell.Column), _
  Order1:=xlaugošā secībā
Beigt apakš

1. darbībā jūs deklarējat Long Integer mainīgo ar nosaukumu LastRow, lai saglabātu pēdējās tukšās rindas rindas numuru.

2. darbībā jūs tverat pēdējo tukšo rindu, sākot no pašas pēdējās darblapas rindas un izmantojot rekvizītu End, lai pārietu uz pirmo tukšo šūnu (līdzvērtīgi pāriešanai uz šūnu A1048576 un nospiežot taustiņu kombināciju Ctrl+Shift+augšupbultiņa).

Ņemiet vērā, ka šajā šūnā ir jāmaina kolonnas numurs uz tādu, kas atbilst jūsu datu kopai. Piemēram, ja jūsu tabula sākas kolonnā J, jums 2. darbībā jāmaina priekšraksts uz Cells(Rows.Count, 10).End(xlUp).Row, jo kolonna J ir darblapas 10. kolonna.

3. darbībā jūs definējat savu datu kopējo rindu diapazonu. Ņemiet vērā, ka rindu diapazonam jāsākas ar pirmo datu rindu (izņemot galvenes) un jābeidzas ar pēdējo netukšo rindu. Šajā gadījumā datu kopa sākas ar 6. rindu, tāpēc izmantojat kārtošanas metodi rindās (“6:” un pēdējā rinda).

Arguments Key norāda programmai Excel, kurā diapazonā kārtot. Vēlreiz vēlēsities nodrošināt, lai jūsu izmantotais diapazons sāktos ar pirmo datu rindu (izņemot galvenes).

Kā lietot makro

Lai ieviestu šo makro, tas ir jākopē un jāielīmē notikuma koda logā Worksheet_BeforeDoubleClick. Ievietojot makro šeit, tas tiks palaists katru reizi, kad veicat dubultklikšķi uz lapas:

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

Projekta logā atrodiet sava projekta/darbgrāmatas nosaukumu un noklikšķiniet uz pluszīmes blakus tam, lai redzētu visas lapas.

Noklikšķiniet uz lapas, no kuras vēlaties aktivizēt kodu.

Nolaižamajā lodziņā Notikums atlasiet notikumu BeforeDoubleClick.

Ierakstiet vai ielīmējiet kodu.

Kārtojiet Excel diapazonu, veicot dubultklikšķi


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 […]