关于ole的，吐血

Question

1、
Dim selection As Word.selection
Set selection = OLE1.object.Application.selection
selection.GoTo what:=wdGoToBook, Name:=str
selection.Font.Name = "宋体"
selection.Font.Size = 15
OLE1.object.Application.ActiveWindow.View.Type = 32、
Dim selection As Object
Set selection = OLE1.object.Application.selection
    With selection
    .GoTo what:=wdGoToBook, Name:=str
    .Font.Name = "宋体"
    .Font.Size = 15
    End With
OLE1.object.Application.ActiveWindow.View.Type = 3这两段，只有一个在一个机器上能用，令一个机器上不行，反之依然
提示没有with block哪位高手能给解释一下

Answer 1

不应该用selection作为变量！！

Answer 2

不用selection做变量，也是一样啊

Answer 3

看看两个机器上MDAO版本一样不一样.

Answer 4

引用的microsoft word ole对象版本不一样。看看是11.0 还是8.0 ，*.0 阿如果还不行，就要重装系统，再装office了