wps多个工作表合并 200
将同一文件夹内所有相同格式的wps工作簿合并,比如说每周五个表,只是姓名内容不同,将他们全部放到一个新的Wps工作簿Sheet表内。非常感谢!...
将同一文件夹内所有相同格式的wps工作簿合并,比如说每周五个表,只是姓名内容不同,将他们全部放到一个新的Wps工作簿Sheet表内。非常感谢!
展开
2019-11-14 · 旨在提供办公软件的问答帮助。
WPS官方
金山办公软件为金山软件集团子公司,主要研发并运营WPS系列办公软件。WPS是我国自主知识产权的民族软件代表,自1988年诞生以来,WPS Office已经成为全世界最知名的办公软件之一。
向TA提问
关注
展开全部
这个了解过,WPS 是不可能实现这个功能的,只能office 才有这个功能。具体的:
在新建的sheet表中“右键”,找到“查看代码”,然后看到宏计算界面。
看到宏计算界面,我们就只需要把下面的代码复制进去,代码如下,效果如下:
Sub 合并当前工作簿下的所有工作表()
Application.ScreenUpdating = False
For j = 1 To Sheets.Count
If Sheets(j).Name <> ActiveSheet.Name Then
X = Range("A65536").End(xlUp).Row + 1
Sheets(j).UsedRange.Copy Cells(X, 1)
End If
Next
Range("B1").Select
Application.ScreenUpdating = True
MsgBox "当前工作簿下的全部工作表已经合并完毕!", vbInformation, "提示"
End Sub
做完上面的事情,然后只需要点击工具栏上面的“运行”下的“运行子过程/用户窗体”就可以了,合并完之后会有提示。提示完成之后就可以把宏计算界面关闭了。
在新建的sheet表中“右键”,找到“查看代码”,然后看到宏计算界面。
看到宏计算界面,我们就只需要把下面的代码复制进去,代码如下,效果如下:
Sub 合并当前工作簿下的所有工作表()
Application.ScreenUpdating = False
For j = 1 To Sheets.Count
If Sheets(j).Name <> ActiveSheet.Name Then
X = Range("A65536").End(xlUp).Row + 1
Sheets(j).UsedRange.Copy Cells(X, 1)
End If
Next
Range("B1").Select
Application.ScreenUpdating = True
MsgBox "当前工作簿下的全部工作表已经合并完毕!", vbInformation, "提示"
End Sub
做完上面的事情,然后只需要点击工具栏上面的“运行”下的“运行子过程/用户窗体”就可以了,合并完之后会有提示。提示完成之后就可以把宏计算界面关闭了。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
1、在wps表格中找到【数据】点击打开【数据】,找到【数据】中的【合并计算】点击打开。
2、在此之前,首先要将合并计算后的数据输出的区域选定,否则可能会提示操作错误。
3、点击合并计算后,弹出合并计算选项框,在第一个选项框中,可以选择计算公式,下拉菜单中有很多计算公式,在这里以求和举例。
4、下面是添加引用位置。首先在sheet1中选择要添加的源数据,点击添加按钮。
5、之后,在sheet2中选中需要添加到合并计算的源数据,添加完后,可以点击合并计算。
2、在此之前,首先要将合并计算后的数据输出的区域选定,否则可能会提示操作错误。
3、点击合并计算后,弹出合并计算选项框,在第一个选项框中,可以选择计算公式,下拉菜单中有很多计算公式,在这里以求和举例。
4、下面是添加引用位置。首先在sheet1中选择要添加的源数据,点击添加按钮。
5、之后,在sheet2中选中需要添加到合并计算的源数据,添加完后,可以点击合并计算。
本回答被网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
WPS这个功能就稍微麻烦点,操作比一个个表格复制粘贴稍微好一点,需要把文件全部打开,然后在需要移动的表格下方右键。到移动或复制工作表,如果一个文件有多个工作表就需要多次操作。然后勾选新建副本,这样不影响原来工作表的文件内容。选择合并到的单元格文件,点击下拉菜单把其他文件集中到一个表格里边。这样在对应的表格里边就出现了复制过来的文件,然后需要重复这样操作最终把所有的工作表移动到一个里边保存即可。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询