Çözüldü Metin kutusunda LinkedCell özelliği

[md3m1ray]

Merhaba.

Metin kutusunu LinkedCell ile hücre ile ilişkilendiriyorum.
Hücrede değişiklik olursa metin kutusunda, metin kutusunda değişiklik olursa hücre de otomatik değişiyor bunda sıkıntı yok.

Ancak bu hücrede değişiklik olunca tetiklenen başka hücrelerde formüller, pivotlar ve makrolar var metin kutusunda değişiklik yapılınca bunlar çalışmıyor.
Hücreye tıklayıp enter yapmak gerekiyor,
metin kutusunda değişiklik yapıldığında otomatik olarak hücre yenilensin istiyorum bununla ilgili yardımlarınızı bekliyorum.

 

[tugkan]

Merhaba,
Dener misiniz. Metin kutusunda yapılan değişikliklerin hücredeki diğer formülleri, pivotları veya makroları güncellemesi için metin kutusu üzerinde bir VBA kodu kullanarak hücreyi yenileyebiliriz. Bu kod, metin kutusunda bir değişiklik olduğunda hücreye tekrar “Enter” basılmış gibi davranarak diğer bağlantılı formülleri ve işlemleri tetikler.

Bunu yapmak için aşağıdaki adımları izleyin:

1. Metin Kutusuna Etkinlik Ekleme:
   • Geliştirici sekmesine gidin.
   • Tasarım Modunu açın.
   • Metin kutunuza sağ tıklayın ve Kod Görünümüne gidin.
2. VBA Kodunu Ekleme: Açılan VBA editörüne aşağıdaki kodu ekleyin:

Private Sub TextBox1_Change()
    Application.EnableEvents = False
    On Error GoTo CleanUp

    ' Metin kutusuna bağlı olan hücrenin adresini girin
    Dim linkedCell As Range
    Set linkedCell = Range(Me.TextBox1.LinkedCell)

    ' Hücreyi yeniden hesaplatmak için değeri kendine eşitleyin
    linkedCell.Value = linkedCell.Value

CleanUp:
    Application.EnableEvents = True
End Sub

1. Bu kodda:
   • TextBox1, metin kutunuzun ismini temsil eder. Eğer metin kutunuzun ismi farklıysa, onu buraya göre değiştirin.
   • Me.TextBox1.LinkedCell, metin kutusunun bağlı olduğu hücreyi alır ve linkedCell.Value = linkedCell.Value satırı, hücreyi kendisiyle eşitleyerek yeniden hesaplatır.
2. Kodun Testi: Tasarım modunu kapatın ve metin kutusunda bir değişiklik yapın. Kod, hücrede yapılan her güncellemede pivot tabloları, makroları veya formülleri yeniden hesaplayacaktır.

Bu çözüm, metin kutusundaki değişikliklerde hücreyi otomatik olarak güncelleyerek diğer bağlı nesnelerin de tetiklenmesini sağlayacaktır.

 

[md3m1ray]

detaylı bilgi için teşekkür ederim tugkan bey

 

[tugkan]

Rica ederim. Sorun çözüldü mü?

 

[md3m1ray]

formüller çalıştı ancak pivot yenilenmedi onuda araya pivot.refresh ekleyerek hallettim.