excel 怎么图里的Aexcel转换公式成B那个样子的公式

来源：蜘蛛抓取(WebSpider) 时间：2015-01-25 09:05 标签： 沃尔图里
excel如何根据公式插入艺术字，如下图，根据A、B列数值（利用公式）得到C列图形_百度知道
提问者采纳
先在表格中插入两个艺术字，一般默认艺术字的VBA名字是wordart1与wordart2，然后在该工作表的change事件中写入下面代码，就能实时根据A1与B1格内容同步更新艺术字了。Private Sub Worksheet_Change(ByVal Target As Range)With Shapes(&wordart 1&)
.TextEffect.Text = Range(&a1&)End WithWith 偿功稗嘉织黄半萎报联Shapes(&wordart 2&)
.TextEffect.Text = Range(&b1&)End WithEnd Sub
表里并不一定就一行数值，能否像其它公式一样往下一拉C列右下角，C列的图形就根据A、B列数值变化而变化，如果A、B列数值一样就不用C列的图形了。
这段代码是自动更新的，它利用了工作表事件worksheet_change来现实，只要某个单元格的数值被更新，就会自动执行使艺术字更新。需要几个艺术字就手工添加几个，然后适当增加代码中对应的艺术字部分就行了。
本人水平不高，基本为零，能把第二幅的代码编好传一下吗。
先在thisworkbook模块中写入下面代码：Private Sub Workbook_Open()'生成艺术字With ActiveSheet
.DrawingObjects.Delete '删除所有形状
For i = 1 To 6 Step 2 '生成三组共6个，两两组合
t1 = Cells(s, 1) 'A列取值
t2 = Cells(s, 2) 'B列取值
.Shapes.AddTextEffect(msoTextEffect1, t1, &宋体&, 18#, msoFalse, msoFalse, 100, 50 + i * 50).Name = &word& & i
.Shapes.AddTextEffect(msoTextEffect1, t2, &宋体&, 18#, msoFalse, msoFalse, 120, 70 + i * 50).Name = &word& & (i + 1)
.Shapes(&word& & i).IncrementRotation 90# '旋转90度
NextEnd WithEnd Sub再在某个放艺术字的工作表模块中放入下面代码：Private Sub Worksheet_Change(ByVal Target As Range)s = 2For i = 1 To 6 Step 2
Shapes(&word& & i).TextEffect.Text = Cells(s, 1)
Shapes(&word& & i + 1).TextEffect.Text = Cells(s, 2)
s = s + 1NextEnd Sub这样就可以使用了。
还是不太明白（本人水平不行，只想学习一点技巧，便于工作），是否方便留下邮箱或QQ联系，本人QQ：
提问者评价
其他类似问题
插入艺术字的相关知识
您可能关注的推广
等待您来回答
下载知道APP
随时随地咨询
出门在外也不愁excel中共A到E列，B列与A列数据相同（但排序不同），怎样使B到E列数据按照A列数据排序，而A列不变？如图_百度知道
按默认排序
在F2中输入或复制粘贴此公式=VLOOKUP($A2,$B:$E,COLUMN(A:A),)右拉填充，下拉填充
F2输入公式：=Match(B1,A$2:A$6,0)，公式下拉复制到F6，再选定B1:F6，按F列升序排序。
其他类似问题
excel的相关知识
等待您来回答
下载知道APP
随时随地咨询
出门在外也不愁excel用&把两个单元格的数据合并，合并后出现有点空隙，我用的是湖北加玉珀加200×20瓶，但合并后如图1湖北和玉珀之间有空隙，怎么没空隙。还有我用SUMIF条件求和，图3的数量就是从图2的那张表中来的，图4里有公式，图2为A表，图3为B表，求和条件都一样，求出的和不等于A表的
excel用&把两个单元格的数据合并，合并后出现有点空隙，我用的是湖北加玉珀加200×20瓶，但合并后如图1湖北和玉珀之间有空隙，怎么没空隙。还有我用SUMIF条件求和，图3的数量就是从图2的那张表中来的，图4里有公式，图2为A表，图3为B表，求和条件都一样，求出的和不等于A表的 50
怎么没空隙设原公式为＝A1&B1&C1如图:这是引用 的单元格有空字符所致，最好是去掉原单元格的空字符，也可将公式改为：=SUBSTITUTE(SUBSTITUTE(A1&B1&C1," ",""),"　","")如图：二SUMIF条件求和从图上看，结果无误．第一行和第二行数据符合求和条件，100+250＝350正确无误第三行与第四行的规格不符，故未计算．
输了你的公式还是没用
将公式复制后粘贴过去试试,
复制过去了还是有空格，那个求和的第三行和第四行的规格是相同的，我截图搞错了，但是就是求不到
告诉我你的邮箱吧,我再与你联系,
好的，，到时给分一定给你
已发邮件,请查收.
其他回答 (1)
1。你的 湖北 这个单元格内容后面有空格，你仔细看下由于你的SUMif公式使用了相对引用，公式向下复制时，引用的范围会自动发生变化。你检查下E4单元的公式
相关知识等待您来回答
微软专区领域专家excel 如图，我本来想计算编号0-4的值，习惯性的把公式编辑成了计算1-5的值，怎么批量修改我编错的公式_百度知道
按默认排序
这还不简单呀,你的公式都是相对引用,把全部公式复制后,然后往前一个格粘贴不就行了吗
如果单单是针对你上表的内容修改的话，只要把第一个错误的公式改正，然后下拉公式就可以了，如果是其它的表格则要看到实际内容才好想办法
其他类似问题
您可能关注的推广
等待您来回答
下载知道APP
随时随地咨询
出门在外也不愁EXCEL中有用什么方法，可以将连续出现2次或2次以上的d替换成一个字母A:如图片中的情况变成 A 0 A 0 d 0 A_百度知道
提问者采纳
设数据在A2开始下列，在B2输入：=IF(AND(A1&&A2,A2=A3),&A&,IF(AND(A1&&A2,A2&&A3),A2,&&))，下拉，然后对B列筛选掉空格行即为你需要的数列。
很厉害，怎么对对B列筛选掉空格行？
提问者评价
其他类似问题
按默认排序
其他2条回答
选中你要改变的那一列，然后点击“分类汇总”，其他默认点击“确定”，在这列的头一列将出现把新出现的一列“&计数”全部替换成“”就OK了！
能否将实现前和实现后都截图。。。
excel的相关知识
您可能关注的推广回答者：
等待您来回答
下载知道APP
随时随地咨询
出门在外也不愁

我要回帖

更多关于 沃尔图里 的文章

 

随机推荐