excel den worde butonla geçiş

[cihangirkara]

arkadaşlar bir excel sayfasında bir butona basınca başka bir yerdeki word dosyasını açabilmek istiyorum. yeni makro kaydet yaptım gittim wordü açtım ama sonra çalışmıyor saygılar

 

[Mahmut Bayram]

Sub WordAc()
adres = Application.InputBox("Belgenizin Adı Nedir ?", "Adres", "\Word.doc")
On Error GoTo hata1
With CreateObject("Word.Application")
.Visible = 1
.Documents.Open (ThisWorkbook.Path & adres)
End With
hata1:
End Sub

 

[cihangirkara]

belgemin masaüstünde ipotek klasörü 10-a isimli,

bu makroyu yazarak değilde yeni makro kaydetle elimle giderek nasıl yaparım

 

[Mahmut Bayram]

Masaüstünüzdeki dosyanızın tam yolu nedir?
Word dosyasında sağ fareden özelliklere ve konuma bakın ve orayı kopyalayıp buraya yapıştırınız.

 

[cihangirkara]

C:\Documents and Settings\GISE\Desktop\İPOTEK\ÖRNEK-10A

 

[Mahmut Bayram]

Sub Wordac()
MyAppID = Shell("Winword.EXE ""C:\Documents and Settings\GISE\Desktop\İPOTEK\ÖRNEK-10A.doc", 1)
AppActivate MyAppID
End Sub

 

[cihangirkara]

TeŞekkÜr Ederİm

Dostum ÖĞrenmek İstİyorum Benİm BİlgdİĞİm Yenİ Makro Kaydet Dİyorsun Sonra İstedİĞİnİ Yapiyorsun Ve Kaydi Durdur Dİyorsun Daha Sonra Makroyu ÇaliŞtir DedİĞİnde KaydettİĞİn İŞlemlerİ Yapiyor YanliŞmiyim

Kod Yazarak DeĞİlde Bu Şekİlde İstedİĞİm İŞlemİ Önce Ben Yapip Kaydederek Makro OluŞturabİlİrmİyİm

 

[Mahmut Bayram]

Bunun makro kaydetle kaydedilerek yapılmasını hiç araştırmadım.
Böyle bir özellik olduğunu zannetmiyorum.

 

[cihangirkara]

Yenİ Makro Kaydet Dİyorsun Sonra ÖrneĞİn Sayfayi Yazdirmak İstİyorsun Yazdir Yazici Ayarlari Yapip Yazdiriyorsun Sonra Makro Kaydi Durdur Dİyorsun Daha Sonra Bİr Sayfa AÇip Bu Makroyu ÇaliŞtirdiĞinda Ayni Ayarlarla Kendİsİ Yazdiriyor

 

[Mahmut Bayram]

Biliyorum cihangir bey ama excelden başka bir uygulamayı açmak istediğimizde excel bunu makro olarak kaydetmiyor.
Bunu demek istiyorum.