ScrollBar Nesnesi ile Sayfada İşlem Yapma

Bu dosya, bir UserForm üzerindeki ScrollBar nesnesinin değerinin çalışma sayfasına nasıl yazdırılacağını gösteren makro örneğidir. Kaydırma çubuğu hareket ettirildikçe seçilen sayı hem formdaki kutuda hem de sayfadaki hücrede güncellenir.
Dosya makro içerir (.xlsm); açarken makroları etkinleştirmeniz gerekir.

Dosyanın içeriği​

• Sayfa1: A1 hücresinde başlangıç değeri olarak 2 bulunur. ScrollBar değeri bu hücreye yazılır.
• UserForm1: ScrollBar1, TextBox1 ve CommandButton1 nesnelerini içeren formdur.
• Module1: Formu açan makroyu barındırır.

Makrolar​

• Düğme1_Tıklat (Module1): UserForm1 formunu açar. Sayfaya yerleştirilen bir düğmeye atanarak çalıştırılır.
• ScrollBar1_Change (UserForm1): Kaydırma çubuğunun değeri her değiştiğinde değeri Sayfa1 sayfasındaki A1 hücresine ve TextBox1 kutusuna yazar.
• CommandButton1_Click (UserForm1): Forma yeni bir TextBox ekler. Yeni kutu, bir önceki kutunun soluna hizalanır, altına 10 birim boşlukla yerleştirilir ve aynı genişlik ile yüksekliği alır. Form yüksekliği de yeni kutu kadar uzatılır.

Kodlarda dosya silme ya da dışarıya bağlantı gibi işlemler yoktur; makrolar yalnızca form nesnelerini ve A1 hücresini kullanır.

Nasıl kullanılır​

1. Dosyayı açın ve makroları etkinleştirin.
2. Formu açmak için Düğme1_Tıklat makrosunu çalıştırın (Geliştirici sekmesi, Makrolar) veya bu makroyu bir düğmeye atayın.
3. Form açıldığında ScrollBar'ı kaydırın; değerin TextBox1 kutusunda ve Sayfa1 sayfasındaki A1 hücresinde değiştiğini izleyin.
4. Forma ek TextBox eklemek için CommandButton1 düğmesine tıklayın.
5. Kodu kendi çalışmanıza uyarlamak için VBA düzenleyicisinde (Alt+F11) UserForm1 kod penceresini açın.