İçindekiler
Excel'de bir hücre değerine dayalı olarak kaydırma çubuğunun maksimum değerini ayarlamak için neden bir hüküm bulunmadığını sık sık merak ediyorum. Bu mevcut olsaydı, hücre değeri değiştiğinde bir kaydırma çubuğu maksimum değerini otomatik olarak ayarlar.
Aşağıda gösterildiği gibi bir şey mümkün olabilirdi:
Microsoft Office ekibi tarafından kullanıma sunulmadığı zamana kadar bu ipucu, kaydırma çubuğu için maksimum değeri bir hücreye bağlamanıza yardımcı olabilir.
Excel'de Kaydırma Çubuğu Maksimum Değerini Ayarlayın
- Geliştirici Sekmesine gidin -> Ekle -> ActiveX Kontrolleri -> Kaydırma Çubuğu (ActiveX Kontrolü)
- Geliştirici sekmeniz yok mu? Geliştirici sekmesini şeride nasıl ekleyeceğinizi buradan okuyun.
- Kaydırma Çubuğunu eklemek için çalışma sayfanızda Herhangi Bir Yer'e tıklayın.
- Kaydırma Çubuğuna sağ tıklayın ve Özellikler'i seçin.
- Bağlantılı hücreyi C10 olarak ayarlayın ve özellikler kutusunu kapatın.
- Bu örnekte C10 kullandım. Maksimum değere sahip olduğunuz farklı bir hücreniz olabilir.
- Kaydırma Çubuğuna çift tıklayın. VBA Düzenleyicisini şuna benzeyen bir kodla açacaktır:
Özel Alt ScrollBar1_Change() End Sub
- Kodunuzun şöyle görünmesi için bir satır ekleyin:
Özel Alt ScrollBar1_Change() Activesheet.Scrollbar1.Max = Aralık("C7").Value End Sub
- VBA Düzenleyici penceresini kapatın.
- Geliştirici sekmesine gidin ve Tasarım Modu düğmesine sol tıklayın.
- Bu kadar!! Sen Kaydırma Çubuğu kullanılmak üzere ayarlandı.
Dosyanın bir makrosu olduğundan, dosyayı .xls veya .xlsm biçim.
Bunu ayarlamayı bitirdiğinizde ve EĞER kaydırma çubuğu çalışmıyor, şu adımları izleyin:
- Geliştirici Sekmesine gidin, Tasarım Moduna tıklayın.
- Kaydırma çubuğuna çift tıklayın.
- VBA Düzenleyicide, F5'e basın veya Alt/Kullanıcıyı Çalıştır formu düğmesine tıklayın.
- VBA Düzenleyicisini kapatın.
Kendiniz deneyin… Dosyayı indirin
