2017-03-28 41 views
-3

Office 365のVBAで自分のアプリケーションのコード をインストールした後はもう機能していないのGetObject(、 "Word.Application")Office 365の

Set wrd = GetObject(, "Word.Application") 
wrd.Visible = True 
wrd.Documents.Open "C:\My Documents\Temp.doc" 
Set wrd = Nothing 

は、誰かがそれはrecornizeオフィスをdoes'nt

任意のアイデアを持っています365、上記のコードは ですが、Office 2016または2013をインストールすると動作します。

+1

これはVB.NETではありませんが、これは非常にはっきりとVBAなので、そのようにタグ付けするのはなぜですか? –

+1

ASP-Classicのように見えません – ThunderFrame

+1

正しいアプリケーション名をレジストリで検索してください。 "HKEY_LOCAL_MACHINE \ SOFTWARE \ Wow6432Node \ RegisteredApplications"。次に、 "Set wrd = GetObject(、" Word.Applicatイオン ")"。その後、それが動作する可能性があります – Naidu

答えて

0

SOLVED!

正しいアプリケーション名をレジストリで検索してください。 Windows 7の場合 は "HKEY_LOCAL_MACHINE \ SOFTWARE \ Wow6432Node \ RegisteredApplicati ons"にあります。 次に、「設定しWRD =のGetObject(、 "Word.Application")にそれはWord.Application.16の代わりに、Word.Application

と呼ばれていました

を@pavancする

おかげで、新しい名前を置き換えます

0

それはあなたの部分のちょうど値下げエラーかどうかは分かりませんが、あなたのコードは、行を分離する必要があります:

Set wrd = GetObject(, "Word.Application") 
wrd.Visible = True 
wrd.Documents.Open "C:\My Documents\Temp.doc" 
Set wrd = Nothing 

これが解決しない場合は、多分あなたはエラーに関するより正確にすることができますあなたは手に入れている?