中易网

如何提取excel表提取一个数据

答案:2  悬赏:0  
解决时间 2021-03-22 19:27
如何提取excel表提取一个数据
最佳答案
在工作表标签上击右键,查看代码。

在VBE窗口中,点“插入”,模块。将以下代码粘贴到模块代码窗格中,ALT+F8运行该宏,就行了。
附件中有样本。

Sub 数据提取()
For i = 2 To Worksheets.Count
Sheets(1).Cells(Sheets(1).[a65536].End(3).Row + 1, 1) = Sheets(i).[D3]
Sheets(1).Cells(Sheets(1).[b65536].End(3).Row + 1, 2) = Sheets(i).[e6]
Next
End Sub
全部回答
看到最左边的1234了吗?需要哪一行的数据就单击哪个数字,需要多行数据就按住ctrl依次单击。选中之后ctrl+c,到表2的a2中ctrl+v。搞定。 -------华-------丽-------丽-------的-------分-------割-------线------- 希望楼主采纳
我要举报
如以上问答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
恶作剧2吻mp4高清晰哪里可以下载
德国分裂为什么啊
女生介不介意自己的男朋友不是处男
科普短文雨是怎样行成的800字
跟虚伪的朋友吵架了应该听什么歌曲
雪菊有什么功效?
成都无线扩音器哪里有卖,大概多少钱一个,可
胼胝体缺如的胎儿孕期可以查出来吗
我有两轮车驾驶证怎么办三轮车驾驶证
买二手房137平方想换地板砖大概多少钱
定投基金怎样计算收益?
问:联想控股融科智地房地产股份有限公司怎么
求助,写一份论文是在当前经济政治形势下面临
梵天是什么?
冷库架空层水珠是什么原因
推荐资讯
我在商店里买了一个挂件,请问上面的是什么玉
魏老香火锅现在扩展的很大啊,我在哪儿都能看
前几年很火的尼彩手机为什么没了?
已知AB⊥CD 垂足为o,EF是过点O的一条直线,则
越南人野蛮吗
德阳硅酸钙板生产厂家有那些?
京东商城的毛绒玩具几天能到货
嫉妒的读音
福建漳州龙海石码计生罚款
三支一扶的分数怎么算
医院搞绩效,护理质量检查好严,我有个签名忘
求教:适合流行人声的动铁耳塞推荐
手机登qq时,显示手机磁盘不足,清理后重新登
刺客的套装怎么选啊?