userformda resim önzileme Hazır Excel Makroları (VBA) | Excel Programları

Makroyu Kopyala

'Excel Makro (VBA) online eğitimleri için: https://www.excelsizeyeter.com/excelsizeyeter.com/udemy_giris.php adresine tıklayınız. Bir eğitim alana bir eğitim bedavadır. İkinci eğitim olarak Excel, Excel pratik çözümler, finans eğitimleri vb. alabilirsiniz. 
 
UserForm'a 1 adet Image ve 1 adet ComboBox ekleyip aşağıdaki kodları kopyalayıp yapıştırın. 
Resim seçmek için ComboBox'a çift tıklayıp çoklu seçim yapmanız ve Aç'a tıklamak yeterlidir. 
ComboBox'tan seçilen resim Image'de görünür.

Kod: 
Private Sub ComboBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)

Dim FD As FileDialog 
  Dim FFs As FileDialogFilters 
  Dim stFileName As String 
  Dim vaItem 
  
  On Error GoTo Problem

Set FD = Application.FileDialog(msoFileDialogOpen)

With FD 
     Set FFs = .Filters

With FFs 
      .Clear 
      .Add "Pictures", "*.jpg" 
    End With

.AllowMultiSelect = True

If .Show = False Then Exit Sub

ComboBox1.Clear 
    
    For Each vaItem In .SelectedItems 
      ComboBox1.AddItem vaItem 
    Next vaItem 
    
    ComboBox1.ListIndex = 0

End With

Exit Sub

Problem: 
  MsgBox "Geçerli bir resim dosyası değil." 
End Sub

Private Sub ComboBox1_Change() 
  Image1.Picture = LoadPicture(ComboBox1.Text) 
End Sub

Benzer Sonuçlar
No	Makro Adı
1	userformda resim önzileme
2	şifrelemede son nokta
3	userformda hareketli gif
4	makrolar kutusu ve makrolar görünsün
5	forma otomatik resim getirme
6	userformda takvim
7	userformdaki textboxları sıfırlamak
8	userformdaki checkboxları sıfırlamak
9	userformdan önizleme kapanınca forma dönme
10	userformdaki optionbuttonları sıfırlamak
11	userformdaki commandbottona bul eklemek
12	hücredeki metne çevir olayını userformdan yapmak
13	userformdan x ile çıkma geçersiz uyarı mesajı
14	textboxa sadece rakam girme
15	userformda saat
16	userformda saat, işlemci yormaması için 1dk bir kendini yeniler
17	userformun genişliği zaman ayarlı
18	textboxtaki veriye göre süzme işlemi
19	userformda tarih
20	userformdan userforma

Benzer Sonuçlar

Makro Adı

userformda resim önzileme

şifrelemede son nokta

userformda hareketli gif

makrolar kutusu ve makrolar görünsün

forma otomatik resim getirme

userformda takvim

userformdaki textboxları sıfırlamak

userformdaki checkboxları sıfırlamak

userformdan önizleme kapanınca forma dönme

userformdaki optionbuttonları sıfırlamak