SmileMoon's Home

开发程序来对Word文档进行操作有多种方式实现，我利用的一种方式是通过MS office Word的API调用WINWORD程序。通过这种方式需要在项目中引用COM组件Microsoft.Office.Interop.Word.dll。这里有一个版本的问题。Microsoft.Office.Interop.Word的大版本有两个，一个是12.0.0.0，一个是15.0.0.0。12.0的对应Word 2007,15.0的对应Word 2013。引用12.0版本可以支持Word 2007和Word 201

原因是 mathtype 粘贴公式自动重复 禁止加载即可禁止加载办法https://blog.youkuaiyun.com/dss875914213/article/details/85873938

vsto 安装成功后打开office word不加载

我一直在为此喋喋不休,似乎无法想出一个解决方案.我必须通过通配符搜索自定义标记从头到尾搜索文档.为了这个问题,我们会说{something}当我找到一个特定的匹配时,它会被另一个字符串的内容替换,该字符串也可能包含标记.标记必须按照它在最终文档中出现的顺序进行替换.我必须知道每次替换所做的递归级别.这基本上就是我提出的.请注意,ProcessReplacement函数是为示例设计的 – 文本被...

from:https://blog.youkuaiyun.com/winnyrain/article/details/9630777原来的WORD文档内容是这样的：1、硬盘出厂后必须经过格式化才能使用。2、显示器是由监视器与显示适配卡两部分组成的。.......内容类似于带考试试卷上答案的填空题。目前的需求是把答案部分留空，并设置下画线，然后把答案列到后面以括号括起来，最终结果为这样：1、硬盘出厂...

Sub 替换下划线() Selection.HomeKey wdStory Selection.Find.ClearFormatting Selection.Find.Font.Underline = wdUnderlineThick Selection.Find.Replacement.ClearFormatting 'Selection.Find.Re...

要将word文档的每页单独保存为一个word文档，首先需要能够逐页遍历word文档。逐页遍历word文档可以使用word的定位功能。代码如下：Sub SplitToOnePage() Const wdNumberOfPagesInDocument = 4 Const wdGoToPage = 1 Const wdGoToAbsolute = 1 Di...

通过VBA来完成粘贴操作，在Excel中，我们可以和平常使用鼠标的操作一样，可以选择只粘贴数值还是连格式一起粘贴。　　下面，就给大家介绍PasteSpecial Paste对象的各种参数，并给出相应的例子供大家参考。　　当然，我们得通过Range对象的PasteSpecial方法来完成。　　参数「Operation」的值的列表如下（默认值是xlPasteSpecialOperation...

Sub TablLine3() ' 三线表格式设置 Selection.Borders(wdBorderTop).LineStyle = wdLineStyleNone Selection.Borders(wdBorderLeft).LineStyle = wdLineStyleNone Selection.Borders(wdBorderBottom).Line...

1、vsto写的vbe插件需要信任工程，建议仅限个人使用，不要用于开发商业插件，避免造成安全问题。2、真正的VBE插件是不需要vsto支持的，因为VBE对象与office的Excel、Word等应用对象没有什么关系，通过Application.VBE来操作vbe是进错门了。3、二楼的代码没有考虑非托管资源的释放，请在此基础上做二次开发的注意这个问题。某些特殊情况下，GC会无法管理丢失引用的Co...

VBA内部有许多有用的内建函数，但对于好些常规任务(或常见的问题)仍然需要编写自定义函数，这些问题是比较通用的。如检查一个文件是否存在等。这里包括了6个非常有用自定义VBA函数，你可以简单的复制这些代码到你的模块中，以备方便调用。这些函数包括：FileExists：检查一个文件是否存在– Returns TRUE if a particular file exists.FileNam...

双击曲线，在出来的“绘图属性”窗口中找到“垂直线”，将其中的“数据点显示控制”做修改，提高密度就将n设小，降低密度就将n设大。

上文介绍的是手动查看office软件是32位还是64位，如果要在vba中判断当前使用的office软件是32位还是64位，可以使用如下的最简单的代码判断：Sub QQ1722187970() Dim sText As String sText = Environ("PROCESSOR_ARCHITECTURE") Debug.Print sText If sT...

命令栏对象为CommandBar。在office中命令栏包含有菜单栏、工具栏。由于excel 2007版本开始，微软用ribbon代替了原来常用的菜单栏、工具栏。所以很多菜单栏、工具栏都已经不存在了，但是有些还是有使用价值的，比如单元格右键菜单栏。所有的菜单栏、工具栏集合在一起，构成了CommandBar集合对象。如果要在vba中操作具体的命令栏，可以使用CommandBars ( in...

Sub delMbar()Dim mxlb As Stringmxlb = Environ("appdata") & "\microsoft\excel\*.xlb"If Dir(mxlb) <> "" ThenKill mxlbEnd IfEnd Sub

看到这个题目，很多人可能会说：添加工作表需要解释吗？连VBA小白都会用呀！没错，大家可能经常用到，但是大家是否都知道下面的用法呢，可能还真不一定呦！VBA添加工作表的代码看起来确实很简单。Worksheets.Add语法格式也很简单，前两个参数用于指定工作表插入的位置，第3个参数指定插入的工作表的数量，第4个参数指定插入的工作表的类型，MSDN帮助中...

Sheet、Worksheet、Sheets、Worksheets在Excel是有区别的。1、Worksheet仅代表工作簿中的工作表，Sheet可以是工作表，也可以是其它类型的工作表，例如图表工作表、Excel 4.0宏工作表（也称作XLM文件）和Excel 5.0对话框工作表（允许创建自定义对话框）。图表工作表是占用了整个工作表的图表，而不是插入作为工作表一部分的图表。2、顾名思...

这个问题似乎以前碰到过，不过记不太清了。程序重新生成，提示错误：在证书存储区中找不到清单签名证书。可能是之前部署的程序证书被我删掉了或是证书过期了，结果出现这个问题。解决方案如下：方案1：右击项目属性—>签名—>为ClickOnce清单签名，将勾掉的选项去掉。方案2：在签名中创建一个新的签名。方案3：记事本打开相应的csproj文件，调整节点值。<SignMa...

方法11.首先插入对勾“√”：(有两种方法):...."1"...  插入→特殊符号→数学符号→√...."2"... 软键盘中找到数学符号   2.选中对勾, 格式 →中文版式→带圈字符→圈号→□3.最后就得到:方法2  在word中 ctrl+F9 在{}里输入 eq \o(A,B) 即可 注意eq与\之间的空格就得到...

目前主流的五款思维导图软件PersonalBrain算是另类软件，适合做非常大的整理，推荐连续多年使用。（多语言，含简中）其它四款是正常的导图软件其中Mindjet是目前全球用的最广的（商业用途）（汉化破解版）imindmap是最接近思维导图原始理论和思路的（也是导图创始人代言和推荐的）（主打手绘效果）（多语言，含繁体中文）MindMapper(多数个人用途）（汉化破解版）Xmind(...

没有页眉的页插入页眉，然后点开页眉，在编辑状态下，在页面的左侧画好装订孔，关闭页眉，此页眉所在的小节（若次小节与其它小节不同不关联的话）都有了装订孔。哈哈，很简单，希望对大家有帮助。 ...