Labele Dosya Açıklamasından Veri Alma

Bu çalışma dosyası, Excel dosya özelliklerindeki Açıklamalar (Comments) alanına yazılan metnin satır satır okunarak bir UserForm üzerindeki Label nesnelerinde gösterilmesini örnekler. Sürüm notu, bilgilendirme metni gibi içeriklerin kod değiştirilmeden dosya özelliklerinden güncellenmesi istenen çalışmalarda kullanılabilir.

Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir.

Dosyanın içeriği​

• exceldestek.com | exceldepo.com: A1:E11 aralığını kapsayan tek çalışma sayfasıdır. Formül, tablo, grafik veya veri doğrulama içermez.
• Module1: form adlı prosedürü barındırır; prosedür UserForm1 penceresini açar.
• UserForm1: Açılışta çalışan UserForm_Initialize olayını ve Label5, Label6, Label7, Label8 nesnelerini içerir.

Makrolar​

• form: UserForm1 penceresini görüntüler. Alt+F8 ile makro listesinden çalıştırılır veya bir düğmeye atanabilir.
• UserForm_Initialize: Form açılırken çalışır. Çalışma kitabının BuiltinDocumentProperties("Comments") değerini okur ve satır sonu karakterine göre ayırır. İlk dört satırı sırasıyla Label5, Label6, Label7 ve Label8 nesnelerinin Caption özelliğine yazar. Kodun başındaki On Error Resume Next ifadesi nedeniyle açıklama alanında dörtten az satır varsa hata mesajı verilmez, ilgili label güncellenmeden kalır.
• Aynı olayda ProjeTakip sayfasının A2:A65536 aralığındaki dolu hücreler CountA ile sayılır ve sonuca 1 eklenir. Bu değer bir değişkene atanır; dosyada ProjeTakip adlı sayfa bulunmadığından bu satır hata üretir, ancak hata yok sayıldığı için formun çalışmasını etkilemez.

Kodda dosya silme, dış bağlantı veya zararlı bir işlem yoktur.

Nasıl kullanılır​

1. Dosyayı açın ve makroları etkinleştirin.
2. Dosya menüsünde Bilgi bölümünden, Özellikler altındaki Açıklamalar alanına en fazla dört satır metin girin. Satır sonu için Ctrl+Enter yerine alanda yeni satıra geçilmesi gerekir; her satır ayrı bir label'a aktarılır.
3. Alt+F8 ile form makrosunu çalıştırın.
4. Açılan formda açıklama satırlarının Label5-Label8 alanlarında listelendiğini görürsünüz.
5. Metni değiştirmek için açıklama alanını güncelleyip formu yeniden açmanız yeterlidir.