Excel üzerinden word tablosunu metne çevirme.

[leumruk]

Selamlar...
Excelde yazacağımız bir kodla aktif word dosyasındaki tabloyu metne nasıl çeviririz? Wordde kod olmayacak.
Saygılar...

 

[leumruk]

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...

 

[leumruk]

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...