label.caption değeri hücre değeri değiştikçe otomatik değişsin

[leguminosea]

Excel Versiyonu

Excel 2016

Excel Sürümü

64 Bit

Excel Dili

Türkçe

label1 .caption=Range("C2").value

Bu koddaki C2 formül içeriyor ve sürekli değişiyor.
İstediğim label1' in de bu değer değiştikçe otomatik değişmesi.

 

commandbutton seçilmesi

Excel Kullanarak Puantaj Takip Etme

[AhmetRasim]

Merhabalar Sn. leguminosea
Label, çalışma sayfasında ise ilgili sayfanın kod bölümüne aşağıdaki satırları ekleyiniz.
Sayfada işlem yaptığınızda C2'nin değeri değiştikçe, Label'ın da içeriği değişir.

İndirmek için giriş yapmanız gerekmektedir.
(3 satır)

Label, UserFrom'da ise ilgili satırı

İndirmek için giriş yapmanız gerekmektedir.
(1 satır)

şekilde değiştiriniz.
Olmazsa, örnek bir dosya isteyebiliriz.

 

[leguminosea]

Sayın @AhmetRasim ,
Aşağıda göründüğü üzere labeller UserForm üzerinde,
C2 zaman sayacı
B8 çalışan makronun tamamlanma yüdesi
B9 çalışan makronun o an hangi işlemi yaptığını gösteriyor.

bu hücrelerdeki değerler sürekli değiştiğinden labellerin de değişmesi lazım,
ancak userform açılışında hücre değerine 1 kez bakıp bırakıyor. devamlılık yok.

İndirmek için giriş yapmanız gerekmektedir.
(5 satır)

 

[AhmetRasim]

Merhabalar Sn. leguminosea

UserForm_Initialize bölümündeki kodları, modül içerisine aşağıdaki şekilde ekleyiniz.
Not: Çalışma dosyanızdaki formun ismi UserForm1 değilse, UserForm1'i ilgili formun ismi ile değiştiriniz.

İndirmek için giriş yapmanız gerekmektedir.
(5 satır)

UserForm_Initialize bölümüne de bu kodu ekleyiniz.

İndirmek için giriş yapmanız gerekmektedir.
(3 satır)

10 saniyede bir Modül içerisindeki yenile isimli kod bloğu çalışır ve Label'lara sayfadan ilgili veriler gelir.

 

[leguminosea]

Sayın @AhmetRasim malesef olmadı.
yani olmadı derken esas makro çalışırken kod devreye girmiyor.
Girse de user label üzerinde görünmüyor. sadece ilk ve son değerler görünüyor.

 

[AhmetRasim]

Merhabalar,
Dosyanın örnek halini paylaşmanız mümkün mü?

 

[leguminosea]

Örnek dosya ektedir.

 

[Ömer BARAN]

Merhaba.
Ben de fikrimi belirteyim.

Userforma ait başka kod ve işlemlerinizin durumunu bilemiyorum.
Mevcut örnek belgeye göre; userforma ait kod bölümündeki kodların tümünü silip yerine
aşağıdaki kodu yapıştırın. Düğme kullanmadan, LABEL1'de saat görüntülenecektir.

İndirmek için giriş yapmanız gerekmektedir.
(3 satır)

.

 

[leguminosea]

Sayın @Ömer BARAN c2 yi sadece zaman olarak düşünmeyin.
Bunu örnek olarak yazdım.
Başka bir labelde de değişen metinsel ifadeler olacak.
yani label yerine textbox da olabilir.
önemli olan hücredeki verinin anlık olarak userform üzerinde görünmesi.

 

[Ömer BARAN]

Bu durumda, örnek belgenizin gerçek belgenizle bir benzerliğinin olmadığı sonucunu çıkartıyorum.
Hücredeki formüllerle, formülleri etkileyen alanlarla ilgilenmekte yarar var demekki.
Sayfadaki formülleri etkileyen hücrelere userform üzerinden mi veri yazacaksınız?
Formüllerinizi bilemiyoruz. Formüllerde yapılan hesaplamaları userform kodları içerisinde yapabilirsiniz, vs.

Durum "bilmece gibi bir konu açmışsınız" gibi görünüyor.

.

 

[AhmetRasim]

Merhaba,
Paylaştığınız örnek dosyanın, Ekteki hali ile istediğiniz işlem olmaktadır.

Ancak, Ömer Hocamın da belirttiği gibi Örnek dosya, Gerçek dosyadan farklı ise istediğiniz işlem bu dosya ile gerçekleşmeyebilir.

Not: Dosya Güncellendi.

 

[leguminosea]

Sayın @AhmetRasim bu işimi görecek.
Sayın @Ömer BARAN a ve size çok teşekkür ederim.

 

[Ömer BARAN]

Ne oldu şimdi, sonuç, amaç, işlem...?

 

[leguminosea]

Sayın @Ömer BARAN ,
Amacım; çalıştırılan bir koda göre, excel sayfasında değişen formüllü bir hücrenin değerini anlık olarak user form üzerinde gösterebilmekti.
C2 formül ile A1 'i ( A1 metinsel ifade de olabilirdi) gösteriyor, Label1 de C2 deki değeri anlık olarak userformda gösteriyor.
Amaç hasıl oldu.

 

[AhmetRasim]

Merhaba,
İşinize yaraması güzel.
Konu çözüldüğüne göre bana müsaade.
Hayırlı geceler hepimize.
İyi çalışmalar.

 

[Ömer BARAN]

Peki, kolay gelsin.

 

[leguminosea]

Çalışma sayfasının kod bölümündeki yer alan aşağıda kodla sorunum çözüldü.

İndirmek için giriş yapmanız gerekmektedir.
(6 satır)