UserForm Üzerinde Klasördeki Resimleri Gösterme

Bu dosya, bir klasördeki resimlerin UserForm üzerindeki Image nesnesinde gösterilmesini örnekler. Resimler formdaki açılır listeden (ComboBox) seçilir; seçilen resim anında formda görüntülenir. Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir.

Dosyanın içeriği​

• Sheet1: A1:C4 aralığında resim listesi bulunur. Üç resim kaydı A2:C4 aralığındadır; her satırın üçüncü sütununda resim dosyasının yolu yer alır.
• myTable: Sheet1!$A$2:$C$4 aralığına verilen tanımlı addır. Formdaki liste bu aralıktan beslenir.
• UserForm1: Üzerinde cmbImg adlı ComboBox ve Image1 adlı resim alanı bulunan formdur.

Dosyada formül kullanılmamıştır.

Makrolar​

• showform (Module1): UserForm1 formunu açar. Dosyayı kullanmaya bu makroyu çalıştırarak başlanır.
• cmbImg_Change (UserForm1): ComboBox'ta bir seçim yapıldığında çalışır. Seçilen satırın üçüncü sütunundaki (indeks 2) resim yolunu alır ve LoadPicture ile Image1 nesnesine yükler. Kodda On Error Resume Next bulunduğu için yolu hatalı veya dosyası bulunmayan kayıtlarda hata mesajı çıkmaz, resim yüklenmez.

Makrolarda dosya silme ya da dışarıya bağlantı kuran bir işlem yoktur.

Nasıl kullanılır​

1. Dosyayı açın ve makroları etkinleştirin.
2. Sheet1 sayfasında C2:C4 hücrelerindeki yolları kendi bilgisayarınızdaki resim dosyalarına göre değiştirin; A ve B sütunlarına resim adı gibi açıklayıcı bilgileri yazın.
3. Alt+F8 ile showform makrosunu çalıştırın.
4. Formdaki listeden bir kayıt seçin; resim Image1 alanında görüntülenir.
5. Üçten fazla resim göstermek için listeye yeni satırlar ekleyin ve Formüller sekmesindeki Ad Yöneticisi'nden myTable tanımının aralığını bu satırları kapsayacak biçimde genişletin.