Come verificare se una forma o un'immagine esiste nel foglio attivo?
Ad esempio, sono già state aggiunte dozzine di forme o immagini nel foglio di lavoro attivo e ora si desidera verificare se una forma o un'immagine specifica esiste o meno nel foglio attivo, come è possibile gestire rapidamente questo lavoro senza controllare le forme o immagini una per una? In Excel, nessuna funzione integrata può aiutarti, ma in questo articolo introduco un codice VBA per trovare rapidamente se una forma o un'immagine esiste nel foglio attivo.
Controlla se una forma o un'immagine esiste nel foglio attivo
Controlla se una forma o un'immagine esiste nel foglio attivo
Si prega di applicare il codice macro riportato di seguito per verificare se esiste un'immagine specifica nel foglio attivo.
1. Stampa Alt + F11 tasti per abilitare Microsoft Visual Basic, Applications Edition finestra.
2. Clic inserire > Modulo e incolla il codice sottostante nello script.
VBA: controlla se esiste una forma o un'immagine
Sub CheckImage () 'UpdatebyExtendoffice20170927 Dim xChar As Picture Dim xFlag As Boolean Dim xCharName As String On Error Resume Next Application.ScreenUpdating = False xCharName = "cat" xFlag = False For Each xChar In ActiveSheet.Pictures Debug.Print xChar.Name If xChar.Name = xCharName Then MsgBox "L'immagine è sul foglio attivo", vbInformation, "KuTools For Excel" xFlag = True Exit For End If Next If Not xFlag Then MsgBox "L'immagine non è sul foglio attivo", vbInformation, "KuTools For Excel" End Se Application.ScreenUpdating = True End Sub
3. Stampa F5 per eseguire il codice, viene visualizzata una finestra di dialogo per ricordarti se l'immagine esiste nel foglio attivo.
 |
 |
Consiglio: Nel codice della macro, puoi cambiare il nome dell'immagine in xCharName = "gatto" per soddisfare le tue necessità.
Articoli relativi:
I migliori strumenti per la produttività in ufficio
Kutools per Excel risolve la maggior parte dei tuoi problemi e aumenta la tua produttività dell'80%
- Riutilizzo: Inserisci rapidamente formule complesse, grafici e tutto ciò che hai usato prima; Crittografa celle con password; Crea mailing list e invia email ...
- Bar Super Formula (modifica facilmente più righe di testo e formula); Layout di lettura (leggi e modifica facilmente un gran numero di celle); Incolla su intervallo filtrato...
- Unisci celle / righe / colonne senza perdere dati; Contenuto delle celle divise; Combina righe / colonne duplicate... Impedisci celle duplicate; Confronta intervalli...
- Seleziona Duplica o Unico Righe; Seleziona Righe vuote (tutte le celle sono vuote); Super Find e Fuzzy Find in molte cartelle di lavoro; Selezione casuale ...
- Copia esatta Più celle senza modificare il riferimento della formula; Riferimenti di creazione automatica a più fogli; Inserisci punti elenco, Caselle di controllo e altro ...
- Estrai testo, Aggiungi testo, Rimuovi per posizione, Rimuovi spazio; Creare e stampare totali parziali di paging; Converti contenuto e commenti tra celle...
- Super filtro (salva e applica schemi di filtri ad altri fogli); Ordinamento avanzato per mese / settimana / giorno, frequenza e altro; Filtro speciale in grassetto, corsivo ...
- Combina cartelle di lavoro e fogli di lavoro; Unisci tabelle in base a colonne chiave; Suddividi i dati in più fogli; Conversione in batch xls, xlsx e PDF...
- Più di 300 potenti funzionalità. Supporta Office / Excel 2007-2019 e 365. Supporta tutte le lingue. Facile distribuzione nella tua azienda o organizzazione. Funzionalità complete Prova gratuita di 30 giorni. Garanzia di rimborso di 60 giorni.
Scheda Office porta l'interfaccia a schede a Office e semplifica notevolmente il lavoro
- 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 della stessa finestra, piuttosto che in nuove finestre.
- Aumenta la produttività del 50% e riduce centinaia di clic del mouse ogni giorno!
