我正在填写一个Word模板,其中包含从用户输入中收集的数据.特别地,选择(可变)数量的文档,并且关于每个文档的信息填充表格的一行.
我已经为模板中的几个项目添加了书签,并成功填写了我的宏标题中的信息,但是我不太确定.我为第一个单元格添加了书签并尝试使用tab(使用Chr(9)),并尝试传递数组.(在模板中,表只有第一行.通常在最后一列之后标记会创建一个额外的行.)
我可以用细胞内容物来回收细胞
Word.Application.ActiveDocument.Tables(1).Cell(3, 1).Range.Text
但不能写入除第一个之外的任何单元格,我放置了一个书签.
任何人都可以提供填充表格的可能解决方案吗？
这个问题从我在此问过的上一个问题继续.我正在使用建议的修复程序来检查Excel文件是否从Outlook宏(Office 2010)本地打开,但它没有按预期运行.这是我的代码可能会失败.
Public Sub UpdateFileIndex(ByVal FullFilePath As String, ByVal DocNo As String)
Dim xlApp As Excel.Application
Dim xlBook As Excel.Workbook
Dim xlSheet As Excel.WorkSheet
On Error Resume Next
Set xlApp = GetObject(FullFilePath).Application
Debug.Print "Error = " & Err
If Err.Number = 0 Then ' Workbook is open locally
' Do stuff
ElseIf Err.Number = 429 Then ' Workbook is not open locally
' Do different stuff
End If
' Do a bunch of other stuff
End …我正在从SolidWorks运行VBA宏.该表单兼作两种文档的输入.在UserForm.Initialize子例程中,我正在Caption根据打开的文档类型更改UserForm的名称.每当我这样做时,程序会重新运行UserForm.Initialize,当它完成后,它会从它离开的地方继续运行,有效地运行两次.
有没有人知道解决这种奇怪行为的方法？我尝试将命令放入自己的Sub中,但结果是一样的.FormName.Caption
非常感谢.