Cum să verificați dacă există o formă sau o imagine în foaia activă?
De exemplu, au existat deja zeci de forme sau imagini adăugate în foaia de lucru activă, iar acum doriți să verificați dacă există o anumită formă sau imagine în foaia activă sau nu, cum puteți face acest lucru rapid fără a verifica formele imagini una câte una? În Excel, nicio funcție încorporată nu vă poate ajuta, dar în acest articol, introduc un cod VBA pentru a găsi rapid dacă există o formă sau o imagine în foaia activă.
Verificați dacă există o formă sau o imagine în foaia activă
Verificați dacă există o formă sau o imagine în foaia activă
Vă rugăm să aplicați mai jos codul macro pentru a verifica dacă există o anumită imagine în foaia activă.
1. presa Alt + F11 taste pentru activare Microsoft Visual Basic pentru aplicații fereastră.
2. clic Insera > Module și lipiți codul de mai jos în script.
VBA: Verificați dacă există o formă sau o imagine
Sub CheckImage () 'UpdatebyExtendoffice20170927 Dim xChar Ca imagine Dim xFlag Ca boolean Dim xCharName Ca șir la eroare Reluați următoarea aplicație.ScreenUpdating = False xCharName = "pisică" xFlag = False pentru fiecare xChar din ActiveSheet.Pictures Debug.Print xChar.Name Dacă xChar.Name Then = xCharName MsgBox „Imaginea este pe foaia activă”, vbInformation, „KuTools For Excel” xFlag = True Exit For End Dacă Următorul Dacă nu xFlag, atunci MsgBox „Imaginea nu este pe foaia activă”, vbInformation, „KuTools For Excel” End Dacă Application.ScreenUpdating = True End Sub
3. presa F5 pentru a rula codul, apare o fereastră de dialog pentru a vă reaminti dacă imaginea există în foaia activă.
varful: În codul macro, puteți schimba numele imaginii în xCharName = "pisică" pentru a vă satisface nevoia.
Articole relative:
Cele mai bune instrumente de productivitate de birou
Îmbunătățiți-vă abilitățile Excel cu Kutools pentru Excel și experimentați eficiența ca niciodată. Kutools pentru Excel oferă peste 300 de funcții avansate pentru a crește productivitatea și a economisi timp. Faceți clic aici pentru a obține funcția de care aveți cea mai mare nevoie...
Fila Office aduce interfața cu file în Office și vă face munca mult mai ușoară
- Activați editarea și citirea cu file în Word, Excel, PowerPoint, Publisher, Access, Visio și Project.
- Deschideți și creați mai multe documente în filele noi ale aceleiași ferestre, mai degrabă decât în ferestrele noi.
- Vă crește productivitatea cu 50% și reduce sute de clicuri de mouse pentru dvs. în fiecare zi!