首页
学习
活动
专区
工具
TVP
发布
精选内容/技术社群/优惠产品,尽在小程序
立即前往

VBA程序:对加粗的单元格中的值求和

标签:VBA 下面的VBA自定义函数演示了如何对应用了粗体格式的单元格求和。...ErrHandler: '检查是否溢出 If Err.Number = 6 Then SumBold = CVErr(xlErrNum) Resume Continue End Function 注意,当求和的单元格区域中单元格格式发生更改时...,不会触发任何事件;而使用Application.Volatile语句,每当在工作表上的内容更改时,单元格都会重新计算。...这意味着,仅对求和单元格区域中的单元格设置加粗格式,使用该自定义函数求和的值不会改变,除非按F9键强制计算,或者在工作表中输入内容导致工作表重新计算。...这个程序也提供了一个模板,可以稍作修改对其它格式设置的单元格来求和

18610

使用VBA快速给所选择的多个单元格区域绘制矩形边框

下面的代码能够给当前工作表中所选择的单元格区域绘制红色的矩形边框。 首先,选取想要绘制边框的所有单元格区域,可以在选择单元格区域的同时按住Ctrl键,从而选取多个单元格区域。...然后,运行下面的代码,VBA会自动给所选单元格区域的周边绘制红色的边框,效果如下图1所示。...Dim redBox As Shape Dim selectedAreas As Range Dim i As Integer Dim tempShape As Shape '遍历当前工作表中每个所选区域...,也可以使用VBA快速完成,代码如下: Sub deleteRedRectBox() Dim shp As Shape '遍历当前工作表中每个形状 For Each shp In ActiveSheet.Shapes...If Next shp End Sub 可以看到,这种情形使用VBA代码很方便,避免了你选择单元格区域然后进行一系列格式设置的频繁操作。

72420
  • 您找到你想要的搜索结果了吗?
    是的
    没有找到

    VBA自定义函数:一次查找并获取指定表格中的多个值

    标签:VBA,自定义函数 这个自定义函数来自于forum.ozgrid.com,可以在指定表中查找多个值,并返回一组结果,而这些结果可以传递给另一个函数。...Variant ReDim Result(Length - 1) For i = 0 To Length - 1 Result(i) = Application.WorksheetFunction.VLookup...IDs(i), Table, TargetColumn, False) Next MultiVLookup = Result End Function 其中,参数是ReferenceIDs代表要查找的值...;参数Table是包含查找内容的表;参数TargetColumn代表表中返回结果的列;参数Delimeter代表分隔符,可选,取决于第一个参数。...图1 要查找MyTable表中A、B、D对应的第2列的值并求和,可使用公式: =SUM(MultiVLookup("A,B,D",MyTable,2)) 或者,将要查找的值放在一个单元格中,然后使用公式来查找相应的值

    25210

    VBA技巧:记住单元格更改之前的值

    标签:VBA,工作表事件 当工作表单元格中的值被修改后,我需要将修改前的值放置到其右侧单元格中。例如,单元格A1中输入有数值1,当我将其内容修改为2之后,之前的数值1被放置到单元格B2中。...在该工作表代码模块中输入代码: Private Sub Worksheet_Change(ByVal Target As Range) Dim sOldValue As String Dim sNewValue...A1中重新输入值时,原值会自动放置到单元格B1中。...当一列单元格区域中的值发生改变时,需要将修改之前的值放置到相邻列对应单元格中,例如对于单元格区域A1:A10,其值发生改变时,原来的值会自动放置到单元格区域B1:B10对应的单元格中。...Value = Target.Value Target.Value = sNewValue Application.EnableEvents = True End If End Sub 有兴趣的朋友可以试试看

    37810

    Excel VBA解读(140): 从调用单元格中获取先前计算的值

    学习Excel技术,关注微信公众号: excelperfect 如果有一个依赖于一些计算慢的资源的用户定义函数,可能希望该用户定义函数在大多数情况下只返回其占用的单元格中最后一次计算得到的值,并且只偶尔使用计算慢的资源...GetSlowResource(vParam) End If End Function Application.Caller.Text 如果使用Application.Caller.Text,则不会获得循环引用,但会检索单元格中显示为字符串的格式化值...因此,如果单元格被格式化为带有2个小数位的数字,则检索到的值将被截断为2个小数位。...下面是名为PREVIOUS的XLL+函数的代码,该函数具有使其成为易失性或非易失性的参数。(命令等效函数默认为易失性,但在使用它将前一个值传递给VBA用户定义函数时,通常希望它是非易失性的)。...小结 有几种方法可以从VBA用户定义函数的最后一次计算中获取先前的值,但最好的解决方案需要使用C++ XLL。

    6.8K20

    Excel VBA解读(146): 使用隐式交集处理整列

    同样,如果将单元格区域A1:A15命名为myCells,那么在单元格B13中输入: =myCells 并不会返回A1:A15中的全部值,而是返回myCells与第13行的交叉单元格A13中的值m。...图3 如果在多个单元格中输入上述数组公式,则会获取多个值,如下图4所示,在单元格区域C5:C9输入上面的数组公式,会得到列A中的前5个数据。 ? 图4 那么,对于函数Excel又是怎么处理的呢?...例如,VLOOKUP函数通常使用单个值或引用作为要查找的值,使用单元格区域作为查找表。...例如,公式: =VLOOKUP(A4,$A:$C,3,false) 在列A至列C组成的区域中精确查找单元格A4中的内容,并返回列C中相应的值。...如果将单元格区域作为要查找的值,并且输入的不是数组公式: =VLOOKUP($A:$A,$A:$C,3,FALSE) 那么Excel将为查找值使用隐式交集,上面公式的结果如下图5所示。 ?

    5K30

    Excel无所不能的XLOOKUP,XLOOKUP函数不同场景的应用方法

    直接在H4单元格中输入公式=VLOOKUP(G4,C4:E11,3,0)就可以查找出对应姓名的年龄。...随后XLOOKUP函数来了一个延伸板的动态查找,因为XLOOKUP函数的查找值第一参数可以是一个值,也可以是一组值,所以直接写成=Xlookup(G4:G6,C4:E11,E4:E11)就可以批量查找出多个姓名对应的年龄...,此技巧对VLOOKUP和LOOKUP而言算不上什么伤害,因为常规大家写完公式都会下拉公式填充,都一样可以查找出多个字段值。...XLOOKUP函数也可以兼容通配符查找,不过XLOOKUP函数查找的通配符遇到多个结果时返回的是第一个结果值。...最后给大家分享一下低版本Office的同学如果不想升级软件,可以使用VBA自定义一个XLOOKUP函数哦,方法如下: VBA自定义XLOOKUP函数

    65950

    VBA自定义函数:满足多个条件并返回多个值的查找

    标签:VBA,自定义函数 如下图1所示,查找列A中值为“figs”的行,并返回该行中内容为“X”的单元格对应的该列中首行单元格的内容,即图1中红框所示的内容。...图1 在单元格B20中输入公式: =lookupFruitColours(A20,"X",A2:J17,A1:J1) 这个公式使用了自定义函数lookupFruitColours。...这个自定义函数的代码如下: Option Compare Text Function lookupFruitColours(ByVal lookup_value As String, _ ByVal...lookupFruitColours = Left(result_set, Len(result_set) - 1) End Function 其中,参数lookup_value代表要在指定区域第一列中查找的值...,参数intersect_value代表行列交叉处的值,参数lookup_vector代表指定的查找区域,参数result_vector代表返回值所在的区域。

    78210

    Excel公式技巧17: 使用VLOOKUP函数在多个工作表中查找相匹配的值(2)

    我们给出了基于在多个工作表给定列中匹配单个条件来返回值的解决方案。本文使用与之相同的示例,但是将匹配多个条件,并提供两个解决方案:一个是使用辅助列,另一个不使用辅助列。 下面是3个示例工作表: ?...图3:工作表Sheet3 示例要求从这3个工作表中从左至右查找,返回Colour列中为“Red”且“Year”列为“2012”对应的Amount列中的值,如下图4所示的第7行和第11行。 ?...这样,获取值的数组公式(单元格C7)如下: =VLOOKUP(A7&”|”&B7,INDIRECT("'"&INDEX(Sheets,MATCH(TRUE,COUNTIF(INDIRECT("'"&Sheets...16:使用VLOOKUP函数在多个工作表中查找相匹配的值(1)》。...D1:D10 传递到INDEX函数中作为其参数array的值: =INDEX(Sheet3!

    14.1K10

    Excel公式技巧16: 使用VLOOKUP函数在多个工作表中查找相匹配的值(1)

    在某个工作表单元格区域中查找值时,我们通常都会使用VLOOKUP函数。但是,如果在多个工作表中查找值并返回第一个相匹配的值时,可以使用VLOOKUP函数吗?本文将讲解这个技术。...最简单的解决方案是在每个相关的工作表中使用辅助列,即首先将相关的单元格值连接并放置在辅助列中。然而,有时候我们可能不能在工作表中使用辅助列,特别是要求在被查找的表左侧插入列时。...图3:工作表Sheet3 示例要求从这3个工作表中从左至右查找,返回Colour列中为“Red”对应的Amount列中的值,如下图4所示。 ?...B:B"}),$A3) INDIRECT函数指令Excel将这个文本字符串数组中的元素转换为单元格引用,然后传递给COUNTIF函数,同时单元格A3中的值作为其条件参数,这样上述公式转换成: {0,1,3...函数的单元格区域,因此: =VLOOKUP($A3,INDIRECT("'"&INDEX(Sheets,MATCH(TRUE,COUNTIF(INDIRECT("'"&Sheets&"'!

    25.6K21

    数据地图系列9|excel(VBA)数据地图!

    今天要跟大家分享的是数据地图系列的第九篇——excel(VBA)数据地图! 关于VBA在excel中的应用非常广泛,本篇仅仅是给出示例代码,不会对基础操作做太过详细的讲解。...选中某一个省份图形,在左上角的名称栏中直接修改定义或者,在绘图工具——选择窗格中,双击该图形默认名称,进行自定义。(中国地图就需要定定义34个省级行政单位名称)。...将F9:G13单元格区域选中并定义名称为color_table ? 使用concatenate函数制作分段值范围。 将D9-D13区域的五个单元格分别命名为color1~color5。...然后将提前准备好的地图填充色复制进D9-D13单元格中。 7、在C4列中匹配B列指标值的颜色范围。(使用vlookup函数) ?...C" & i).Value).Interior.Color '对各省的图形使用其颜色栏的值作为名称所指向的单元格的颜色填充 Next i Application.ScreenUpdating

    5.1K60

    基于单元格值查找并显示图片

    在Excel中,可以在一个单元格中显示一张根据另一个单元格的信息而变化的图片。...由于Excel中的图片不能放在单元格中,而是浮在工作表顶部,并且由于查找函数返回的是值,而不是图片,因此需要一些VBA代码来模拟查找图片并将其放置在单元格中。...举个例子,假设一个由Bob、Ted、Carol和Alice组成的合伙企业希望在投标单上有主要合伙人的照片。在单元格A2的下拉列表中选择主要合作伙伴,图片将显示在单元格F1的顶部,如下图1所示。...图1 图片放在工作表Sheet1的任何位置,在图片所在的单元格F1中,输入以下公式: =VLOOKUP(A2, PicTable, 2, False) 然后,在该工作表Worksheet_Calculation...VBA代码隐藏所有图片,然后显示与F1中的值相对应的图片,必要时重新定位。

    35810

    VBA实战技巧:快速返回最后一次编辑的单元格

    在有些情况下,我们可能需要快速返回到最后一次编辑的单元格。例如,最后一次编辑的单元格是单元格K112,然而我的当前单元格在单元格C1,如何定位这个最后编辑的单元格并快速返回到该单元格呢?...& Target.Address, ScreenTip:="单击返回到最近一次编辑的单元格",TextToDisplay:="返回" End Sub 代码假设你正在操作的工作表是Sheet1,并且将返回单元格的链接放置在单元格...A2中,你可以根据实际情况修改为适合你的工作表和单元格地址。...此时,你在工作表Sheet1中进行编辑操作后,单击单元格A2中的“返回”,可以快速回到最后一次编辑操作的单元格,如下图1所示。...如何摆脱Excel事件操作带给我们的影响呢?可以使用Application对象的EnableEvents属性,先将其值设置为False,暂时屏蔽事件,待操作完成后再将其设置为True。

    95320

    Excel实战技巧53: 在VBA代码中使用工作表公式更有效地实现查找

    excelperfect 在工作表中查找值是很常见的操作,我们可以使用VLOOKUP函数、MATCH函数、INDEX函数等来查找值。...当使用VBA代码在大量的数据中进行查找操作时,灵活运用工作表公式,往往能够提高效率。...下图1所示的工作表,要在列G中查找列A中的值,如果找到则将G列中相应行对应的列H中的值复制到列A中相应行的列B中。 ?...图1 例如,单元格A2中的“砖基础”与单元格G3中的值相同,则将单元格H3中的值复制到单元格B2中,如下图2所示。 ? 图2 首先,定义一个动态名称,以便列G中添加项目时能够自动更新。...说明:本文的例子只是演示公式在VBA中的运用。其实,本例在工作表中使用VLOOKUP函数也很容易。

    2.8K20

    【学习】Vlookup、Lookup都靠边,Mlookup函数来了

    Vlookup是最常用到的查找函数,但它有很大的局限性。比如:只能查找第一个符合条件的值,无法任意位置查找和多条件查找等。于是,兰色用VBA编写了一个功能强大的Mlookup函数。...一、用法介绍 =Mlookup(查找内容,查找区域,返回值所在的列数,第N个) 语法说明: 查找内容:除了单个值外,还可以选取多个单元格,进行多条件查找。...查找区域:同VLOOKUP 返回值的在列数:同VLOOKUP 第N个:值为1就返回第1个符合条件的,值为2就返回第2个符合条件的....当值为0值时,返回最后1个符合条件的值。 二、功能演示。...【例】如下图所示的入库表中,要求完成以下查找。 ? 1、查找第2次电视的进货数量。 =Mlookup(A11,A2:D8,4,2) ?...2、查找电视的最后一次入库数量 =Mlookup(A11,A2:D8,4,0) ? 3、查找47寸电视的第1次进货数量。 =Mlookup(A11:B11,A2:D8,4,1) ?

    2.5K81

    EXCEL必备工具箱17.0免费版

    必备工具箱,极速vlookup功能,让不会Vlookup也能按关键字进行查找替换,让几十万条类似vlookup的查找替换也不会卡死(2021.4.5) EXCEL必备工具箱,用号掩盖字符功能,为保护用户隐私...EXCEL必备工具箱--选择图片所在单元格功能,批量选择有图片的单元格或没有图片的单元格 EXCEL必备工具箱--超强查找功能的自定义函数Wlookup,lookup,Llookup,Xlookup替代版...,解决了EXCEL不能批量在多个单元格前面或后面删除内容的苦恼 EXCEL必备工具箱--为图片添加超链接功能,批量用单元格中的内容添加为图片的超级链接 EXCEL必备工具箱--图片计数,统计当前文档内图形或图片的数量...Excel必备工具箱--保存图片功能,将当前选择的单元格区域或当前选择的图形、图片保存为文件。...EXCEL必备工具箱--跨表提取行功能,帮你从相同格式的多张表格中提取关键字一样的行到一个表中 EXCEL必备工具箱--强制读取VBA代码,绕过EXCEL安全机制,无论采用何种保护措施,都可以直接读出VBA

    5.3K40

    升值加薪Excel神助攻,数据透视表堪称神器!

    VLOOKUP、数据透视表、条件格式…你用这几个技巧做,80%的工作需求都能解决。今天特意整理了这些操作技巧,拯救同在“表海”中挣扎的你,让你的工作效率超乎想象。 ?...操作步骤:在数据源当中的第一行,输入:出生年月日,然后选中整列区域,按键盘CTRL+E,完成快速填充。也可以在第一行右下角单元格处,双击十字句柄,点击右下角的填充选项,选择【快速填充】。 ?...Index+Match中,Match用以确定数据所在的行值和列值(查找姓名所在的行,查找身份证号所在的列,行列交汇的数据就是要匹配出来的数据),Index负责调出由Match确定的行值和列值交叉位置确定的唯一数据...操作方式:选中字段下的数据—右键单击选择【创建组】-创建“起始于”和“终止于”对应的数值,也可采用自带的年、季度、月等组合方式。 ? 切片器:一枚切片器,轻松控制多个数据透视表,数据展现随心而动。...操作方式:选中数据透视表中任一数据——【分析】选项卡—插入切片器—右键单击切片器—报表连接—勾选需要控制的多个表格。 ? 综合运用上面的功能,一张人员基本情况分析的看板就实现了。 ?

    2.2K20

    Excel实战技巧86:从下拉列表中选择并显示相关的图片和文字说明

    在《Excel实战技巧15:在工作表中查找图片》中,我们使用名称和INDEX/MATCH函数组合,在工作表中显示与所选择名称相对应的图片。...在《Excel实战技巧22:在工作表中查找图片(使用VBA代码)》中,使用VBA代码来达到根据名称显示相应图片的效果。...图1 选择要显示的图片所在单元格F3右侧的单元格G3,输入公式: =VLOOKUP(E3,B3:D10,3,0) 结果如下图2所示。 ? 图2 在单元格G3的位置,插入一个文本框。...选取该文本框,在公式栏中输入: =G3 将文本框与单元格G3链接,如下图3所示。 ? 图3 此时,选择单元格E3中的下拉列表选项,看到右侧显示相应的图片和文字说明,如下图4所示。 ?...图4 相关文章: Excel实战技巧15:在工作表中查找图片 Excel实战技巧21:在工作表中查找图片 Excel实战技巧22:在工作表中查找图片(使用VBA代码) Excel实战技巧85:从下拉列表中选择并显示相关的图片

    7.2K20

    如何快速处理大量数据

    在Excel中快速处理大量数据,你可以尝试以下几种方法: 1. 使用筛选功能 1.1自动筛选:点击列标题旁的下拉箭头,选择筛选条件,即可快速显示出符合特定条件的数据。...利用排序功能 2.1对数据进行升序或降序排列,可以快速找出最大值、最小值或按某种顺序组织数据。 3. 使用透视表 3.1透视表是Excel中非常强大的数据分析工具。...4.2利用`VLOOKUP`、`HLOOKUP`、`INDEX-MATCH`等函数进行数据查找和匹配。...数据分列和合并 5.1如果数据格式不统一,可以使用“数据”菜单中的“分列”功能来快速将一列数据拆分成多列。 5.2使用“合并单元格”功能将多个单元格合并为一个,便于展示或计算。 6....宏和VBA编程 7.1对于需要重复执行的复杂任务,可以考虑使用宏录制功能或编写VBA代码来实现自动化操作。 8.

    11810
    领券