In Microsoft Excel , è possibile rimuovere un foglio di lavoro facendo clic destro sulla sua scheda e selezionando "Elimina" dal menu contestuale . Una piccola finestra vi chiederà di confermare l'azione. Questo aiuta a prevenire le cancellazioni accidentali . Passando attraverso la richiesta di conferma può essere fastidioso , tuttavia, se si sta tentando di rimuovere molti fogli . Fortunatamente, è anche possibile eliminare fogli di lavoro utilizzando VBA . Excel VBA è dotato di una funzione di "fogli" che è possibile utilizzare per creare , rinominare, spostare ed eliminare i fogli di lavoro . Con un paio di righe di codice , è possibile ignorare la finestra di conferma e di rimuovere i fogli di lavoro più veloce . Istruzioni
1
Avviare Microsoft Excel. Premere il tasto " Ctrl " plus " O ", selezionare la cartella di lavoro dall'elenco e fare clic su "Apri ".
2
Comunicati spina "F8" "alt" per aprire la finestra " Macro " . Digitare " RemoveSheets " nella casella " Nome macro " e fare clic su "Crea ". Si apre l'editor di Visual Basic (VBE ) .
3
Inserisci il seguente codice nel VBE .
RemoveSheets sub ()
wSheets = Array ( " SHEET1 " , " Foglio2 " , " Foglio3 " )
Application.DisplayAlerts = False
Per n = 0 To UBound ( wSheets ) per
On Error Resume Next < br
Fogli > ( wSheets ( n)) . Elimina
prossime n
Application.DisplayAlerts = True
End Sub
4 < p > Sostituire " Foglio1 ", " Foglio2 " e " Foglio3 " con i nomi dei fogli di lavoro che ti piacerebbe eliminare. Per aggiungere un altro nome alla lista , digitare una virgola e inserire il nome del foglio prima della parentesi della funzione Array di chiusura . Accertarsi di racchiudere tra virgolette .
5
Premere " Alt " plus " Q " per chiudere la VBE .
6
Premere " Alt " plus "F8" per aprire nuovamente la finestra " Macro " . Seleziona " RemoveSheets " dalla lista , quindi fare clic su "Esegui ".