永发信息网

急!如何将电子表格中的每一页变成独立的电子表格,比如表格一中有5页,怎么变成5个独立的表格?谢谢~

答案:4  悬赏:40  手机版
解决时间 2021-02-11 20:55
急!如何将电子表格中的每一页变成独立的电子表格,比如表格一中有5页,怎么变成5个独立的表格?谢谢~
最佳答案
用的是 office吗? 是的话可以用 VBA来做。
说清楚:
1、是复制出来还是移知动出来?道也就是生成新工作簿回后,原来的工作簿是否保留这个表?
2、生成的新工作簿的表名是否需要修改?
3、生成的新工作簿是否需要保答存?保存到什么地方?工作簿的名称又是什么?
全部回答
这个只2113有用vba完成5261。你试4102试下面的1653代码:版 Sub test() Dim origwb As Workbook Dim destwb As Workbook Dim ws As Worksheet Dim x As Integer For x = 1 To Sheets.Count Set origwb = ThisWorkbook Set destwb = Workbooks.Add Set ws = origwb.Sheets(x) ws.Copy before:=destwb.Sheets(1) destwb.SaveAs ThisWorkbook.Path & "/" & [x] & "工作表权.xls" destwb.Close Next End Sub
我不太会,一直没有高人回答你又着急的话,就用笨方法得了,新建五个excl.分别复制粘贴一下。
你是说sheet吗?右键点sheet标签,移动或复制,工作簿里选“新工作簿”,看你需要勾选“建立副本"。这方法可以让sheet在任何工作簿(就是你说的独立电子表格)里移动。
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
圆通快递(敦华路)地址在什么地方,我要处理点
garbie汉语什么意思
舒馨火锅店NO.1地址在哪,我要去那里办事
真正的北宋六贼都是谁
全峰快递(贵州金沙公司)地址在哪,我要去那里
火车站可以办理12306的账户吗
-t 图像若是要表示匀加速运动,图像是什么样的
2012年01月出厂油浸式变压器铜芯还是铝
书包哪个牌子好
韩国风尚乐活优酸乳冰淇淋在哪里啊,我有事要
圆通速递(金沙分公司)怎么去啊,我要去那办事
有关农业生态系统的说法正确的是CA. 食物链和
牛顿环实验如何西消除螺距差
平坝乡申通快递公司地址有知道的么?有点事想
小型plc有模拟量输入输出点多的吗?
推荐资讯
苹果6P,10.2版本越狱后还能恢复吗,怎么恢复
我的屁股很扁,两侧成凹陷状,怎么样才能让屁
南木河我想知道这个在什么地方
本田2,4自动变速箱怎么换滤芯
横截面直径为20cm的一根圆钢,截成两段后,两段
kes hiw omens hidu oned emia oxia oa!
路堑锚杆挡土墙施工步骤是()。A.自上往下B.自
豪爵·铃木服务店怎么去啊,有知道地址的么
电子管收音机电路能不能拨接音频信号,当功放
炫舞名片夹传歌怎么把申卖的伴奏关掉
拯救者y720为什么鼠标插上不能用
开慧镇李家山社区居民委员会地址在什么地方,
正方形一边上任一点到这个正方形两条对角线的
阴历怎么看 ?