youthon的专栏

用宏录制，就能看见实现代码以下为delphi实现放大字体procedure ZoomInFontSize();var doc: _Document; I: Integer; KeyType, ExtParam: OleVariant;begin if FZooming then Exit; FZooming := True; doc

Java利用OpenOffice将word等office文档转换成PDF 1. 需要用的软件    OpenOffice 下载地址http://www.openoffice.org/    JodConverter 下载地址http://sourceforge.net/projects/jodconverter/files/JODConverter/，也可以直接从附件里面下载

判断 xls文档的 Office 版本   office97、office2000、officeXP(2002)、office2003、office2007的开发版本号依次是：8.0、9.0、10.0、11.0、12.0    MsgBoxThisWorkbook.CalculationVersion 获取一个数字，该数字指示上次对工作簿进行完全重新计算的 Excel的版本。   最右

Word Events 在Word中只有Application object和Document object响应事件: Events With Application object : NewDocument,  DocumentOpen, DocumentBeforeClose,  DocumentBeforePrint,  DocumentBeforeSave Wind

采用OLE的方式实现word转换为文本等格式function WordToTxt( sDocFile: string ): string;var WordApp: Variant;begin WordApp := CreateOleObject( 'Word.Basic' ); if not VarIsEmpty(WordApp) then begin

VBA：主界面_复制等快捷键_右键菜单____禁用/恢复　　请 hnymx2005 兄试试以下代码：'查找需要的窗口Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" _        (ByVal lpClassName As String, ByVal lpWindowName As

前些天研究了使用word插件实现一些业务逻辑的方式，需要javascript里直接调用word插件上网查了好长时间都没找到，后来是一位同事查到了解决方法，在这里分享给大家1、在word插件的onConnection事件里设置插件对象的object属性，我是用delphi写的procedure TWordTest.OnConnection(const Application: I

单元格设置1.设置单元格线框Excel.ActiveSheet.Range[B10:C13].Borders[N].LineStyle := xlNoneExcel.ActiveSheet.Range[B10:C13].Borders[N].Weight := xlThin边框的类型 Borders[N]xlEdgeLeft 左=1xlEdgeRight 右=2xl

出现RPC服务器不可用的情况现遇到的主要有：1、对象被外部关闭（如通过任务管理器关闭）2、操作对象访问控制不得当，循环连续访问或线程间访问会引起RPC服务器不可用的问题。解决方法为控制连续访问的频度，及在N次访问后做一些其它的处理，如在Word文档中移动一下光标的位置，再继续处理。线程间访问比较容易解决。3、如果引用的Office操作库版本不一致，也会在一些机器上引起RPC服务器不

前一阵实现了word转换为图片的功能，研究了可行的方式，整理了一下。有不完整的地方还请大家补充。：）1 利用word的复制到剪切板，格式为图片    选中每一页，使用word的页面操作函数等方式，选中每一页，调用copytoclipboard方法复制到剪切板，其中就有图片格式，粘贴为图片即可。    优点：实现方式简单，效率高；    缺点：在调用此功能时，用户及其他程序不能使

开发WPS插件，着急找工具栏的名称找不到，后来偶然找到了，共享一下（其实通过程序也能枚举）菜单名中文名Menu Bar菜单栏Shortcut Menus快捷菜单Standard常用Formatting格式Tables And Borders表格和边框Header And Foot