我想在下面的文本段后提取评级。它可以是一个字或两个字。例如“部分满意”，“满意”。我应该使用哪种正则表达式模式？我使用这个词VBA Section 1
Partly Satisfactory
Some paragraphs inserted here
Section 2
Satisfactory
Another paragraphs inserted here
Section 3
我已经使用一个字符串列表填充了一个ComboBox，并且由于该列表相当长，我正在努力添加一个自动完成功能，比如ComboBox谁将在用户输入字符时显示匹配的字符串。 我想要的东西的想法可以在这里找到Auto-Complete with only text and not numbers ComboBox Excel VBA但它使用VBA Excel来完成。 这里是我到目前为止 Private Su
我想使用VBA从Excel内打开Word文档，并将一些表插入到文档中。这些表格填充了来自Excel的信息。 每个表似乎覆盖了前一个。 这是一个更新，我需要确保表格不在表格内形成。 THis is an example of what Is going on 我该如何避免这种情况？ Dim intNoOfRows
Dim intNoOfColumns
Dim objWord
我编写了一个脚本，通过命令行提示从程序中获取一些信息。 只要您登录到程序中，就可以获取信息，我试图从中提取信息。 这是我如何连接到程序： Set Appl = CreateObject("WScript.Shell").Exec("cmd.exe im connect")
返回（如果你没有登录）： （请注意：这是理论上的输出，如果我手动键入命令进入一个命令窗口） Connecting to <
我想建立一个宏（作为一个小白）找到某些字，然后更改该字的格式（即使其粗体或斜体） 此代码“排序的作品。“它会找到一些词语并改变它们，但不会改变其他词语。奇怪的是它是有效的，直到我添加另一个子然后它停止格式化一些单词，而格式化其他。例程永远不会中断并运行，直到最终没有错误。 任何人都可以教导为什么发生这种情况，我做错了什么？我不是程序员。谢谢 Sub Macro2()
'
' Macro2 Ma
我的标题似乎不符合可能有我的答案的问题，并且我确实从其他主题/网站找到了一些片段以帮助我获得到目前为止。我正在寻找将整个宏捆绑在一起的帮助。以下是我迄今为止： Sub Test()
Selection.EndKey Unit:=wdStory
Dim oPara1 As Word.Paragraph
Set oDoc = oWord.Documents.Add
Set oPara1
我有用户窗体'CemeaFinallist'，其中有复选框和按钮。我想用复选框名称的值作为变量= CNN在 'Normal.newmacros.minipro' 以下是用户窗体按钮脚本 Private Sub Shift_Click()
CemeaFinallist.Hide
Dim ctl As Control
Dim j As Long
For Each ctl In Me.Cont