ブックマークを使用してワードドキュメントにいくつかの値を挿入するvbscriptがあります。私たちは今、オフィス2016とオフィス2013を変更したときには、私は一般的なエラー 
Word vbscriptのブックマークがOfficeで動作しない2016
Set objWord = CreateObject("Word.Application")
Set objDoc = objWord.Documents.Open("c:\scripts\word\bookmarkdoc.docx")
Set objRange = objDoc.Bookmarks("nei1").Range
objRange.Text = "5.40"
これは完全なスクリプトですを取得し、先週まではうまく働きましたか？このメッセージボックスがカスタムメッセージボックスのように見えるので、何らかのエラー処理ルーチンがあるかどうか確認してください。
コード自体にエラーはないようです。しかし、あなたはそれをcreateobjectなしで試してみることができます：
Dim objWord As Word.Application
Dim objDoc As Word.Document
Dim objRange As Word.Range
Set objWord = New Word.Application
Set objDoc = objWord.Documents.Open("c:\scripts\word\bookmarkdoc.docx")
Set objRange = objDoc.Bookmarks("neil1").Range
objRange.Text = "5.40"
スクリプトのこの部分がエラーを生成しています。私はメッセージを行の後ろに置くことによってそれをテストしました。エラーが作成中です。Bookmark：objRange = objDoc.Bookmarks（ "neil1"）を設定してください。 2013年にはうまくいきました。アップグレードに問題があり、何かが変更されました。 –
悲しいことに、Office 2010の使用を余儀なくされているので、これを実際に確認することはできません – gizlmo
「Dim objRange As Object」と書いてみてどうしたらいいですか？私はあなたが範囲としてそれを次元化していると思います。 – Vityata
このコードは2013の単語を処理していました。Word 2016は機能しません。 –
あなたはそれを試しましたか？私はWord VBAで少し前に同様の問題を抱えていました（さらにSOの質問をしました）、何とかそれを修正したことを思い出します。 – Vityata