Om het meeste uit Microsoft Excel te krijgen , je moet leren hoe u macro's en VBA- programmering te gebruiken . Als je spreadsheets bouwen en vul ze met informatie , kunnen er momenten waarop informatie die u ingevoerd heeft, is niet meer geldig . Dit geldt vooral voor rijen met informatie die van eerdere data . Een snelle en gemakkelijke manier om de rijen van de gegevens op basis van het verleden data te wissen is het opzetten van een macro in Excel . Wat je nodig hebt
Microsoft Excel
Basis Excel Experience
Toon Meer Aanwijzingen
1 Open je werkmap in Excel . Als u gebruik maakt van Excel 2007 , moet u het tabblad "Ontwikkelaar " weergegeven als deze nog niet is weergegeven . Om dit te doen , klik op de " Office " knop en dan ' Opties voor Excel . " Klik op" Show Developer Tab " en klik op" OK . " Kopen van 2 Maak een nieuwe macro . In Excel 2007 , klikt u op het tabblad Ontwikkelaars en dan " Macro . " In eerdere versies , klikt u op 'Extra' in de werkbalk en vervolgens " Macro . " Noem de macro , " DeleteRowbyDate " en klik vervolgens op " . ; Maak ' de Visual Basic -editor verschijnt
Kopieer 3 en plak de volgende code in de Visual Basic editor tussen de lijnen , Sub DeleteRowbyDate ( ) en End Sub :
. Dim x als Longfor x = 1 To Cells.SpecialCells ( xlCellTypeLastCell ) . RowDebug.Print Cells ( x , " B " ) . ValueIf CDate ( Cells ( x , " B " ) ) < CDate ( " 12/29/2010 " ) ThenCells ( i , " B " ) . EntireRow.deleteEnd IfNext i
Op de lijn waar het zegt , " Als CDate ( Cells ( x , " B " ) ) < CDate ( " 12/29/2010 " ) dan " , verander de datum naar wat datum die een dag hoger is dan de datum die u wilt verwijderen . Bijvoorbeeld , als je wilt alle rijen die eerder zijn dan 1 januari 2009 te verwijderen , dan zult u de lijn te veranderen naar :
Als CDate ( Cells ( x , " B " ) ) < CDate ( " 01/01/09 " ) dan
4 Sluit de Visual Basic editor. Het bespaart automatisch naar de macro . Wanneer u de macro wilt uitvoeren en de rijen te verwijderen , ga terug naar " Macro's " , selecteer de " DeleteRowsbyDate " macro en klik op ' Uitvoeren '.
< br > |
