# Re: 试过了,还有一点问题!!

Posted by jerry on February 23, 1998 at 01:54:35:

In Reply to: 自己试看看 posted by 小吴 on February 22, 1998 at 17:39:58:

: 你到 Word 去录一段巨集来看看吧！
: 这个讨论区上有个女生从完全不会到很了解，全部都是自己试出来的。所以你先试看看吧！

我建立一个OLE连接到建立好的文件,然后:
Dim obj As Object
OLE1.Action = 7
Set obj = OLE1.object.application.wordbasic
With obj
.linedown 6
.nextcell
.nextcell
.Insert "R7060008"
.linedown 1
.Insert "26-Jun-97"
.linedown 1
.vline 8
.linedown 1
.Insert "TEXAS"
.FilePrintDefault
^^^^^^^^^^^^^^^^ 这行无法执行
End With
OLE1.Action = 9

是我使用的方法不对还是在OLE中不支援列印呢??

PS:以上的程式在WORD中均已测试过,可正确执行!!

Follow Ups:

- 嗯．．． 小吴 17:20:52 2/23/98 (0)