AccessTr.neT
Formda İmage İçine Resim Getirme - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Excel (https://accesstr.net/forum-microsoft-excel.html)
+--- Forum: Excel Cevaplanmış Soruları (https://accesstr.net/forum-excel-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Formda İmage İçine Resim Getirme (/konu-formda-image-icine-resim-getirme.html)



Formda İmage İçine Resim Getirme - Matakli - 16/04/2026

çalışmam klasöründe; 6 resimden oluşan resim klasörü ve  excelde yapılmış dosyam var.

excelde oluşturduğum form üzerinde image1 e resim ekle butonuna basınca resim klasöründe bulunan resimlerden rastgele birinin gelmesini istiyorum.

Dim yol As String
yol = "C:\Users\TOSHBA\Desktop\nimet çalışma\resim\1.ünitemat1.JPEG"

Image1.Picture = LoadPicture(yol)

burada Image1.picture=nothing hatasını alıyorum.

bu konuda yardımcı olursanız memnun olurum


RE: Formda İmage İçine Resim Getirme - atoykan - 18/04/2026

Kodunuzu
Private Sub Bu1_Click()

Dim yol As String
yol = ThisWorkbook.Path & "\resim\1.ünitemat1.JPG"

Image1.Picture = LoadPicture(yol)

End Sub
olarak değiştirin ve dosya isimlerini doğru adlandırın. Klasörünüzdeki resimlerin uzantısı .jpg iken siz .jpeg aratıyorsunuz, netice olmayan şeyi gösteremem diyor.


RE: Formda İmage İçine Resim Getirme - Matakli - 18/04/2026

Teşekkürler