按键精灵没有办法： excel如何复制表格excel表格里面 同一列连续

来源：蜘蛛抓取(WebSpider) 时间：2017-10-25 18:54 标签： 按键精灵复制excel
查看: 4460|回复: 2
[求助]如何一次性选择多个连续表格中的同一列
阅读权限20
在线时间 小时
& & & & & & & &
&&&&&&& 文档中有多个表格，表格结构完全相同，中间用一个标题分隔，现在想一次性把这些表格中的第一列选中，普通情况下一次只能选中一个表格的一列，不知有没有办法？
阅读权限100
在线时间 小时
不好意思，当成Excel了。
[此贴子已经被作者于 12:41:09编辑过]
阅读权限20
在线时间 小时
& 不是的，是在word中的表格，不是excel中的。
最新热点 /1
ExcelHome每周都有线上直播公开课，
国内一流讲师真身分享，高手贴身答疑，
赶不上直播还能看录像，
关键居然是免费的！
厚木哥们都已经这么努力了，
你还好意思说学不好Office。
玩命加载中，请稍候
玩命加载中，请稍候
Powered by
本论坛言论纯属发表者个人意见，任何违反国家相关法律的言论，本站将协助国家相关部门追究发言者责任！ & & 本站特聘法律顾问：徐怀玉律师 李志群律师查看: 69543|回复: 17
【求教】excel同一列中连续相同项，如何自动合并？
阅读权限10
在线时间 小时
数据有将近1w行，人员信息方面的数据，所以系统会根据名字分配帐号，然后根据工作性质分配从帐号，所以会出现一个人有多个从帐号。
现在希望能够把帐号那一列，连续相同的数据合并成一个单元格，手动去点的话太费时间了，想请教一下有没有自动合并的方法，效果如下，谢谢！
原始数据：
5.19.png (15.51 KB, 下载次数: 854)
01:30 上传
5.19效果.png (13.74 KB, 下载次数: 629)
01:31 上传
(9.03 KB, 下载次数: 329)
01:40 上传
点击文件名下载附件
阅读权限50
在线时间 小时
没有下载你的附件，看你的图猜的，希望能帮到你。Sub Mergerng()
& & Dim IntRow As Integer
& & Dim i As Integer
& & Application.DisplayAlerts = False
& & With Sheet1
& && &&&IntRow = .Range(&A65536&).End(xlUp).Row
& && &&&For i = IntRow To 2 Step -1
& && && && &If .Cells(i, 1).Value = .Cells(i - 1, 1).Value Then
& && && && && & .Range(.Cells(i - 1, 1), .Cells(i, 1)).Merge
& && && && &End If
& && &&&Next
& & End With
& & Application.DisplayAlerts = True
End Sub
阅读权限20
在线时间 小时
& & & & & & & &
分类汇总。或透视表。
(551.29 KB, 下载次数: 2654)
04:23 上传
阅读权限50
在线时间 小时
合并和取消单元格.gif (83.51 KB, 下载次数: 1000)
19:10 上传
阅读权限10
在线时间 小时
叶子的离去 发表于
分类汇总。或透视表。
这个可以实现不同列的数据合并，我已经学会了~~谢谢拉~~
我制作的附件有2M多，传不上来，，
阅读权限10
在线时间 小时
<font color="# 发表于
没有下载你的附件，看你的图猜的，希望能帮到你。
我试过，可以的哦，谢谢！
另外再请教个问题
“IntRow = .Range(&A65536&).End(xlUp).Row”
这个应该是历遍A列的意思，如果我需要对B列、C列进行相同的操作，就是我需要把其中任意一列连续相同内容进行合并，
是不是把“A65536”改成“B65536”就可以了？
我试过，直接改了之后，没有办法实现，是不是有其他因素来控制某列的？
如果我需要对表格中其他任意一列进行连续相同内容进行合并的操作，我需要怎么修改代码？
阅读权限50
在线时间 小时
<font color="#54 发表于
我试过，可以的哦，谢谢！
另外再请教个问题
cells(i,1)代表第一列，cells(i,2)代表第二列，改改就行了。
阅读权限10
在线时间 小时
回头去试试~~
阅读权限20
在线时间 小时
<font color="# 发表于
cells(i,1)代表第一列，cells(i,2)代表第二列，改改就行了。
你好，你这个VBA的思路可以解决我的问题吗？有时间的时候，请帮我看看这个贴子好吗？先谢谢了
阅读权限50
在线时间 小时
tycm10 发表于
你好，你这个VBA的思路可以解决我的问题吗？有时间的时候，请帮我看看这个贴子好吗？先谢谢了
http://cl ...
代码已写好，请查看。
最新热点 /1
ExcelHome每周都有线上直播公开课，
国内一流讲师真身分享，高手贴身答疑，
赶不上直播还能看录像，
关键居然是免费的！
厚木哥们都已经这么努力了，
你还好意思说学不好Office。
玩命加载中，请稍候
玩命加载中，请稍候
Powered by
本论坛言论纯属发表者个人意见，任何违反国家相关法律的言论，本站将协助国家相关部门追究发言者责任！ & & 本站特聘法律顾问：徐怀玉律师 李志群律师查看: 47401|回复: 10
如何在同一个工作表中复制出多个行列完全相同的表格？
阅读权限10
在线时间 小时
本帖最后由 newxso 于
14:06 编辑
是这样的，本人用Excel2003制作出一个电费收据表格，由于档位有120个之多，想把相同格式的收据表格在同一个工作表复制出格式完全相同的收据表格120个，方便自动填写电费。本人用选中被复制表格，然后用复制粘贴方式，但复制出来的表格行高不同，请问如何解决？（记住是在同一个工作表中完成，而不是复制到新工作表中）
（解决方法在6楼，主要是选中行序号来复制和粘贴）
阅读权限30
在线时间 小时
本帖最后由 qdjhyu 于
21:01 编辑
选择需要复制的工作表左上角方格（列标与行标交叉处）全选表格---ctrl+C，再选其它工作表A1粘贴，即可原样复制
阅读权限95
在线时间 小时
点左上角全选工作表，再复制粘贴！
阅读权限30
在线时间 小时
如果是复制到同一个工作薄中的不同工作表，可以点击工作表名称处（如sheet1），选移动或复制工作表
阅读权限30
在线时间 小时
或者：右键点击需要复制的工作表名称-----勾选建立副本----选择副本位置----确定
阅读权限10
在线时间 小时
我指的是在同一个工作表中完成复制表格，楼上各位的方法本人之前已经试过，就是无法照样复制，行高需重新调整。如果横向复制，我在复制时选择“选择性粘贴”然后选择“列宽”，再选择粘贴，这样可完全复制表格。由于在选择性粘贴中没有“行高”此项，所以在纵向复制表格时不能复制行高。麻烦各位帮帮忙。
阅读权限20
在线时间 小时
遇到同样的困惑，似乎没有很好的解决办法
阅读权限10
在线时间 小时
本帖最后由 newxso 于
12:06 编辑
问题终于解决了，方法是点击选中表格左侧最顶层的序号（如序号1 ） ，并向下拖动至表格末行对应的序号，然后右键复制表格（也可以 Ctrl+C 快捷键复制），在新行的序号处点一下，然后粘贴即可。同样原理，当横向复制表格时，选中表格最左列对应的顶部字母（如序列A ），并向右拖动至表格的最右列，然后复制表格，点中新一个字母（新列），然后粘贴即可横向完全复制表格。
阅读权限20
在线时间 小时
这个方法简捷好用，谢谢。
阅读权限20
在线时间 小时
如果一张表里面有多个不同的表格，只想要复制其中一个表格，这个方法就不好用了
最新热点 /1
ExcelHome每周都有线上直播公开课，
国内一流讲师真身分享，高手贴身答疑，
赶不上直播还能看录像，
关键居然是免费的！
厚木哥们都已经这么努力了，
你还好意思说学不好Office。
玩命加载中，请稍候
玩命加载中，请稍候
Powered by
本论坛言论纯属发表者个人意见，任何违反国家相关法律的言论，本站将协助国家相关部门追究发言者责任！ & & 本站特聘法律顾问：徐怀玉律师 李志群律师

我要回帖

更多关于 按键精灵复制excel 的文章

 

随机推荐