word中最多能输入几个word搜索关键字字

来源：蜘蛛抓取(WebSpider) 时间：2016-03-21 09:01 标签： word怎么查找关键字
怎样在WORD中找出现最多的字，关键字。_百度知道
怎样在WORD中找出现最多的字，关键字。
我有更好的答案
你明显的是在制作论文的关键词。根本不用word去找，自己把文章中的主要要表达的几个概念列出来就可以了。
可能没得自动的操作办法，只有自己看看，手动来搜一下作个比较
在编辑 查找里面还可以把查找的东西替换掉的
其他类似问题
为您推荐：
关键字的相关知识
等待您来回答
下载知道APP
随时随地咨询
出门在外也不愁搜索乐江word2010文档中的一个关键词进行改变可以使用开始选项卡中的什么命令_百度知道
搜索乐江word2010文档中的一个关键词进行改变可以使用开始选项卡中的什么命令
搜索乐江word2010文档中的一个关键词进行改变可以使用开始选项卡中的什么命令
3.单击“查找下一处”或“查找全部”.在“查找内容”框内键入要查找的文字.单击“编辑”菜单中的“替换”命令, 在“替换为”框内输入替换文字。 21
来自团队：
其他类似问题
为您推荐：
其他1条回答
在“查找内容”框内键入要查找的文字..单击“查找下一处”或“查找全部”,后., 在“替换为”框内输入替换文字.单击“编辑”菜单中的“替换”命令。 3。 21
等待您来回答
下载知道APP
随时随地咨询
出门在外也不愁查看: 5292|回复: 5
在word中怎么才能同时搜索多个关键字？
阅读权限10
在线时间 小时
假如在一个长文档中，查找“精益生产”，“消防”，“生产规模”三个关键字，这些关键字又不能相隔太远，要全部出现在连续的300个字符的文字内，并且不一定按顺序出现。例如在下面的一段话中：
-----------------------------------------------------------
主要设计原则
1、推行精益生产理念作为设计出发点，合理组织车间物流系统，以“降低生产成本，提高产品质量”为中心任务，做到在制品最少、物流成本最低，实现企业利润的最大化。
2、工艺方案的制定和设备选型力求与产品技术要求相适应，与生产规模相协调，针对产品工艺特点、技术要求，新增设备力求高起点、高水平、高质量；加强工序间检测和最终检测，有效控制产品质量。
3、主体厂房采用钢结构，以缩短施工周期，确保在较短的时间内完成建设。同时考虑工厂将来的发展性、适用性。
4、按照环境保护、劳动安全卫生和消防要求，对废气、废水、噪音等污染源及危害劳动安全卫生的不利因素，遵照“三同时”的原则，采取相应的治理措施，以符合国家和地方的有关法规。
-------------------------------------------------------------
我发现查找功能不具备这样的功能，请教如何实现？
word版本:2010
阅读权限20
在线时间 小时
要是一项功能啥都能实现 大家还编什么程
阅读权限20
在线时间 小时
建议分开查找并使用阅读突出显示。
三个可以一起查找，要加[]，问题是可能不是词组，而是单个的字。
阅读权限50
在线时间 小时
勾选通配符，查找输入以下内容，可以查找楼主的连续字符
(精益生产)*(生产规模)
阅读权限10
在线时间 小时
好象没什么人注意到我的问题，想了一上午，我自己写了段程序草稿出来，基本能达到所需功能，但程序效率太低，一个千页文档要花5分钟以上才能执行完程序，不具有实用价值，请有心人指教下。程序代码如下：
Public Sub mySearch()
ScreenUpdating = False
Dim findString As String
findString = InputBox(&输入要查找的内容&, &包括&, &&)
'-------------
'抽取查找内容的单字给数组
Dim myArray() As String
Dim cou As Long
Dim findStringLen As Long
findStringLen = Len(findString)
ReDim myArray(1 To findStringLen)
For cou = 1 To findStringLen Step 1
& & myArray(cou) = Mid(findString, cou, 1)
'------------------------------
Dim carCout As Long
carCout = ActiveDocument.Characters.count '文档所含字数
'-----------------------------
Dim carStart As Long
Dim carEnd As Long
carStart = 0
carEnd = 0
Dim myRange As Range
Dim myString As String
Dim logic1 As Boolean
Dim logic2 As Boolean
logic1 = True
logic2 = True
Do While carEnd & carCout
& & carEnd = carStart + 100
& & Set myRange = ActiveDocument.Range(Start:=carStart, End:=carEnd)
& & myString = myRange.text
& & 'Debug.Print myString
& && && &For cou = 1 To findStringLen Step 1
& && && &&&If InStr(1, myString, myArray(cou), 1) & 0 Then
& && && && && &logic1 = True
& && && &&&Else
& && && && && &logic1 = False
& && && &&&End If
& && && &&&logic1 = logic1 And logic2
& && && &&&logic2 = logic1
& && && &&&Debug.Print logic1
& && &&&Next cou
& & If logic1 = True Then myRange.HighlightColorIndex = wdYellow
& & carStart = carStart + 1
& & logic1 = True
& & logic2 = True
Loop
ScreenUpdating = True
End Sub
复制代码
阅读权限10
在线时间 小时
感谢分享了
玩命加载中，请稍候
玩命加载中，请稍候
Powered by
本论坛言论纯属发表者个人意见，任何违反国家相关法律的言论，本站将协助国家相关部门追究发言者责任！ & & 本站特聘法律顾问：徐怀玉律师 李志群律师（词条-相关词数量）
（推荐度-词条-相关词数）word提炼关键字如题，就是把文章中出现最多的词提炼出来
这小伙n1ce508
建议你用OFFICE2007,word选项卡，在常用标签下有个《在功能区显示“开发工具”先项卡》项，打勾，如图，在最上面的发工具标签，插入一个BUTTON，用VB编一个简单的方法就可以。
为您推荐：
安装wps，然后装个词频统计插件，就可以按词语出现字数统计了
扫描下载二维码

我要回帖

更多关于 word怎么查找关键字 的文章

 

随机推荐