[发明专利]一种不采用宏录制基于VBA模块的数据处理方法及系统

摘要

本发明公开了一种不采用宏录制基于VBA模块的数据处理方法及系统。该方法包括步骤一：赋值数据文件个数变量，赋循环变量初值为1；步骤二：判断循环变量值是否大于数据文件个数变量值，如是，结束处理，否则继续步骤三；步骤三：使用标准“打开文件”对话框打开数据文件；步骤四：选中该打开的数据文件中所选工作表的相应位置；步骤五：数据操作；步骤六：循环变量加1；步骤七：再重复步骤二；该系统包括：循环模块、数据文件打开模块、数据文件的相应位置选中模块和数据操作模块；通过上述方法与系统，本发明能实现当待处理数据文件个数任意时，打开多个任意名称数据文件，选中不同数据文件中所选工作表的不同位置，进行数据操作。

主权项

一种不采用宏录制基于VBA模块的数据处理方法，其特征在于，包括：步骤一：赋值数据文件个数变量，赋循环变量初值为1；步骤二：判断循环变量值是否大于数据文件个数变量的值，如是，则结束处理，否则继续步骤三；步骤三：使用标准“打开文件”对话框打开数据文件，包括：A）打开标准“打开文件”对话框，选中所需处理的一个数据文件，具体为：使用Application对象的GetOpenFilename方法打开一个标准“打开文件”对话框，并选中所需处理的一个数据文件；B）打开所选择的数据文件，具体为：使用Workbooks对象的Open方法打开所选择的数据文件；步骤四：选中步骤三中所打开的数据文件中所选工作表的相应位置，包括：A）选择打开的数据文件中的一个工作表；B）对循环变量进行运算，获得运算结果，具体为：对循环变量进行四则混合运算，获得运算结果；C）依据运算结果，选中该数据文件中所选工作表的相应位置；步骤五：数据操作，所述数据操作对步骤四中选中的数据文件中所选工作表的相应位置的内容进行复制或剪切或粘贴或数据的分析或运算操作；步骤六：循环变量加1；步骤七：重复步骤二。