Ako odstrániť duplicitné songy Použitie VBScript

Pri vytváraní riadkov a stĺpcov v programe Excel , môžete skončiť s niekoľkými kópiami objektu , a to najmä ak ste zoznam skladieb . Užívatelia majú možnosť filtrovania nich a odstraňovanie ich prostredníctvom tabuľkových nástrojov programu Excel . Ale keď tabuľka je dlhý a neustále sa mení , môžete spustiť malú Visual Basic Script ( VBScript ) , aby program Excel identifikovať duplicitné obsah a odstrániť ju rýchlo . Pokyny dovolená 1

Otvorte hárok v programe Excel .
2

Stlačte tlačidlo " Alt " a " F11 " otvorte Editor jazyka Visual Basic .

3

Vyberte kartu " Vložiť " z hornej lište a zvoľte
4

Vložte nasledujúci kód v okne , ktoré sa objaví " modul . " : " Option Explicit

Sub DeleteDups ( )

Dim x ako LongDim LastRow As Long

LastRow = Range ( " A65536 " ) . End ( xlUp ) . RowFor x = LastRow K 1. Krok - 1Pokud aplikácie . WorksheetFunction.CountIf . ( Range ( " A1 : " . & x ) , Range ( " A " & x ) Text ) > 1 ThenRange ( " A " & x ) EntireRow.DeleteEnd IfNext x

End Sub "
5

Zatvorte okno kliknutím na " X " v pravom hornom rohu .
6

Otestujte funkciu pridaním dát do stĺpec A. Duplicitné niektorých údajov úmyselne .
7

vyberte " makrá " z hornej nástrojovej lište a zvoľte " DeleteDups " a stlačte " ENTER " .

• Predchádzajúca strana: Čo je DSI Client 
• Ďalšia strana: Môžem sledovať Inventory v Quicken Home & Business