用Word自带的VB编辑器编写浏览器出现的问题

问题描述：

我想用用Word自带的VB编辑器编写浏览器，但是把VB下的代码复制到word的VB编辑器下就出错了：
Private Sub UserForm_Initialize()
WebBrowser1.Navigate ("http://www.baidu.com/")
End Sub

Private Sub WebBrowser1_NewWindow2(ppDisp As Object, Cancel As Boolean)
Dim newForm As New UserForm1
newForm.Show 0
Set ppDisp = newForm.WebBrowser1.Object
End Sub
当运行到Set ppDisp = newForm.WebBrowser1.Object
就出错：运行时错误‘438’
对象不支持该属性或方法
可是在VB6.0下运行就正常
请哪位大侠指点迷津，在下感激不尽。

问题解答：

VBA与VB是有区别的。