Come eliminare fogli di lavoro che utilizza VBA

September 19

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 eventuali cancellazioni accidentali. Passando attraverso la richiesta di conferma può essere fastidioso, tuttavia, se si sta tentando di rimuovere molti fogli. Fortunatamente, è anche possibile eliminare i 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 rimuovere i fogli di lavoro più veloce.

istruzione

1 Avviare Microsoft Excel. Premere il tasto "Ctrl" plus "O", selezionare la cartella di lavoro dall'elenco e cliccare su "Apri".

2 Premere il tasto "Alt" spina "F8" per aprire la finestra "Macro". Digitare "RemoveSheets" nella casella "Nome macro" e fare clic su "Crea". Ciò apre il Visual Basic Editor (VBE).

3 Immettere il seguente codice nella VBE.

RemoveSheets sub ()

wSheets = Array ( "Sheet1", "Sheet2", "Foglio3")

Application.DisplayAlerts = False

Per n = 0 Per UBound (wSheets)

On Error Resume Next

Fogli (wSheets (n)). Delete

Successivo n

Application.DisplayAlerts = True

End Sub

4 Sostituire "Sheet1", "Foglio2" e "Foglio3" con i nomi dei fogli di lavoro che desideri eliminare. Per aggiungere un altro nome alla lista, digitare una virgola ed inserire il nome del foglio prima della parentesi della funzione Array di chiusura. Assicurarsi di racchiuderlo tra virgolette.

5 Premere il tasto "Alt" plus "Q" per chiudere il VBE.

6 Premere il tasto "Alt" plus "F8" per aprire di nuovo la finestra "Macro". Seleziona "RemoveSheets" dalla lista, quindi fare clic su "Esegui".

Consigli e avvertenze

  • Per eseguire rapidamente la macro, è possibile associare una scorciatoia da tastiera ad esso. Premere il tasto "Alt" plus "F8" per aprire la "Macro", selezionare "RemoveSheets" e fare clic su "Opzioni". Fare clic sulla casella vuota in basso "tasto di scelta rapida" e digitare la lettera di collegamento preferito.
  • Per mantenere il macro, salvare il file come una cartella di lavoro con attivazione macro. Premere il tasto "F12", digitare il nome di file preferito e scegliere "Excel con attivazione macro cartella di lavoro" dal menu a discesa accanto a "Salva come". Fai clic su "Salva".
  • Le macro sono disabilitati per impostazione predefinita in Microsoft Excel. Per consentire loro, fare clic sul pulsante Microsoft Office e selezionare "Opzioni di Excel." In "popolare", fare in modo che "Mostra Developer scheda della barra multifunzione" sia selezionata. Vai a "Centro protezione" e cliccare su "Impostazioni Centro." Vai a "Impostazioni macro" e selezionare "Attiva tutte le macro". Fai clic su "OK" per salvare le modifiche e riavviare Microsoft Excel.