> objA = WebBrowser1.Document.frames(2).body.All.tags("A")> objLink = objA.Item(7) この2行、それぞれに Set がいるのでは? Set ObjA = Web〜 Set objLink = objA.〜