Exe Dosyasını Açmak

[aoeflatun]

Arkadaşlar, iki tane xls uzantılı dosyayı exe dosyasına çevirdikten sonra makro yardımıyla bir dosyanın içinden diğer bir dosyayı nasıl açabilirim. Her iki exe dosyasıda aynı klasör içinde.
İlgilenen herkese teşekkür ederim.

 

[N.Ziya Hiçdurmaz]

yanıt

Sub dosyaac()
isim = "[COLOR="Blue"]dosyaisminiyazınız[/COLOR]"
Shell ThisWorkbook.Path & "\" & isim & ".exe"
End Sub

 

[aoeflatun]

Exe Dosyası

Niyazi bey,
vermiş olduğunuz kodları yazdım fakat çalışmıyor. Vba kodu hata veriyor.
Teşekkürler

 

[N.Ziya Hiçdurmaz]

yanıt

Örneği inceleyiniz

 

[aoeflatun]

Burada iki dosya var xls ve exe. Benim sormak istediğim her iki dosyada exe olacak.