请问各位大虾：如何在vb中读取word文档信息，如其中某一段文字的字体等，

[mxfeng]

请问各位大虾：如何在vb中读取word文档信息，如其中某一段文字的字体，
其中一个表格的信息如行数，列数。等等。
高分相送，决不失言。
email：[e-mail]
qq :58481671
tel :[phone]

[pyf1027]

这个问题好像有点难，帮你顶一下！

[liyan010]

很难~
偶帮你up，如果你收到了，转发一个给我吧，呵呵
[e-mail]

[lxcc]

MsgBox Selection.Font.Name
MsgBox ActiveDocument.Tables(1).Rows.Count
MsgBox ActiveDocument.Tables(1).Columns.Count

[lxcc]

Selection.Font.Name
字体名称

ActiveDocument.Tables(1).Rows.Count
第一个表格的行数

MsgBox ActiveDocument.Tables(1).Columns.Count
第一个表格的列数


Tables(1)中的1表明表格插入的顺序，而不是位置上下决定的

[射天狼]

工程->引用->Microsoft Word 9.0 Object Library(后面为版本号)

到WORD中录制宏看看吧!!

[mxfeng]

我再说明一下，我的work文档是已经生成完毕的哦，
请虫子大哥再仔细说明一下,你说的那些是对什么进行操作啊？请具体一点
射天狼大哥你说的那个部件我选择以后，怎么在任何地方也看不到它呢，它在那啊？（工具箱？还是什么地方啊？）
附带问题：如何用vb调用word打开以有的word文档，并重新保存成html格式的文件。
小弟加赠100分。

[mxfeng]

虫子大哥，再等一等我给你发分，不知为什么我的可用分只有110了，我全部奉献给本问题的参与者。
在问一句，我对VBA开发一翘不同，请问Word.Application是如何定义的。

[lxcc]

'引用Microsoft Word X.0 Object Library
就可以定义Word.Application

其实引用是导入word的ActiveX dll，使其能在VB工程中word的ActiveX对象。具体操作可以查看有关VBA操作，录制宏只是其中最简单的方法，Office对象复杂的很，慢慢研究吧

[lxcc]

'引用Microsoft Word X.0 Object Library //在任何地方也看不到它呢，它在那啊？（工具箱？还是什么地方啊？）是看不到的

Public wrd As Word.Application

Public Function WriteOldWord(strDocPath As string)
On Error Resume Next
Set wrd = GetObject(, "Word.Application")
If Err.Number <> 0 Then
Set wrd = CreateObject("Word.Application")
End If
Err.Clear
On Error GoTo 0

Dim doc As String

doc = strDocPath

wrd.Documents.Open FileName:=doc, ConfirmConversions:=False, ReadOnly:=True, AddToRecentFiles:=False, _
PasswordDocument:="", PasswordTemplate:="", Revert:=False, _
WritePasswordDocument:="", WritePasswordTemplate:="", Format:= _
0
wrd.Visible = True

End Function

’关于Word的操作，可以用Word的工具菜单下的宏……》录制新宏，然后你可以作一系列操作，停止录制后，查看宏并编辑可以看到宏代码（你的一系列操作的VBA代码）

[mxfeng]

各位大虾和虫子大哥，小弟给你们结帐了，谢谢你们啊！
麻烦你们谁要是好的VBA方面的书，或相关资料一定要发给我啊
email：[e-mail]
qq :58481671
tel :[phone]

[mxfeng]

有好书千万给我介绍几本啊，
小弟的学位就靠这项目了，