Amikor Excel-jelentéseit szétosztja ügyfelei között, gyakran hasznos néhány csengő és síp hozzáadása. Az egyik könnyebben alkalmazható fejlesztés a rendezés lehetősége, ha duplán kattintanak egy oszlopfejlécre. Bár ez bonyolultnak hangzik, ezzel a makróval viszonylag egyszerű.
Letöltheti ennek a duplakattintásos technikának működő példáját az Excelben .
Ebben a makróban először az utolsó, nem üres sort találja meg. Ezután ezt a sorszámot használja a rendezendő sorok céltartományának meghatározásához. A Rendezés módszerrel a célsorokat az oszlop szerint rendezi, amelyre duplán kattintott.
Private Sub Worksheet_BeforeDoubleClick (ByVal cél tartományként, Mégse logikai érték)
'1. lépés: Deklarálja a változókat
Dim LastRow As Long
'2. lépés: Keresse meg az utolsó nem üres sort
UtolsóRow = Cells(Rows.Count, 1).End(xlUp).Sor
'3. lépés: Növekvő rendezés a duplán kattintott oszlopban
Sorok("6:" & LastRow).Rendezés _
Key1:=Cellák(6, ActiveCell.Oszlop), _
Sorrend1:=xlNövekvő
Vége Sub
Az 1. lépésben deklarál egy LastRow nevű Long Integer változót, amely az utolsó, nem üres sor sorszámát tartalmazza.
A 2. lépésben rögzítse az utolsó nemüres sort úgy, hogy a munkalap legutolsó sorától kezdi, és az End tulajdonság használatával felugrik az első nem üres cellára (ez egyenértékű az A1048576 cellával, és a Ctrl+Shift+felfelé mutató nyíl megnyomásával).
Vegye figyelembe, hogy ebben a cellában meg kell változtatnia az oszlopszámot az adatkészletének megfelelőre. Például, ha a táblázat a J oszlopon kezdődik, a 2. lépésben szereplő utasítást módosítania kell Cells(Rows.Count, 10).End(xlUp).Row-ra, mert a J oszlop a 10. oszlop a munkalapon.
A 3. lépésben meghatározza az adatok teljes sortartományát. Ne feledje, hogy a sorok tartományának az első adatsorral kell kezdődnie (a fejlécek kivételével), és az utolsó, nem üres sorral kell végződnie. Ebben az esetben az adatkészlet a 6. sorban kezdődik, tehát a Sorok rendezési módszerét használja ("6:" & LastRow).
A Kulcs argumentum megmondja az Excelnek, hogy melyik tartományba kell rendezni. Ismét meg kell győződnie arról, hogy a használt tartomány az első adatsorral kezdődik (a fejlécek kivételével).
A makró megvalósításához ki kell másolnia és be kell illesztenie a Worksheet_BeforeDoubleClick eseménykód ablakba. Ha ide helyezi a makrót, akkor minden alkalommal lefut, amikor duplán kattint a lapra:
Aktiválja a Visual Basic Editort az ALT+F11 megnyomásával.
A Projekt ablakban keresse meg a projekt/munkafüzet nevét, és kattintson a mellette lévő pluszjelre az összes lap megtekintéséhez.
Kattintson arra a lapra, amelyről a kódot aktiválni szeretné.
Az Esemény legördülő listában válassza ki a BeforeDoubleClick eseményt.
Írja be vagy illessze be a kódot.
Lábjegyzetek és végjegyzetek létrehozása a Word 2013-ban. Részletes útmutató, hogyan készíthet különféle stílusú jegyzeteket bibliográfiai információkhoz vagy magyarázó megjegyzésekhez.
Tudjon meg mindent arról, hogyan lehet az Excelben kiemelni a statisztikailag kiugró értékeket, mégpedig egyszerű eszközökkel és módszerekkel. Kiemelt figyelmet fordítunk a kiugró értékek azonosítására és kezelésére.
Az Excel Mintavételi eszközével véletlenszerűen kiválaszthat elemeket egy adatkészletből vagy választhat minden n-edik elemet. Ismerje meg, hogyan használhatja ezt a hasznos funkciót az adatelemzéshez!
Fedezze fel a Microsoft Word 2019 legjobb trükkjeit, amelyek segítenek a hatékonyabb munkavégzésben. Tudd meg, hogyan használhatod ki a program funkcióit!
A Word 2019-ben a bekezdések igazítása és behúzása kulcsfontosságú a dokumentumok megfelelő megjelenítéséhez. Ismerje meg a formázási lehetőségeket és tippeket a hatékonyabb munkához.
Fedezze fel, hogyan használhatja az Excel 2019 Solver bővítményt a komplex problémák megoldására. A célcella, változócellák és kényszerek beállítása lépésről lépésre.
A Word lehetővé teszi dinamikus elemek hozzáadását a dokumentumhoz. Fedezze fel, hogyan lehet különböző mezőket használni a Word programban a dinamikus tartalom létrehozásához.
A SharePoint 2010 oszlopai az adatok tárolására szolgálnak. Fedezze fel a különböző oszlop típusokat és azok alkalmazását a SharePoint rendszeren belül.
A Word 2013 szövegtörlésének képessége kulcsfontosságú, legyen szó szövegalkotásról vagy törlésről. Ismerje meg a hatékony szövegtörlési módszereket!
A fotóalbum funkció a PowerPoint 2016-ban lehetővé teszi, hogy egyszerre több fényképet illesszen be egy prezentációba, megkönnyítve ezzel a többszörös képek kezelését.
