查看: 3171|回复: 3
阅读权限1UID520641函数0 关最后登录经验11 点在线时间6 小时VBA0 关分享记录好友技巧0 关相册主题段位1 段金币46 个积分11精华0帖子日志注册时间
幼儿园小班, 积分 11, 距离下一级还需 89 积分
金币46 个积分11帖子
同一个文件中有很多 sheet (名称为人名),如何在第一个（或最后一个，也可新建一个）中的一列中引入其它的 sheet 中的相同单元格中的内容？
如：新建的表中的A1,A2,A3的值分别为
A1=李四!D4
A2=王五!D4
A3=赵六!D4
阅读权限20UID308869函数0 关最后登录经验9856 点在线时间5778 小时VBA0 关分享记录好友技巧0 关相册主题段位4 段金币1143 个积分9861精华0帖子日志注册时间
金币1143 个积分9861帖子
cbg2008发布于
Sub test()
& & Dim i As Long
& & With Worksheets.Add(before:=Worksheets(1))
& && &&&For i = 2 To Worksheets.Count
& && && && &.Cells(i - 1, 1) = Sheets(i).Range(&d4&)
& && &&&Next
& & End With
End Sub复制代码
阅读权限6UID579530函数0 关最后登录经验979 点在线时间74 小时VBA0 关分享记录好友技巧0 关相册主题段位0 段金币512 个积分979精华0帖子日志注册时间
小学3年级, 积分 979, 距离下一级还需 221 积分
金币512 个积分979帖子
Sub 引入名称()
& & Dim sht As Worksheet, i%
& & For Each sht In Worksheets
& && &&&If sht.Name && &总表& Then
& && && && &i = i + 1
& && && && &Sheets(&总表&).Range(&a& & i) = sht.Range(&d4&)
& && &&&End If
& & Next
End Sub
复制代码
21:21 上传
点击文件名下载附件
8.8 KB, 下载次数: 26
阅读权限20UID308869函数0 关最后登录经验9856 点在线时间5778 小时VBA0 关分享记录好友技巧0 关相册主题段位4 段金币1143 个积分9861精华0帖子日志注册时间
【函中】cbg2008
硕士研究生, 积分 9861, 距离下一级还需 2139 积分
金币1143 个积分9861帖子
&&&本楼为最佳答案&&&
Sub test()
& & Dim i As Long
& & With Worksheets.Add(before:=Worksheets(1))
& && &&&For i = 2 To Worksheets.Count
& && && && &.Cells(i - 1, 1) = Sheets(i).Range(&d4&)
& && &&&Next
& & End With
End Sub复制代码
阅读权限1UID520641函数0 关最后登录经验11 点在线时间6 小时VBA0 关分享记录好友技巧0 关相册主题段位1 段金币46 个积分11精华0帖子日志注册时间
幼儿园小班, 积分 11, 距离下一级还需 89 积分
金币46 个积分11帖子
非常感谢 cbg2008 所提供的帮助，已成功解决！
最佳答案累计大于100
Powered by如何合并同一目录下格式相同的多个excel文件内容_百度文库
两大类热门资源免费畅读
续费一年阅读会员，立省24元！
如何合并同一目录下格式相同的多个excel文件内容
上传于||暂无简介
阅读已结束，如果下载本文需要使用
想免费下载本文？
你可能喜欢怎么把excel中的名字批量导入到word文件中的同一位置？_百度知道
怎么把excel中的名字批量导入到word文件中的同一位置？
把excel中的名字批量导入到word文件中的同一位置:1、打开文字文档以后，先做好表格，接着找到文档中工具栏的“工具”按钮。2、点击之后，就会弹出一个命令菜单，在其中找到“邮件合并工具栏”，点击“邮件合并工具栏”以后就会出现如下图2的一个工具栏了。3、在这个工具栏中找到如下图的图标，点击打开数据源。4、接着就会出现一个选择框，选择好需要导入的数据源excel文件，点击确定。5、接着鼠标如下图点击要导入数据文档表格中的单元格，让光标在这个单元格总闪动，然后点击第二幅图上的图标“插入合并域”。6、接着选择要输入的项目，点击确定，就能看到第二幅图中单元格里出现了《姓名》，出生日期和性别也可以用同样的方法输入。7、然后点击如下图”合并到新文档“，在合并到新文档设置中选择要导入的数据起始行和结束行，点击确定。8、接着会发现excel中的数据全部导入到了文档的表格里。
其他类似问题
为您推荐：
提问者采纳
word使用邮件合并功能跟着指示步步做
其他2条回答
要用wordVBAword调用excel数据面太懂知道信否用excel呢用excel表调用名单要便
邮件合并 搞不懂上网搜视频教程
word文件的相关知识
等待您来回答
下载知道APP
随时随地咨询
出门在外也不愁}