VB读取WORD表单元内问题
非常诡异啊,撒了泡尿回来,之前还能读取的就不行,哪里错了?
Dim WordApp As Word.Application
Dim WordDoc As Word.Document
txtIn.Text = ""
With cdgImput
.DialogTitle = "导出文件路径"
.Filter = "导出文件(*.doc)|*.doc|所有文件(*.*)|*.*"
.ShowOpen
txtIn.Text = .FileName
strFileName = .FileTitle
End With
Set WordApp = CreateObject("Word.Application")
Set WordDoc = Documents.Open(txtIn.Text)
WordApp.Visible = True
WordDoc.Activate
With Selection.Tables(1)'运行到这里错误
MsgBox .Cell(2, 1).Range.Text
End With
集合所要求的成员不存在,可是表明明就在的，刚才还能读,没对表做任何其他操作
是否有其他打开或使用？
也可能系统不稳，重启可能就好了
是不是word开着?
重启过多次，其他WORD也没开着，实在是搞不懂
我测试了，你没有在word文件中选中表导致的，选中就不会提示
问题出在：With Selection.Tables(1)
其实，操作WORD无需引用对象，直接参考以下代码即可：
Dim wd As Object
Set wd = GetObject("d:\xx.doc")
再通过wd.tables(1)操作表。
如需要阅读该回复，请登录或注册CSDN!
相关问答：
Printer.ScaleMode = 6
6表示毫米
Printer.PaperSize = vbPRPSA4
'初始坐标
x = 1
y = 4
'最大的线筐
Printer.DrawStyle = 0
Printer.Line (x, y)-(x + 132.5, y) ......
比如进程加载新的程序。
在其运行之前阻止。
然后允许后放行。
比如程序主文件路径是c:\test\test.exe，建立内容任意的文件c:\test\test.exe.manifest。
就是不知道程序文件路径。
设� ......
vb写的程序编译后,运行若出错,如何知道到在哪一行?
按Ctrl+F5预编译，出错时会跳转到错误行
不是那样的了,我是要求编译成EXE后运行,提示出错能否提示错在哪一行.
我编译后在我的电脑上运行没问题,但� ......
"insert into user1(name,age) values('" & Text1.Text & "','" & Text2.Text & "' )"
问题：对sql语句中单、双引号模糊。既然 Text1.Text就表示 ......
在vb这编程里似乎有很多的东西是相联系的，为什么有些人对vb的编程摸不到头脑啊！并且有些事很容易的，但是却把它们的代码变成复杂，也去想一些不能实现的东西啊！
没分了，楼主多来点分！
来接点分
......
