Aprire il foglio di dati in Excel .
2
Premi " Alt " e " F11 " per aprire l'editor di Visual Basic.
3
Selezionare la scheda "Inserisci" sulla barra degli strumenti in alto e scegli
4
Incollare il seguente codice nella casella che appare "Modulo ". : " Option Explicit
Sub DeleteDups ( ) per
Dim x As LongDim LastRow As Long
LastRow = Range (" A65536 " ) . End ( xlUp ) . RowFor x = LastRow Per 1 Applicazione Step- 1Se . WorksheetFunction.CountIf ( Range (" A1 : A" . & x ) , Range ( " A" & x ) Testo ) . > 1 ThenRange ( " A" & x ) EntireRow.DeleteEnd IfNext x < br
End > Sub "
5
Chiudere la finestra facendo clic sulla " X " in alto a destra .
6
prova la funzione con l'aggiunta di dati a colonna A. duplicato alcuni dei dati di proposito .
7
Seleziona " macro " dalla barra degli strumenti in alto e scegliere " DeleteDups " e premere " Invio".
software © www.354353.com