Come si fa a verificare se un foglio esiste già in una cartella di lavoro?
Quando una cartella contiene dozzine, se non centinaia, di fogli di lavoro, trovare o verificare la presenza di un foglio specifico può diventare un’operazione estremamente laboriosa. Di seguito ti proponiamo un codice VBA e uno strumento pratico per controllare rapidamente se un determinato foglio è presente nella cartella di lavoro.
Verificare se un foglio esiste in una cartella di lavoro con VBA
Verificare se un foglio esiste e passare ad esso con Kutools per Excel ![]()
Verificare se un foglio esiste in una cartella di lavoro
Segui i passaggi indicati di seguito per copiare il codice VBA ed eseguirlo, al fine di verificare se un foglio esiste nella cartella di lavoro corrente.
1. Premere Alt + F11 per visualizzare la finestra di Microsoft Visual Basic for Applications.
2. Nella finestra, fai clic su Inserisci > Modulo per aprire una nuova finestra del modulo, quindi copia il seguente codice VBA al suo interno.
VBA: Verifica se un foglio esiste all’interno di una cartella di lavoro.
Function CheckSheet(pName As String) As Boolean
'Updateby20140617
Dim IsExist As Boolean
IsExist = False
For i = 1 To Application.ActiveWorkbook.Sheets.Count
If Application.ActiveWorkbook.Sheets(i).Name = pName Then
IsExist = True
Exit For
End If
Next
CheckSheet = IsExist
End Function 3. Salvare questo codice, tornare al foglio e selezionare una cella vuota in cui digitare la formula =CheckSheet("Sheet1") (dove "Sheet1" indica il nome del foglio che si desidera verificare) e premere il tasto Invio. Il valore FALSO indica che il foglio non esiste, mentre VERO indica che esiste nel foglio di lavoro corrente.
Verificare se un foglio esiste e passare ad esso con Kutools per Excel tramite VBA
Con la funzione definita sopra è possibile soltanto verificare se un foglio esiste, un’operazione comunque piuttosto complessa. Tuttavia, con Kutools per Excel, lo strumento Navigazione elenca per te tutti i nomi dei fogli, consentendoti di scorrere l’elenco per trovare il foglio desiderato o di filtrare i nomi; inoltre, se necessario, puoi fare clic direttamente sul nome del foglio per passarvi immediatamente non appena lo individui.
Dopo aver installato gratuitamenteKutools per Excel, procedere come segue:
1. Attiva la cartella di lavoro in cui vuoi verificare l’esistenza di un foglio, quindi fai clic su Kutools > Navigazione. Vedi lo screenshot:
2. Nel riquadro visualizzato, fai clic sul pulsante Cartella di lavoro e Foglio per espandere il riquadro; qui potrai visualizzare tutti i fogli Elenco nomi e scorrere l’elenco per trovare i nomi desiderati.
3. In alternativa, puoi attivare il pulsante Filtro, digitare le parole chiave del nome del foglio che stai cercando e visualizzare immediatamente il foglio corrispondente nell’elenco; un clic sul nome del foglio ti porterà automaticamente ad esso.
Migliori Strumenti per la Produttività in Office
Potenzia le tue competenze in Excel con Kutools per Excel e sperimenta un’efficienza mai vista prima.Kutools per Excel offre oltre 300 funzionalità avanzate per aumentare la produttività e Risparmia tempo.Clicca qui per ottenere la funzionalità di cui hai più bisogno...
Office Tab Porta l'interfaccia a schede in Office e rende il tuo lavoro molto più semplice
- Abilita la modifica e la lettura a schede in Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Apri e crea più documenti in nuove schede all’interno della stessa finestra, invece che in finestre separate.
- Aumenta la tua produttività del 50 % e risparmia centinaia di clic del mouse ogni giorno!
Tutti i componenti aggiuntivi di Kutools in un unico programma di installazione.
Kutools for Office è la suite che include componenti aggiuntivi per Excel, Word, Outlook e PowerPoint, oltre a Office Tab Pro: la soluzione ideale per i team che lavorano su diverse app di Office.
- Suite completa— componenti aggiuntivi per Excel, Word, Outlook e PowerPoint + Office Tab Pro
- Un unico programma di installazione, una sola licenza— configurazione in pochi minuti (pronto per MSI)
- Funziona meglio insieme— produttività ottimizzata tra le app di Office
- Prova gratuita di 30 giorni con tutte le funzionalità— nessuna registrazione, nessuna carta di credito
- Miglior rapporto qualità-prezzo— risparmia rispetto all’acquisto dei singoli componenti aggiuntivi