İpucu: Digər dillər Google-tərcümə olunur. Sizi ziyarət edə bilərsiniz English bu linkin versiyası.
Daxil ol
x
or
x
x
Qeydiyyatdan
x

or

Aktiv formanda bir forma və ya şəkk mövcud olub-olmadığını yoxlamaq üçün necə?

Məsələn, artıq aktiv iş yerində onlarla şəkillər və ya şəkillər əlavə olunmuşdur və indi aktiv formada müəyyən bir forma və ya görüntünün mövcud olub olmadığını yoxlamaq istəsəniz, bu işi şəkilləri yoxlamadan və ya yoxlamaqdan necə tez bir şəkildə idarə edə bilərsiniz? şəkillər tək-tək Excel-də heç bir daxili funksiya sizə kömək edə bilməz, amma bu məqalədə, bir forma və ya şəkilin aktiv hesabatda varlığını tez bir şəkildə tapmaq üçün VBA kodunu təqdim edirəm.

Aktiv formana bir forma və ya şəkilin olub olmadığını yoxlayın


Aktiv formana bir forma və ya şəkilin olub olmadığını yoxlayın


Müəyyən bir görüntünün aktiv hesabatda olub olmadığını yoxlamaq üçün lütfen makro kodunun altında tətbiq edin.

1. Basın Alt + F11 düymələri aktivləşdirmək Proqramlar üçün Microsoft Visual Basic pəncərə.

2. klik Taxmaq > Modules kodunu skriptə qoyun.

VBA: Bir forma və ya görüntünün olub olmadığını yoxlayın

Sub CheckImage () 'UpdatebyExtendoffice20170927 Dim xChar As Şəkil Dim xFlag kimi Boolean Dim xCharName kimi String On Error davam Next Application.ScreenUpdating = False xCharName = "cat" xFlag = False Hər bir xChar üçün ActiveSheet.Pictures Debug.Print xChar.Name Əgər xChar Xflag Sonra MsgBox "Image Active Sheet deyil", vbInformation, "Excel üçün KuTools" xFlag = Əgər True Exit sona çatarsa ​​xflag sonra MsgBox "Image Active Sheet deyil", vbInformation " Excel üçün KuTools "End if Application.ScreenUpdating = True End Sub

1 şəkli varmı?

3. Basın F5 kodunu çalıştırmak üçün, bir görüntünün, aktiv sayfada bulunup bulunmadığını hatırlatmak üçün bir informasiya penceresi açılır.

2 şəkli varmı? 3 şəkli varmı?

Uc: Makro kodunda, şəkil adını dəyişə bilərsiniz xCharName = "cat" ehtiyacınızı qarşılamaq.


Export Graphics

Excel üçün Kutools 's Export Graphics bir qovluqda png, tif, gif, jpeg şəkillərini, çizelgelerini və şəkillərini ixrac edə və ya saxlaya bilərik
doc ixrac qrafika

Əlaqədar məqalələr:



Təklif olunan Məhsuldarlıq Vasitələri

Office Tab

qızıl star1 Chrome, Firefox və yeni Internet Explorer kimi Excel və digər Office proqramlarına lazımlı sekmeleri gətirin.

Excel üçün Kutools

qızıl star1 Amazing! 5 dəqiqədə məhsuldarlığınızı artırın. Heç bir xüsusi bacarıqa ehtiyac yoxdur, hər gün iki saat saxlaya bilərsiniz!

qızıl star1 300 Excel üçün yeni funksiyalar, Excel çox asan və güclü olun:

  • Veriyi ləğv etmədən Cell / Satır / Sütunları birləşdirin.
  • Bir neçə Çarşaf və İş Kitabını birləşdirin və birləşdirin.
  • Çaprazları müqayisə edin, birdən çox aralığa kopyalayın, mətni tarixə, vahidə və valyuta çevrilməsinə çevirin.
  • Rənglər, Paging Subtotals, Advanced Sort və Super Filter tərəfindən sayılan,
  • Daha çox seçin / Insert / Sil / Mətn / Biçim / Bağlantı / Yorum / Çalışma kitabları / Çalışma Qurğuları Tools ...

Excel üçün Kutools-un ekranı

Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.