[版权声明] 本站所有资料由用户提供并上传，若内容存在侵权，请联系邮箱。资料中的图片、字体、音乐等需版权方额外授权，请谨慎使用。网站中党政主题相关内容(国旗、国徽、党徽)仅限个人学习分享使用，禁止广告使用和商用。

从数据库获取数据暂存，多表汇总，数据分析等，因为数组是存在于内存的，所以运行速度会非常快。

1. 数组转置必须在同过程或同函数内redim  否则报无效 redim；
2. 起始标必须为1，不能大于1也不能小于1，否则报类型不匹配错误；  
3. 数组不改变值的情况下只能增加列的数，如果要增加行，只能先转置，再增加，然后转置还原；
4. 如果数组存储了null，则不能被转置，因此在存入空值时需要过滤； 
5. 经过多次实验证明：VBA的数组起始标只能以1开始，否则无法转置

1. 利用类模块，当成对象开发；
2. 生成数组是二维数组，每个维度的长度都可以通过参数设置；
3. 通过行标列表添加数据；
4. 直接最后一行后默认加入一行数据；
5. 可以获取行和列的长度；
6. 注意：如果是空值则不存入数组，否则数组将无法转置，将导致无法动态变动。

     按行列写入数值（可获取写入的状态和返回的消息）

'防止行标和列标越界 越界则不写入数据，且不会报错，在写程序时建议先预制检验行列是否在范围内 Property Get 阙_写入数据_消息() '应紧跟阙_写入数据后面获取，否则消息被更新 Property Get 阙_写入数据_状态() '应紧跟阙_写入数据后面获取，否则状态被更新 '1.数组转置必须在同过程或同函数内redim 否则报无效 redim 阙辉 '2.起始标必须为1，不能大于1也不能小于1，否则报类型不匹配错误 阙辉 '3.数组不改变值的情况下只能增加列的数，如果要增加行，只能先转置，再增加，然后转置还原 '4.如果数组存储了null，则不能被转置，因此在存入空值时需要过滤 阙辉 '1.数组转置必须在同过程或同函数内redim 否则报无效 redim 阙辉 '2.起始标必须为1，不能大于1也不能小于1，否则报类型不匹配错误 阙辉 '3.数组不改变值的情况下只能增加列的数，如果要增加行，只能先转置，再增加，然后转置还原 '4.如果数组存储了null，则不能被转置，因此在存入空值时需要过滤 阙辉

'经过多次实验证明：VBA的数组起始标只能以1开始，否则无法转置
'防止行标和列标越界 越界则不写入数据，且不会报错，在写程序时建议先预制检验行列是否在范围内
Property Get 阙_写入数据_消息() '应紧跟阙_写入数据后面获取，否则消息被更新
Property Get 阙_写入数据_状态() '应紧跟阙_写入数据后面获取，否则状态被更新
'1.数组转置必须在同过程或同函数内redim 否则报无效 redim 阙辉
'2.起始标必须为1，不能大于1也不能小于1，否则报类型不匹配错误 阙辉
'3.数组不改变值的情况下只能增加列的数，如果要增加行，只能先转置，再增加，然后转置还原
'4.如果数组存储了null，则不能被转置，因此在存入空值时需要过滤 阙辉
'1.数组转置必须在同过程或同函数内redim 否则报无效 redim 阙辉
'2.起始标必须为1，不能大于1也不能小于1，否则报类型不匹配错误 阙辉
'3.数组不改变值的情况下只能增加列的数，如果要增加行，只能先转置，再增加，然后转置还原
'4.如果数组存储了null，则不能被转置，因此在存入空值时需要过滤 阙辉