用于提取表单数据的 VBA API

TGK_isAdHocTemplate

元素	描述
语法	dim bRes as boolean bRes = Application.run("Tgkrmacro.xlam!TGK_isAdHocTemplate", WORKBOOK)
描述	确定指定的表单是否为临时表单模板。
参数	- WORKBOOK。与待检查表单对应的工作簿对象。
返回值	如果当前表单是临时表单的结构，则为 TRUE；否则为 FALSE。

TGK_isNavigated

元素	描述
语法	dim bRes as boolean bRes = Application.run("Tgkrmacro.xlam!TGK_isNavigated", WORKBOOK)
描述	确定指定的表单是否为以导航模式打开的表单。
参数	- WORKBOOK。与待检查表单对应的工作簿对象。
返回值	如果当前表单是以导航模式打开的表单，则为 TRUE；否则为 FALSE。

TGK_isAdHocNavigated

元素	描述
语法	dim bRes as boolean bRes = Application.run("Tgkrmacro.xlam!TGK_isAdHocNavigated", WORKBOOK)
描述	确定指定的表单是否为以导航模式打开的临时表单模板。
参数	- WORKBOOK。与待检查表单对应的工作簿对象。
返回值	如果当前表单是以导航模式打开的临时表单，则为 TRUE；否则为 FALSE。

TGK_isDataEntry

元素	描述
语法	dim bRes as boolean bRes = Application.run("Tgkrmacro.xlam!TGK_isDataEntry", WORKBOOK)
描述	确定指定的表单是否为以数据录入模式打开的表单。
参数	- WORKBOOK。与待检查表单对应的工作簿对象。
返回值	如果当前表单是以数据录入模式打开的表单，则为 TRUE；否则为 FALSE。

TGK_isReport

元素	描述
语法	dim bRes as boolean bRes = Application.run("Tgkrmacro.xlam!TGK_isReport", WORKBOOK)
描述	确定指定的工作簿是否为表单。
参数	- WORKBOOK。与待检查表单对应的工作簿对象。
返回值	确定指定的工作簿是否为表单；否则为 FALSE。

TGK_getReportCode

元素	描述
语法	dim sCodice as string sCodice = Application.run("Tgkrmacro.xlam!getReportCode", WORKBOOK)
描述	确定作为参数处理的工作簿所关联表单的代码。
参数	- WORKBOOK。与待获取代码的表单对应的工作簿对象。
返回值	表单代码，如果表单是临时的或指定的工作簿不是表单，则为空字符串。

TGK_getReportProcess

元素	描述
语法	dim sCodice as string sCodice = Application.run("Tgkrmacro.xlam!getReportProcess", WORKBOOK)
描述	确定用户通过作为参数指定的表单执行数据录入所针对的流程的代码。
参数	WORKBOOK：与待获取代码的表单对应的工作簿对象。
返回值	流程代码，如果表单未以数据录入模式打开，则为空字符串。

TGK_getUserName

元素	描述
语法	dim sCodice as string sCodice = Application.run("Tgkrmacro.xlam!getUserName")
描述	确定当前用户的名称。
参数	无
返回值	当前用户名，如果用户未登录，则为空字符串。

TGK_getReportCodes

元素	描述
语法	dim arrCodici arrCodici = Application.run("Tgkrmacro.xlam!getReportCodes", [COD_NODO], [COD_PROCESSO], [COD_FASE])
描述	确定标识与维度树中表单组给定节点相关的表单的代码列表。
可选参数	- COD_NODO：如果指定了此参数且不是空字符串，函数返回标识与该节点相关的表单的代码列表，否则返回标识与维度树中表单组节点相关的所有表单的代码列表。 - COD_PROCESSO：如果指定了此参数且不是空字符串，搜索仅限于维度树中指定流程可见的表单。 - COD_FASE：如果指定了此参数且不是空字符串，搜索仅限于维度树中指定 COD_PROCESSO 流程和指定步骤可见的表单。
返回值	相关表单的代码列表。

示例

此示例展示了获取流程 "ACT2007" 中与节点 "001" 相关的表单代码列表的语法：

dim arrCodici

arrCodici = Application.run("Tgkrmacro.xlam!getReportCodes", "001", "ACT2007")

for i = lbound(arrCodici) to ubound(arrCodici)

MsgBox "Form: " + cstr(arrCodici(i))

next i

TGK_getFilters

元素	描述
语法	dim filters as String dim cella as range set cella = .... filters = Application.run("Tgkrmacro.xlam!TGK_getFilters", cella)
描述	获取影响某个单元格或某个单元格区域的筛选器集合，并按照相应的人类可读语法返回其表达式。
参数	- CELL。要从中读取筛选器的单个单元格或区域。

TGK_getParameters

元素	描述
语法	dim parameters as String parameters = Application.run("Tgkrmacro.xlam!TGK_getParameters")
描述	当前表单的运行参数集合
返回值	按照相应的人类可读语法返回表达式。注意：也适用于包含字段表达式的矩阵单元格上的函数。