Sub OpenWordDocA()
Sheets("SoruGirişi").OLEObjects("A Grubu").Verb (xlVerbPrimary)
Set WDApp = GetObject(, "Word.Application")
Set WDDoc = WDApp.ActiveDocument
WDDoc.Tables(1).Select
[COLOR="Red"]WDApp.Run "Tabloİptal"[/COLOR]
End Sub
Yukarıdaki kodla word nesnesine yazdığım makroyu çalıştırarak tablo iptalini gerçekleştirebiliyorum.(Kırmızı kısım worddeki makroyu çalıştırıyor.)
Bu worddeki makroyu çalıştır kısmının yerine worddeki "Tabloyu Metne Çevir" sekmesini çalıştıracak şekle çevirebilir miyiz?
Wordde makro olmasını istemiyorum. Çünkü excelin güvenlik seviyesini düşürmekle birlikte bir de wordle uğraşmak zorunda kalıyorum.
Saygılar...
Excel word arası makro üzerine maalesef pek çalışma yok. Gerekli birtakım kodları uzun uğraşlar ve araştırmalar sonucunda elde ettim;ama belli noktalarda tıkanıp kalıyorum. Bu da onlardan biri.
Excel üzerinden makro çalıştırmayı Haluk hocamızdan öğrendik. Peki excel üzerinden word araçlarını vb. nasıl çalıştırabiliriz. Tabloyu metne çevirme gibi...
Saygılar...
Sizlere daha iyi bir deneyim sunabilmek icin sitemizde çerez konumlandırmaktayız, web sitemizi kullanmaya devam ettiğinizde çerezler ile toplanan kişisel verileriniz Veri Politikamız / Bilgilendirmelerimizde belirtilen amaçlar ve yöntemlerle mevzuatına uygun olarak kullanılacaktır.