word vba 标红 vba word 光标位置

excel vba怎么把省市名标红

获取标题与正文使用style。

试验一下如下代码。

Sub Test()Dim i As SingleFor i = 1 To ActiveDocument.BuiltInDocumentProperties(wdPropertyLines).ValueWith Selection.GoTo What:=wdGoToLine, Which:=wdGoToAbsolute, Count:=i.HomeKey Unit:=wdLine.EndKey Unit:=wdLine, Extend:=wdExtendEnd WithIf Selection.Style = ＂正文＂ ThenMsgBox i &amp； ＂行是正文＂End IfIf Selection.Style = ＂标题 1＂ ThenMsgBox i &amp； ＂行是标题 1＂End IfNextEnd Sub

在Word中如何用VBA实现只将数字后面的句号。

全变成上标比如5

Sub test() Dim fso, fp, arr, wd, f, n%, fname$ Set fso = CreateObject(＂scripting.filesystemobject＂) Set fp = fso.getfolder(ThisWorkbook.Path) ReDim arr(1 To fp.Files.Count, 1 To 2) arr(1, 1) = ＂文件号＂： arr(1, 2) = ＂标题＂ Set wd = CreateObject(＂word.application＂) n = 1 For Each f In fp.Files If Right(f, 3) = ＂doc＂ Or Right(f, 4) = ＂docx＂ Then n = n + 1: arr(n, 1) = fso.getbasename(f) fname = fso.getfilename(f) With wd.Documents.Open(ThisWorkbook.Path & ＂\＂ & fname, True, True) wd.Visible = True arr(n, 2) = .Paragraphs(2).Range .Close End With End If Next wd.Quit Sheets(1).[a1].Resize(UBound(arr), UBound(arr, 2)) = arrEnd Sub现在有一个文件夹下有N个Word文件，要将他们的文件名和文档内的第二段提取到Excel表格，如何通过VBA实现...

excel 的发展历史

1982年 Microsoft推出了它的第一款电子制表软件-Multiplan，并在CP/M系统上大 Excel 获成功，但在MS-DOS系统上，Multiplan败给了Lotus1-2-3（一款较早的电子表格软件）。

这个事件促使了Excel的诞生，正如Excel研发代号DougKlunder：做Lotus1-2-3能做的，并且做的更好。

1983年9月 比尔盖茨召集了微软最高的软件专家在西雅图的红狮宾馆召开了3天的“头脑风暴会议”。

盖茨宣布此次会议的宗旨就是尽快推出世界上最高速的电子表格软件。

1985年 第一款Excel诞生，它只用于Mac系统，中文译名为“超越”。

1987年 第一款适用于Windows系统的Excel也产生了（与Windows环境直接捆绑，在Mac中的版本号为2.0）。

Lotus1-2-3迟迟不能适用于Windows系统，到了1988年，Excel的销量超过了1-2-3，使得Microsoft站在了PC软件商的领先位置。

这次的事件，促成了软件王国霸主的更替，Microsoft巩固了它强有力的竞争者地位，并从中找到了发展图形软件的方向。

此后大约每两年，Microsoft就会推出新的版本来扩大自身的优势，目前Excel的最新版本为11，也被称作Microsofot Office Excel2003。

早期，由于和另一家公司出售的名为Excel的软件同名，Excel曾成为了商标法的目标，经过审判，Microsoft被要求在它的正式文件和法律文档中以MicrosoftExcel来命名这个软件。

但是，随着时间的过去，这个惯例也就逐渐消逝了。

Excel虽然提供了大量的用户界面特性，但它仍然保留了第一款电子制表软件VisiCalc的特性：行、列组成单元格，数据、与数据相关的公式或者对其他单元格的绝对引用保存在单元格中。

Excel是第一款允许用户自定义界面的电子制表软件（包括字体、文字属性和单元格格式）。

它还引进了＂智能重算＂的功能，当单元格数据变动时，只有与之相关的数据才会更新，而原先的制表软件只能重算全部数据或者等待下一个指令。

同时，Excel还有强大的图形功能。

1993年 Excel第一次被捆绑进Microsoft Office中时，Microsoft就对Microsoft Word和Microsoft Powerpoint的界面进行了重新设计，以适应这款当时极为流行的应用程序。

从1993年，Excel就开始支持Visual Basic for Applications(VBA).VBA是一款功能强大的工具，它使Excel形成了独立的编程环境。

使用VBA和宏，可以把手工步骤自动化，VBA也允许创建窗体来获得用户输入的信息。

但是，VBA的自动化功能也导致Excel成为宏病毒的攻击目标。

1995年 Excel被设计为给您所需要的工具。

无论您是做一个简单的摘要、制作销售趋势图，还是执行高级分析，无论您正在做什么工作，Microsoft Excel能按照您希望的方式帮助您完成您的工作。

1997年 Excel97是Office97中一个重要程序，Excel一经问世，就被认为是当前功能强大、使用方便的电子表格软件。

它可完成表格输入、统计、分析等多项工作，可生成精美直观的表格、图表。

为日常生活中处理各式各样的表格提供了良好的工具。

此外，因为Excel和Word同属于Office套件，所以它们在窗口组成、格式设定、编辑操作等方面有很多相似之处，因此，在学习Excel时要注意应用以前Word中已学过的知识。

2001年 利用Office XP中的电子表格程序--Microsoft Excel2002版，您可以快速创建、分析和共享重要的数据。

诸如智能标记和任务窗格的新功能简化了常见的任务。

协作方面的增强则进一步精简了信息审阅过程。

新增的数据恢复功能确保您不会丢失自己的劳动成果。

可刷新查询功能使您可以集成来自Web及任意其他数据源的活动数据。

2003年 Excel2003使您能够通过功能强大的工具将杂乱的数据组织成有用的 Excel 信息，然后分析、交流和共享所得到的结果。

它能帮助您在团队中工作的更为出色，并能保护和控制对您工作的访问。

另外，您还可以使用符合行业标准的扩展标记语言（XML），更方便地连接到业务程序。

2007年 1.由于在2003中显示活动单元格的内容时，编辑栏常会越位，挡到列标和工作表的内容。

特别是在编辑栏下面的单元格有一个很长的公式，此时单元格内容根本看不见，也无法双击、拖动填充柄。

而现在2007中以编辑栏上下箭头（如果调整编辑栏高度，则出现流动条）和折叠编辑栏按钮完全解决此问题，不再占用编辑栏下方的空间。

调整编辑栏的高度，有两种方式——拖曳编辑栏底部的调整条，或双击调整条。

调整编辑栏的高度时，表格也随之下移，因此表里的内容不会再被覆盖到，同时为这些操作添加了快捷键（CTRL+SHIFT+U），以便在编辑栏的单行和多行模式间快速切换。

2.2003的名称地址框是固定的，不够用来显示长名称。

而2007则可以左右活动的，有水平方向调整名称框的功能。

用户可以通过左右拖曳名称框的分隔符（下凹圆点），来调整宽度，使其能够适应长名称。

3.2003编辑框内的公式限制还是让人恼火的，2007有几个方面增加了改进。

1、公式长度限制（字符），2003版限制：1K个字符，2007版限制：8k个字符；2、公式嵌套的层数限制，2003版限制：7层，2007版限制：64层； 3、公式中参数的个数限制：2003版限制：30个，2007版限制：255个。

从5.0到9.0,Excel中都隐...

转载请注明出处51数据库 » word vba 标红