Set doc = view.GetDocumentByKey("RKUBUN",True) ↓間違えていました。 Set doc = view.GetDocumentByKey(RKUBUN,True) RKUBUNは変数ですので、ダブルクオートでは囲みません。 (囲んでしまうと、RKUBUNという文字列として扱われます。)