RE: [belajar-excel] Menjalankan aplikasi dari Vba

Wed, 17 May 2017 03:38:02 -0700 


Wah mantaab Mr. Kid


Terima kasih





Wassalam


Heru Safrudin





From: [email protected] [mailto:[email protected]]
Sent: 16 Mei 2017 13:00
To: BeExcel
Subject: Re: [belajar-excel] Menjalankan aplikasi dari Vba








Wa'alaikumussalam wr wb


Hai Heru,


Syntax :


      Shell "nama_lengkap_program ""nama_lengkap_file"" ", mode_tampilan


dengan :


  adalah opsi tambahan yang disediakan si program yang dipanggil, pilih salah 
satu lokasi, opsi selalu awali dan diakhiri dengan spasi


""nama_lengkap_file"" adalah nama file yang dapat dibuka si program yang 
dipanggil (selalu dalam tanda petik)
mode_tampilan dapat dipilih dari opsi yang ada, seperti maximum (layar penuh), 
normal, minimum (tampak di taskbar saja) dalam kondisi diberi fokus (tampilan 
langsung pindah ke program yang dipanggil shell) atau tanpa fokus (tampilan 
tetap di program pemanggil shell [dalam hal ini Excel])





Kalau di commandprompt, seperti perintah :
nama_lengkap_program "nama_lengkap_file"





Contoh :
      Shell "C:\Windows\system32\mspaint.exe 
""d:\folderku\subfoldernya\Kid.bmp"" ", vbnormalfocus  'vbnormalfocus bernilai 1


Bahasa manusianya :


"tolong jalanin (shell) program notepad ( C:\Windows\system32\mspaint.exe ), 
lalu bukain file gambar tertentu ya ( "d:\folderku\subfoldernya\Kid.bmp" ), 
lalu tampilkan sesuai setting size window defaultnya si program dan pusatkan 
perhatian pada program tersebut ( vbnormalfocus )





Kalau dalam commandprompt seperti perintah :
C:\Windows\system32\mspaint.exe "d:\folderku\subfoldernya\Kid.bmp"





Contoh kalau memanfaatkan bagian yang  di ms paint adalah opsi untuk print '/p'


    Shell "C:\Windows\system32\mspaint.exe /p 
""d:\folderku\subfoldernya\Kid.bmp"" "


atau
  Shell "C:\Windows\system32\mspaint.exe ""d:\folderku\subfoldernya\Kid.bmp"" 
/p "


Wassalamu'alaikum wr wb


Kid








2017-05-16 9:57 GMT+07:00 'Heru Safrudin' [email protected] 
[belajar-excel] <[email protected]>:





Dear Be-Exceller





Bagaimanakah membuka aplikasi Paint.exe dari vba dan sekaligus membuka file 
gambar tertentu


Kalau kode yang saya copas dari help dibawah ini hanya menjalankan aplikasinya





Dim RetVal


RetVal = Shell("C:\Windows\system32\mspaint.exe", 4)





Mohon pembelajarannya





Wassalam


Heru Safrudin


































					Kirim email ke