在MS Word文档中插入唯一ID

Question

请求帮助VBA noob。

我们正在用MS Word编写需求规范，然后通过JIRA中的测试用例进行测试。我想通过在MS Word中创建唯一ID来识别每个要求。

因此我正在寻找一个插入例如基于MS Word文档中当前位置的用户输入的5位唯一ID。

提前致谢:-) 奥维德的 99

Answer 1

以下几行向您展示如何创建可附加到测试用例的唯一GUID：

Sub Test()

    Dim GetGUID As String
    GetGUID = Mid$(CreateObject("Scriptlet.TypeLib").GUID, 2, 36)

    MsgBox GetGUID

End Sub

该示例仅生成GUID并将其显示在消息框中以用于演示目的。