word-vba

    2热度

    1回答

    Crystal Reports Engine有时认为某个存储过程返回的字段实际上是money类型的字段是varchar 255?因此,我无法应用任何数字格式。

    0热度

    2回答

    在我的文档中,我有称为“小”的表格样式。这里是宏,这将在这种风格的每个表改变字体大小: Sub FormatTables() Dim t As Table For Each t In ActiveDocument.Tables If t.Style = "Small" Then t.Range.Font.Size = 8 End If

    1热度

    2回答

    我需要从PHP执行TCL脚本。目前我使用以下代码 <?php echo passthru("tclsh83 Testcases/source.tcl "); ?> 这是行得通的。但是这会为每个呼叫创建一个shell。我如何打开一个shell并且从TCL脚本来回通信。任何指针将不胜感激。 问候, 大额牛

    1热度

    2回答

    我有一个模板,它有一个包含图片标题的页面。我想将这些图像复制到我的ActiveDocument。我正在使用下面的代码: Set doc = ActiveDocument strTemplate = "C:\Users\rajtilak\Desktop\Report.dotx" Set docTemplate = Documents.Open(strTemplate) Set hdr1 = d

    0热度

    1回答

    我有4列,每列有2组复选框,我正在寻找循环遍历每个集合,并检查两个复选框是否都被选中,如果它们然后退出子集并且将该项目的名称与在msgbox中的一组中选中的2个复选框进行检查。 Set oRow = oTable.Rows Set oTable = doc.Tables(3) For Each oRow In oTable.Rows With oRow If .Cells

    1热度

    1回答

    我试图使用Application.DisplayAlerts = wdAlertsNone或Application.DisplayAlerts = False在我的剧本,以避免到有字弹出消息“被保存的文档包含轨道变化继续保存吗?”只字VBA脚本之前保存一个word文档。但它不起作用。该消息仍然存在。 这里我的脚本: Private Sub CreateReportButton_Click()

    2热度

    1回答

    我想在Word文档中找到ole对象,而且它似乎在InlineShapes(1).GroupItems。但不能访问组项目,因为它给我错误。 Sub findOle() Dim shp As GroupShapes Dim c As Integer Set shp = ActiveDocument.InlineShapes(1).GroupItems End Sub

    1热度

    5回答

    我只是想知道如何根据数字字段更新(删除/插入)文档。 到目前为止,我这样做: LuceneManager.updateDocument(writer, new Term("id", NumericUtils.intToPrefixCoded(sentenceId)), newDoc); 但现在使用Lucene 4.0 NumericUtils类已更改为this,我真的不明白。 有什么帮助吗?

    0热度

    1回答

    我定期从各种客户端获取Word文档,有时他们会以“只读”模式将它们发送给我。虽然手动转到“查看”>“编辑文档”并不是什么大事,但我似乎无法找到如何在我的VBA代码中执行此操作。 将文档打开为可编辑状态,或者在文档打开时将其切换为可编辑文档将足以满足我的需求。 请注意,我无法使用'readOnly = false'打开文档,因为它看起来像设置为'readOnly recommended'(基于我阅读

    0热度

    1回答

    我有一个包含员工数据和Word模板的Excel文件。我将邮件合并并创建了一个宏,它向我询问员工姓名,并根据姓名从Excel文件中将该员工的员工详细信息提取到Word文件。 如果记录来自Excel工作表的顶部到底部,宏能够检索记录。但是,任何高于当前检索记录的记录都不会被抓取。这真是一个麻烦。能否请你帮忙? 下面是我的代码: Sub getdata() Dim numRecord As Integ