Excel2003怎么批量修改图表序列数据源(VBA实现)_VBA大全_优良自学吧 |
当前位置： >
> Excel2003怎么批量修改图表序列数据源(VBA实现)优良自学吧提供Excel2003怎么批量修改图表序列数据源(VBA实现),Excel2003如何批量修改图表序列数据源(VBA实现)实现方式如下：工作表中有许多嵌入式图表，图表中的数据源已设置，但是设死的通过遍历所有图表的SeriesCollection对象，分别取得每一个序列的Formula值，然后解析重新修改数据源为实际使用的区域（主要是通过Excel2003如何批量修改图表序列数据源(VBA实现)实现方式如下：工作表中有许多嵌入式图表，图表中的数据源已设置，但是设死的通过遍历所有图表的SeriesCollection对象，分别取得每一个序列的Formula值，然后解析重新修改数据源为实际使用的区域（主要是通过这种方式修改区域的最后一行行号）通过SeriesCollection.Values和.XValues完成修改问题如下：SeriesCollection(1).Formula可以正常获得SeriesCollection.Count取到的值是对的，没问题但当i&1的时候，SeriesCollection(i).Formula无法正常取得程序运行报错：& 运行时错误：1004不能取得 Series 的 Formula 属性还请达人赐教啊！------解决方案--------------------
看看报错时i的值估计是超出范围了。
------解决方案--------------------
探讨晕，我用自定义名称解决实现了那种方式代码执行起来不行，同样的代码在2007下可以运行，在2003下就是报错
------解决方案--------------------
探讨晕，我用自定义名称解决实现了那种方式代码执行起来不行，同样的代码在2007下可以运行，在2003下就是报错
------解决方案--------------------
来迟了，还能接着分吗？（本文来自互联网，不代表搜站(/)的观点和立场）编辑推荐最近更新温馨提示！由于新浪微博认证机制调整，您的新浪微博帐号绑定已过期，请重新绑定！&&|&&
LOFTER精选
阅读(9276)|
用微信&&“扫一扫”
将文章分享到朋友圈。
用易信&&“扫一扫”
将文章分享到朋友圈。
历史上的今天
loftPermalink:'',
id:'fks_080069',
blogTitle:'EXCEL中某个单元格内文字行间距调整方法',
blogAbstract:'十一、EXCEL中某个单元格内文字行间距调整方法。当某个单元格内有大量文字时，很多人都觉得很难将其行间距按自己的要求进行调整。现介绍一种方法可以让你任意调整单元格内文字的行间距：',
blogTag:'',
blogUrl:'blog/static/',
isPublished:1,
istop:false,
modifyTime:0,
publishTime:0,
permalink:'blog/static/',
commentCount:1,
mainCommentCount:1,
recommendCount:1,
bsrk:-100,
publisherId:0,
recomBlogHome:false,
currentRecomBlog:false,
attachmentsFileIds:[],
groupInfo:{},
friendstatus:'none',
followstatus:'unFollow',
pubSucc:'',
visitorProvince:'',
visitorCity:'',
visitorNewUser:false,
postAddInfo:{},
mset:'000',
remindgoodnightblog:false,
isBlackVisitor:false,
isShowYodaoAd:false,
hostIntro:'',
selfRecomBlogCount:'0',
lofter_single:''
{list a as x}
{if x.moveFrom=='wap'}
{elseif x.moveFrom=='iphone'}
{elseif x.moveFrom=='android'}
{elseif x.moveFrom=='mobile'}
${a.selfIntro|escape}{if great260}${suplement}{/if}
{list a as x}
推荐过这篇日志的人：
{list a as x}
{if !!b&&b.length>0}
他们还推荐了：
{list b as y}
转载记录：
{list d as x}
{list a as x}
{list a as x}
{list a as x}
{list a as x}
{if x_index>4}{break}{/if}
${fn2(x.publishTime,'yyyy-MM-dd HH:mm:ss')}
{list a as x}
{if !!(blogDetail.preBlogPermalink)}
{if !!(blogDetail.nextBlogPermalink)}
{list a as x}
{if defined('newslist')&&newslist.length>0}
{list newslist as x}
{if x_index>7}{break}{/if}
{list a as x}
{var first_option =}
{list x.voteDetailList as voteToOption}
{if voteToOption==1}
{if first_option==false},{/if}&&“${b[voteToOption_index]}”&&
{if (x.role!="-1") },“我是${c[x.role]}”&&{/if}
&&&&&&&&${fn1(x.voteTime)}
{if x.userName==''}{/if}
网易公司版权所有&&
{list x.l as y}
{if defined('wl')}
{list wl as x}{/list}如何批量修改WPS或excel表格一行或一列数据
比如我们做好一个表格，填好了数据，现在想修改其中的一列或者一行，例如：想在A列原来的数据的基础上减10，不要告诉我你是一个一个地修改哦，数据少了还可以，数据多了那就累死了，电脑时代一定要寻找最快捷的方法，那么如何批量修改一行或者一列的数据呢？
1、第一步: 在想要修改的列（假设为A列）的旁边，插入一个临时的新列（为B列），并在B列的第一个单元格（B1）里输入&10&。　　
2、把鼠标放在B1的右下角，待其变成 十字形 并按住 &ctrl& 住下拉直到所需的数据长度，此时B列所有的数据都为10。 　　
3、：在B列上单击鼠标右键，&复制& B列。
4、在A列单击鼠标的右键，在弹出的对话框中单击&选择性粘贴&，在弹出的对话框中选择&运算&中的你所需要的运算符，在此我们选择&减&，这是本方法的关键所在。
5、 将B列删除。 　　
如果您喜欢本文请分享给您的好友，谢谢！如想浏览更多更好的内容，请登录：
评论列表（网友评论仅供网友表达个人看法，并不表明本站同意其观点或证实其描述）查看: 3496|回复: 8|
在线时间13 小时经验4 威望0 性别男最后登录注册时间阅读权限10UID1833635积分4帖子精华0分享0
EH新人, 积分 4, 距离下一级还需 16 积分
积分排行3000+帖子精华0微积分0
(5.23 KB, 下载次数: 108)
16:40 上传
下载次数: 108
如我要提取每个工作薄中Sheet1中的A6单元格数据，即
average: 82.
但是每个文件中这个数据不同，这样的工作薄有100多个，一个个复制粘贴太慢了！
我的邮箱是：
在线时间814 小时经验1206 威望0 性别男最后登录注册时间阅读权限50UID352736积分1206帖子精华0分享0
EH高级, 积分 1206, 距离下一级还需 794 积分
积分排行886帖子精华0微积分0
建立一个工作簿来存放数据,用VBA来实现
如果你的工作簿命名规范,就容易多了,如工作簿名为1-100,用一个循环语句就能完成
为用而学，学而为用。与我同感，与尔分享。
.cn/dfmcls
在线时间10 小时经验37 威望0 性别男最后登录注册时间阅读权限20UID117323积分37帖子精华0分享0
EH初级, 积分 37, 距离下一级还需 313 积分
积分排行3000+帖子精华0微积分0
用VBA语句实现，DIR可实现目录遍历。
在线时间13 小时经验4 威望0 性别男最后登录注册时间阅读权限10UID1833635积分4帖子精华0分享0
EH新人, 积分 4, 距离下一级还需 16 积分
积分排行3000+帖子精华0微积分0
本帖最后由 天刚亮 于
18:33 编辑
本人excel初学者，请楼上的大师们详细介绍一下吧
在线时间10 小时经验37 威望0 性别男最后登录注册时间阅读权限20UID117323积分37帖子精华0分享0
EH初级, 积分 37, 距离下一级还需 313 积分
积分排行3000+帖子精华0微积分0
见附件，先启用宏。
18:52 上传
下载次数: 291
8.85 KB, 下载次数: 291
本帖评分记录鲜花
总评分:&鲜花 + 1&
在线时间13 小时经验4 威望0 性别男最后登录注册时间阅读权限10UID1833635积分4帖子精华0分享0
EH新人, 积分 4, 距离下一级还需 16 积分
积分排行3000+帖子精华0微积分0
lzw8077 发表于
见附件，先启用宏。
太谢谢了，实现了我想要的效果。我要拜师，好好学习一下这些代码。
在线时间4 小时经验13 威望0 性别保密最后登录注册时间阅读权限10UID2074402积分13帖子精华0分享0
EH新人, 积分 13, 距离下一级还需 7 积分
积分排行3000+帖子精华0微积分0
这个我也想学，请不吝赐教。
在线时间5 小时经验1 威望0 性别保密最后登录注册时间阅读权限10UID1583122积分1帖子精华0分享0
EH新人, 积分 1, 距离下一级还需 19 积分
积分排行3000+帖子精华0微积分0
从多个工作薄中查询相同字段的数据并存在另一个工作薄中。
17:58 上传
下载次数: 145
34.3 KB, 下载次数: 145
在线时间43 小时经验16 威望0 性别男最后登录注册时间阅读权限10UID365297积分16帖子精华0分享0
EH新人, 积分 16, 距离下一级还需 4 积分
积分排行3000+帖子精华0微积分0
正好需要，非常感谢
关注我们，与您相约微信公众平台！
Copyright 1999 - 2017 Excel Home. All Rights Reserved.本论坛言论纯属发表者个人意见，任何违反国家相关法律的言论，本站将协助国家相关部门追究发言者责任！
Powered by
本站特聘法律顾问：徐怀玉律师 李志群律师 &&网页设计教程与开发
提供各种常见网页效果
提供各种各样的设计教程
装扮QQ，让QQ变得更酷
设计参考，提高自升水平
学习服务器和操作系统
提供各种素材和工具
收藏学习资料
您现在的位置：&&>>&&>>&&>>&&>>&正文
excel中怎么样成批地选择单数行?如1、3、5.............15、27等行地内容？
excel中如何批量的选择单数行?如1、3、5.............15、27等行的内容？
这个问题第1个回答：
创建一列，用 ISODD 函数，按此列排序，选择！
这个问题第2个回答：
想知道你选择后要进行什么操作，
可以创建1列，用1、0、1、0、1、0。。。。。填充，然后筛选1，然后进行你想要的操作，例如行高，背景，字体颜色，修改完后，取消筛选就可以了。
如果选1、4、7。。。行，可以用1、0、0、1、0、0.。。。填充。
这个问题第3个回答：
单行是试题题目，双行是答案，我想单把题目复制出来
这个问题第4个回答：
谢谢，这个方法很好，已改成，有没有选择单行、双行的函数？
转载请注明:破洛洛(谢谢合作)
上一篇文章： 下一篇文章：
网友评论：