İ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

Excel-də hüceyrələri ilə hərəkət etmək və ölçmək üçün bütün şəkilləri avtomatik olaraq dəyişdirmək üçün necə?

Normalda, Move funksiyasının default xüsusiyyətləri ilə iş səhifəsinə bir şəkil qoyulmuş və hüceyrələrlə ölçülməmişdir. İhtiyacınız olduğu halda, iş səhifənizdə hüceyrələrin xüsusiyyətləri ilə Move və ölçüsü üçün əlamətlərini dəyişdirin. Əslində, köçürmək və ölçüsünü hüceyrələrlə avtomatik olaraq həll etmək üçün tez bir zamanda dəyişə bilərsiniz. Və bu yazı sizə nail olmaq üçün üsul göstərəcəkdir.

Avtomatik olaraq VBA kodu olan hüceyrələri ilə hərəkət etmək və ölçmək üçün bütün şəkilləri dəyişdirin


Avtomatik olaraq VBA kodu olan hüceyrələri ilə hərəkət etmək və ölçmək üçün bütün şəkilləri dəyişdirin


Aşağıdakı VBA kodu bir iş səhifəsində hüceyrələrlə hərəkət etmək və ölçmək üçün bütün şəkillərin xüsusiyyətlərini tez bir şəkildə dəyişməyə kömək edə bilər. Xahiş edirik bunu edin.

1. Çalışma səhifəsini açmaq, hüceyrələrlə hərəkət edərək və ölçülməsi ilə dəyişdirmək istədiyiniz şəkilləri ehtiva edir, sonra isə açın Proqramlar üçün Microsoft Visual Basic basın Dayandırmaq + F11 düymələri.

2. İçində Proqramlar üçün Microsoft Visual Basic pəncərədə basın Taxmaq > Modules. Sonra VBA kodunu Kod pencerəsinə kopyalayıb yapışdırın.

VBA kodu: hüceyrələrlə hərəkət etmək və ölçmək üçün bütün şəkilləri dəyişdirin

Sub MoveAndSizeWithCells()
    Dim xPic As Picture
    On Error Resume Next
    Application.ScreenUpdating = False
    For Each xPic In ActiveSheet.Pictures
        xPic.Placement = xlMoveAndSize
    Next
    Application.ScreenUpdating = True
End Sub

3. Basın F5 düyməsini basın və ya kodu çalıştırmak üçün Çalıştır düyməsini basın.

Sonra aktiv hesabat şəkilləri avtomatik olaraq hüceyrələri ilə hərəkət və ölçüyə dəyişir.


Əlaqəli 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.