İ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ə qrup qutularından sərhədləri necə çıxarmaq və ya gizlətmək olar?

Excel-də, bir neçə seçki sualını etmək üçün bir neçə variant düyməsini qruplaşdırmaq üçün bəzi qrup qutuları yarada bilərsiniz, beləliklə, seçim düymələri ətrafında qrup qutuları olacaq və xəttlər hüceyrələr düz deyil, çünki qutu xətləri pis görünür. Bu yazı, işçi səhifənin daha aydın şəkildə göstərildiyi ekran görüntüsünü göstərmək üçün qrup qutularında sərhədləri və ya xətləri gizlətmək və ya silmək üçün sizə bəzi fəndləri təqdim edəcəyəm:

doc gizlət qrup qutusu sərhədləri 1

Bir kodla qrup qutularında sərhədləri çıxarın və ya gizləyin

VBA kodu ilə qrup qutularında sərhədləri çıxarın və ya gizləyin


arrow mavi sağ bubble Bir kodla qrup qutularında sərhədləri çıxarın və ya gizləyin


Qrup qutularının sərhəd xətlərini gizlətmək və ya silmək üçün burada bir skript sizə kömək edə bilər, belə edin:

1. Basıb saxlayın ALT + F11 düymələri açmaq üçün Proqramlar üçün Microsoft Visual Basic pəncərə.

2. Sonra basın Ctrl + G açmaq üçün yaxın pəncərədə yaxın bu kodu yazın: aktivesheet.groupboxes.visible = yanlış, bax ekran görüntüsü:

doc gizlət qrup qutusu sərhədləri 2

3. Kodu daxil etdikdən sonra, sonra basın Daxil edin açar və indi, qrup qutularının sərhədlərini dərhal gizlədə bilərsiniz.

Qeyd: Sərhədləri yenidən göstərmək üçün bu kodu tətbiq edin: activesheet.groupboxes.visible = truevə basın Daxil edin açar.


arrow mavi sağ bubble VBA kodu ilə qrup qutularında sərhədləri çıxarın və ya gizləyin

Yuxarıda göstərilən koddan başqa, burada da sizə kömək edə biləcək başqa bir VBA kodu var:

1. Basıb saxlayın ALT + F11 düymələri açmaq üçün Proqramlar üçün Microsoft Visual Basic pəncərə.

2. Basın Taxmaq > Modules, və aşağıdakı kodu yapışdırın Modules Pəncərə.

VBA kodu: Sərhədləri qrup qutularından çıxarın və ya gizlət:

Sub ToggleVisible()
Dim myGB As GroupBox
For Each myGB In ActiveSheet.GroupBoxes
myGB.Visible = False
Next myGB
End Sub

3. Sonra basın F5 bu kodu çalıştırmak üçün açar, aktiv iş səhifəsində qrup qutularının bütün sərhədləri bir anda gizlidir, ekran görünüşünə baxın:

doc gizlət qrup qutusu sərhədləri 1



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.
  • To post as a guest, your comment is unpublished.
    ManiE07CM · 10 months ago
    hello guys,
    i need to select multiple button to sum my scores. if is this possible pls suggest my a idea.?
  • To post as a guest, your comment is unpublished.
    Angus · 2 years ago
    Very nice piece of code, thanks. Helped to sort out client problem!

    Can toggle it:

    Sub ToggleVisible()
    Dim myGB As GroupBox
    For Each myGB In ActiveSheet.GroupBoxes
    myGB.Visible = IIf(myGB.Visible, False, True)
    Next myGB
    End Sub