1. 首页>百科大全 > 百科

怎么把工作表的名称赋值给数组

作者:陈夕华
2020-05-04
百科

1. VBA中如何用EXCEL表中的数据给数组赋值

Excel VBA数组赋值主要分为一维数组赋值和二维数组赋值两方面来讲,多维数组赋值只要沿用二维的方法即可。

在将vba 数组赋值的方法之前,先说下为什么要用数组的方法来写程序吧。使用excel vba数组赋值的主要目的是为了提高程序运行效率,相信用vba编程的童鞋都遇到过程序运行过慢的问题,其中最主要的一个原因就是excel vba程序从头至尾都在操作对象。

用excel vba对数组进行赋值,即是将对象的值及相关属性,全部存储到内7a64e59b9ee7ad9431333363373736存中,然后在内存里执行其他程序,这样速度会提高非常多。好了,下面说怎么给excel vba数组进行赋值吧EXCEL VBA一维数组赋值的方法int Arr(5)={1,2,3,4,5}说明:括号中的5是指数组长度,固定数组在最开始确定好数组长度,使内存分配好空间,免去重定义数组长度,效率会高些。

如果不定义数组长度的话,后期可以使用redim来更改。EXCEL VBA二维数组赋值的方法Arr = [{"a","b"; "e","f" ;"i","j";"m" ,"n"}] Arr = Range(Sheets("文本1").Range("a1"), Sheets("文本1"). Range("a" Cells(65536, 1).End(xlUp).Row))说明:两种赋值方法如上,一个是赋予固定值,另一个是将某区域内数值全部导入。

EXCEL VBA重新定义数组的方法ReDim Preserve Arr(j)最后说下excel vba二维数组取数据上限的程序,如下,不过要先确定好你的数组是从0开始计数还是从1开始计数的,上面所讲数组赋值的例子都是从1开始计数的。

2. 怎么将excell的数据赋值给数组c

简单的方法是通过ODBC来实现:

具体实现

一、包含Excel文件操作类头文件

#include "CSpreadSheet.h"

二、新建Excel文件,并写入默认数据

// 新建Excel文件名及路径,TestSheet为内部表名

CSpreadSheet SS("c:Test.xls", "TestSheet");

CStringArray sampleArray, testRow;

SS.BeginTransaction();

// 加入标题

sampleArray.RemoveAll();

sampleArray.Add("姓名");

sampleArray.Add("年龄");

SS.AddHeaders(sampleArray);

// 加入数据

CString strName[] = {"徐景周","徐志慧","郭徽","牛英俊","朱小鹏"};

CString strAge[] = {"27","23","28","27","26"};

for(int i = 0; i < sizeof(strName)/sizeof(CString); i++)

{

sampleArray.RemoveAll();

sampleArray.Add(strName[i]);

sampleArray.Add(strAge[i]);

SS.AddRow(sampleArray);

}

SS.Commit();

三、读取Excel文件数据

CSpreadSheet SS("c:Test.xls", "TestSheet");

CStringArray Rows, Column;

//清空列表框

m_AccessList.ResetContent();

for (int i = 1; i <= SS.GetTotalRows(); i++)

{

// 读取一行

SS.ReadRow(Rows, i);

CString strContents = "";

for (int j = 1; j <= Rows.GetSize(); j++)

{

if(j == 1)

strContents = Rows.GetAt(j-1);

else

strContents = strContents + " --> " + Rows.GetAt(j-1);

}

m_AccessList.AddString(strContents);

}

3. 怎么将excell的数据赋值给数组c

简单的方法是通过ODBC来实现:具体实现一、包含Excel文件操作类头文件#include "CSpreadSheet.h"二、新建Excel文件,并写入默认数据// 新建Excel文件名及路径,TestSheet为内部表名CSpreadSheet SS("c:Test.xls", "TestSheet");CStringArray sampleArray, testRow;SS.BeginTransaction();// 加入标题sampleArray.RemoveAll();sampleArray.Add("姓名");sampleArray.Add("年龄");SS.AddHeaders(sampleArray);// 加入数据CString strName[] = {"徐景周","徐志慧","郭徽","牛英俊","朱小鹏"};CString strAge[] = {"27","23","28","27","26"};for(int i = 0; i < sizeof(strName)/sizeof(CString); i++){sampleArray.RemoveAll();sampleArray.Add(strName[i]);sampleArray.Add(strAge[i]);SS.AddRow(sampleArray);}SS.Commit();三、读取Excel文件数据CSpreadSheet SS("c:Test.xls", "TestSheet");CStringArray Rows, Column;//清空列表框m_AccessList.ResetContent();for (int i = 1; i <= SS.GetTotalRows(); i++){// 读取一行SS.ReadRow(Rows, i);CString strContents = "";for (int j = 1; j <= Rows.GetSize(); j++){if(j == 1)strContents = Rows.GetAt(j-1);elsestrContents = strContents + " --> " + Rows.GetAt(j-1);}m_AccessList.AddString(strContents);}。

怎么把工作表的名称赋值给数组

推荐阅读
  • 努比亚z9max手机音乐效验

    该机拥有HIFI级音乐芯片,音乐效果不凡。具体体现在:1.音量调节,正常听音乐中高低音都是一个音量,而杜比音效能动态扩大某个音量。比如放打鼓声,杜比会及时提高低音加强鼓声。2.加强音域,杜比音效有开阔、集中、…

    百科 2024-11-10
  • 是atChristmas还是inChristmas

    此处该用“on”。在圣诞节正确表达应为 “on Christmas ”。有具体日期的,比如知道几月几日的都用“on” ;不知道日期,但知道年份和月份的用“in” ,知道具体时间,比如几点几分用“at”。…

    百科 2024-11-10
  • 个体工商户应交纳什么税

    纳税标准根据国家税务总局《个体工商户定期定额征收管理办法》文件精神 ,定期定额征收方式适用的税种及税率如下:1、根据《中华人民共和国增值税暂行条例》规定,自2009年1月1日起,小规模纳税人增值税征收率为3%…

    百科 2024-11-10
  • 材料成本差异率为负数是什么意思

    材料成本差异额,是指材料的实际成本和计划成本之间的差额。差异率负数表示节约差异,即实际成本比计划成本小。正数表示超支差异,即实际成本比计划成本大。…

    百科 2024-11-10
  • 塞翁失马焉知非福是什么意思

    比喻一时虽然受到损失,反而因此能得到好处。也指坏事在一定条件下可变为好事,反之亦然。形容人的心态,一定要乐观向上,任何事情都有二面性,不好的一面,有可能向好的一面转化。塞翁失马,焉知非福出自《 淮南子…

    百科 2024-11-10