Alhamdulillah atas bantuan script vba dari Pak Suyono dan postingan lawas Mr. Kid dari Pak Nang Agus File saya sudah sesuai harapan 100%. Terimakasih Semoga Limpahan rezki dan Nikmat Kesehatan selalu dilimpahkan kepada Bapak-bapak sekalian pengelola milis yang sungguh sangat bermanfaat ini. Wassalam.
2015-10-21 10:59 GMT+07:00 SUYONO [email protected] [belajar-excel] < [email protected]>: > > > Coba seperti ini. > > Private Sub ComboBox1_Change() > > On Error GoTo Err > > Dim Lokasi As String > > Lokasi = ActiveWorkbook.Path > > Lokasi = Lokasi & "\pic\" & ComboBox1.Text & ".jpg" > > Image1.Picture = LoadPicture(Lokasi) > > Exit Sub > > Err: > > MsgBox "File tidak ditemukan" > > End Sub > > > > > > *From:* [email protected] [mailto: > [email protected]] > *Sent:* Tuesday, October 20, 2015 8:37 PM > *To:* [email protected] > *Subject:* [belajar-excel] loadPicture dengan event combo box [1 > Attachment] > > > > > > Assalamu'alaikum. > > Belajar dari contoh file combobox dari arsip milis tapi buntu ketika mau > ambil gambar dari folder dengan script vba (karena belum mampu). Jadi > harapannya dapat dibantu oleh para master untuk menyelesaikan kasus di file > ini. > > > > Terimakasih sebelumnya master...! > > > > Wassalam > > HF > > >
