excel vba 数组赋值怎么插入一个数到数组中

来源：蜘蛛抓取(WebSpider) 时间：2017-01-18 07:38 标签： excel vba 数组
怎么把excel里一整列的数据导入到数组中_c#吧_百度贴吧
&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&签到排名：今日本吧第个签到，本吧因你更精彩，明天继续来努力！
本吧签到人数：0成为超级会员，使用一键签到本月漏签0次！成为超级会员，赠送8张补签卡连续签到：天&&累计签到：天超级会员单次开通12个月以上，赠送连续签到卡3张
关注：99,970贴子：
怎么把excel里一整列的数据导入到数组中收藏
怎么把excel里一整列的数据导入到一个数组中去，以此来实现对excel数据进行操作？
注：我现在要实现的就是把G列的数据导入到数组 ，然后在左侧的坐标系中画出折线图来。
京东电脑节，全民抢宝进行时！1999抢i7本，半价秒电脑，抢直降3000显示器
有没有人会啊
有两种方法，一种是直接一步到位，把Excel的内容直接转为dataset，前提，你的Excel不是反常规的，另外一种是打开Excel，慢慢for循环，你要哪种
就把Excel当数据库就行了，链接Excel数据库，然后用sql来删改增都行。
/// &summary&
/// Excelファイルをインポートする
/// &/summary&
/// &returns&&/returns&
public virtual DataSet ExceleDs()
OpenFileDialog ofd = new OpenFileDialog();
ofd.Filter = &Excel格式(*.XLS)|*.XLS&;
DataSet ds =new DataSet();
if (ofd.ShowDialog() == DialogResult.OK)
string strConn = &Provider=Microsoft.Jet.OleDb.4.0;& + &data source=& + ofd.FileName + &;Extended Properties='Excel 8.0; HDR=YES; IMEX=1'&;
OleDbDataAdapter odda = new OleDbDataAdapter(&select * from [sheet1$]&, strConn);
odda.Fill(ds);
catch (Exception ex)
MessageBox.Show(ex.Message);
}参数：HDR：YES会把第一行弄成表头，NO不会请玩2003版的excel，应该不支持2005以上的
自己搜索npoi
登录百度帐号推荐应用
为兴趣而生，贴吧更懂你。或查看: 1297|回复: 7
怎么将数组里面的数字分别相加一遍
阅读权限30
在线时间 小时
数组& & & & 相加一& & & & 相加二& & & & 相加三& & & & 相加四& & & & 相加五& & & & 相加六& & & & 。。。
246& & & & =2+4& & & & =2+6& & & & =4+6& & & & & & & & & & & & & & & &
2048& & & & =2+0& & & & =2+4& & & & =2+8& & & & =0+4& & & & =0+8& & & & =4+8& & & &
& & & & & & & & 怎么将数组里面的数字分别相加一遍，只取尾数
13:01 上传
点击文件名下载附件
1.56 KB, 下载次数: 14
阅读权限30
在线时间 小时
回复 1楼 mohao 的帖子
是不是这样？
(3.8 KB, 下载次数: 15)
15:20 上传
点击文件名下载附件
阅读权限100
在线时间 小时
回复 2楼 shengyulon 的帖子
这题确实不好做，想的脑仁疼。
不定义名称还真不知怎下手。
阅读权限30
在线时间 小时
回复 3楼 wangg913 的帖子
想了许久，请wangg913老师进一步指导简化。。。
阅读权限95
在线时间 小时
=IF(COLUMN(A1)&COMBIN(LEN($A2),2),&&,SMALL(IF((MID($A2,ROW($1:$9),1)&&MID($A2,COLUMN($A:$I),1))*(MID($A2,ROW($1:$9),1)&&&&)*(MID($A2,COLUMN($A:$I),1)&&&&),MID($A2,ROW($1:$9),1)+MID($A2,COLUMN($A:$I),1)),COLUMN(A1)*2-1))右拉下拉
(2.58 KB, 下载次数: 14)
15:45 上传
点击文件名下载附件
阅读权限30
在线时间 小时
2楼、5楼做得都很好，但忘了只取尾数，这个MOD应该怎么放啊？
阅读权限95
在线时间 小时
外面再套个right函数
阅读权限30
在线时间 小时
原帖由 一剑惊心 于
15:57 发表
外面再套个right函数
=RIGHT(IF(COLUMN(C3)&COMBIN(LEN($A4),2),&&,SMALL(IF((MID($A4,ROW($1:$9),1)&&MID($A4,COLUMN($A:$I),1))*(MID($A4,ROW($1:$9),1)&&&&)*(MID($A4,COLUMN($A:$I),1)&&&&),MID($A4,ROW($1:$9),1)+MID($A4,COLUMN($A:$I),1)),COLUMN(C3)*2-1)),1)
明白了，谢谢了！
最新热点 /1
ExcelHome每周都有线上直播公开课，
国内一流讲师真身分享，高手贴身答疑，
赶不上直播还能看录像，
关键居然是免费的！
厚木哥们都已经这么努力了，
你还好意思说学不好Office。
玩命加载中，请稍候
玩命加载中，请稍候
Powered by
本论坛言论纯属发表者个人意见，任何违反国家相关法律的言论，本站将协助国家相关部门追究发言者责任！ & & 本站特聘法律顾问：徐怀玉律师 李志群律师查看: 4481|回复: 15
如何将一个元素插入到一个数组中的指定位置
阅读权限30
在线时间 小时
假如有一个水平数组{2,3,4,6}，如何使用公式将一个元素0插入到数组第一个元素之前，形成新的数组{0,2,3,4,6}.。那么如果要插入其中某两个相临元素之间，如xi与xj之间(i,j为下标，i=j+1)，公式又该怎么写？我这里的水平数组{2,3,4,6}是1*4的，但实际中可能尺寸比较大。
[ 本帖最后由 Saint_Zuo 于
16:26 编辑 ]
16:26 上传
点击文件名下载附件
1.65 KB, 下载次数: 18
阅读权限30
在线时间 小时
麻烦大家帮忙看看呀！
阅读权限30
在线时间 小时
别沉了呀！麻烦各位高手了。
阅读权限90
在线时间 小时
楼主能上传个附件么
阅读权限30
在线时间 小时
附件已经上传
阅读权限30
在线时间 小时
& & & & & & & &
习惯于对列向量写，参考公式
=LOOKUP(ROW(INDIRECT(&1:&&ROWS(array)+1))+CHOOSE(SIGN(ROW(INDIRECT(&1:&&ROWS(array)+1))-pos)+2,,4^8,-1),IF({1,0},ROW(INDIRECT(&1:&&ROWS(array)+1)),IF(ROW(INDIRECT(&1:&&ROWS(array)+1))&ROWS(array),value,array)))
array 是列向量 (多行1列的数组)
value是要插入的值
pos是插入的位置
阅读权限30
在线时间 小时
其中&&IF(ROW(INDIRECT(&1:&&ROWS(array)+1))&ROWS(array),value,array)&&这部分是列向量末尾追加一个值， 曾经尝试用来解决Excel2003数组公式无法转换整列区域，不过实际意义并不是很大
阅读权限30
在线时间 小时
原帖由 liuzj2s 于
17:11 发表
其中&&IF(ROW(INDIRECT(&1:&&ROWS(array)+1))&ROWS(array),value,array)&&这部分是列向量末尾追加一个值， 曾经尝试用来解决Excel2003数组公式无法转换整列区域，不过实际意义并不是很大
= IF(ROW(INDIRECT(&1:&&ROWS(array)+1))=1,0,array)，请教一下那我用这个公式为什么无法得到列向量开头追加一个值的结果？
阅读权限100
在线时间 小时
i,j在什么地方存储着？？
阅读权限30
在线时间 小时
原帖由 shaowu459 于
15:26 发表
i,j在什么地方存储着？？
i，j只是下标，如数列x1,x2,x3,x4 等等。=ROW(INDIRECT(&1:&&ROWS(array)+1))就是存储插入之后新数组的下标向量。
最新热点 /1
ExcelHome每周都有线上直播公开课，
国内一流讲师真身分享，高手贴身答疑，
赶不上直播还能看录像，
关键居然是免费的！
厚木哥们都已经这么努力了，
你还好意思说学不好Office。
玩命加载中，请稍候
玩命加载中，请稍候
Powered by
本论坛言论纯属发表者个人意见，任何违反国家相关法律的言论，本站将协助国家相关部门追究发言者责任！ & & 本站特聘法律顾问：徐怀玉律师 李志群律师

我要回帖

更多关于 excel vba 数组 的文章

 

随机推荐