事件是Excel编程的重要组成部分。在第20课中对事件进行过介绍,涉及到用户窗体控件以及他们可以响应的一些事件。理解和使用Excel事件是创建易于使用的响应式应用程序的重要工具。
大家好,上节介绍了excel事件的基础知识,后面就按照事件的分类来介绍,本节将首先介绍vba程序开发中最常用的工作表事件。
对于Excel事件的五种类别,已经分别介绍了工作表事件和工作簿事件。而不与对象相关的事件(即ontime方法和onkey方法)也在application主程序对象方法介绍过。(可通过蓝字链接查看。)
在相互关联的数据验证(即“数据有效性”)列表中常见的问题是:当更改第一个数据验证的值时,与其相关联的数据验证的值会一直保留,直到你激活其下拉列表。这可能会产生误导。
Excel工作表中有时有单元格的值希望被锁定,输入密码后才能修改,通常我们使用”审阅“的“保护工作簿”功能来实现,那下面通过vba代码也来实现一下。
Worksheet.Paste(Excel VBA没有Range.Paste方法)在某种程度上与Range.PasteSpecial方法非常相似。Paste方法的主要目的是将剪贴板包含的内容粘贴到相关工作表上。
这是在www.vbaexpress.com中看到的一个示例,实现了自己以前想做而未做的事情。
在单元格A2输入数字,单元格B2中会保存所有输入数字中的最小值,单元格C2中会保存所有输入数字中的最大值,如下图1所示。
累加器是一个或多个单元格,用于保存输入的数值的总和。它们可以是单个单元格,如果A1=6,并且用户在A1中输入2,则显示的结果为8。或者可以是两个单元格,比如说,在A1中输入的数字会立即与B1中的值相加。
这个事件的有个比较典型的应用场景,选择改变后,将选择的单元格所在行标上颜色,也就是所谓的聚光灯:
当工作表单元格中的值被修改后,我需要将修改前的值放置到其右侧单元格中。例如,单元格A1中输入有数值1,当我将其内容修改为2之后,之前的数值1被放置到单元格B2中。可以使用工作表Change事件来实现。
规划求解可能是Excel中最好的功能之一,但它使用起来相当不便,本文探讨一种自动化实现这项功能的方法。
这是thesmallman.com上的一个示例,利用VBA、高级筛选和公式进行数据筛选。
在Excel中,数据只有文本,数值,日期值,逻辑值和错误值五种类型。但是在VBA中,数据类型跟Excel不完全相同。根据数据的特点,VBA将数据分为布尔型(boolean),字节型(byte),整数型(integer),单精度浮点型(single),双精度浮点型(double),货币型(currency),小数型(decimal),字符串型(string),日期型(date),对象型等等
当我们在工作表单元格中键入网址或者电子邮件地址时,Excel会自动将文本转换为超链接,然而,这项看似方便的功能有时候会带来一些麻烦,譬如我们想要编辑这些单元格时,不能直接单击,只能使用鼠标右键或者在公式编辑栏中来选择该单元格并编辑内容。
当你想要随着工作表变化而让Excel自动做一些事情的时候,工作表事件是最能帮助你的了。之前的文章中,介绍过很多与工作表事件相关的基础知识和应用案例,今天再来一个示例。
打开VBE,在工程资源管理器中双击该工作表名称打开其代码模块,在其中输入下面的代码:
Excel作图通常使用自带图表或第三方插件图表。自带图表种类比较少,仅仅包含柱形图、条形图、折线图等基础图形,且功能有限。优秀的第三方插件图表是很好的扩充。
这可能看起来很奇怪,但无论想要多少个前面的条目,运算符值始终为xlTop10Items。
今天跟大家分享的技巧来自thesmallman.com,一个分享Excel技巧技术的网站。
如果“a”代表“Apple”,“b”代表“Bilibili”,“c”代表“Coolqi”,……,等等。我们可以在单元格中只输入这些代表字母,而让Excel自动输出完整的单词内容,如下图1所示。
在编写VBA代码处理工作表单元格时,经常会使用到SpecialCells方法来获取特定单元格,然而,使用该方法会引起一些“副作用”,我们还是了解清楚比较好些。
通常,我们可以使用Excel的“数据验证”功能来设置指定单元格或单元格区域仅能输入指定范围的整数或者小数,如下图1所示。
研究和分享Excel知识和技术是自已的一项业余爱好,自已平时主要花的时间还是在工作上,毕竟这是自已的饭碗。说实在的,工作确实很忙,想要上班时“偷”点时间来写Excel文章的机会很小,因此都是晚上或者周末来准备要发表的文章,这样才能实现每日的分享。
Q:我想要在用户修改工作表指定单元格的内容时,在另一工作表中记录修改的时间。例如,在工作表Sheet1的单元格B2中,每次用户将该单元格值修改为某一大于0的数值时,则在工作表LogB2中记录下其修改的时间。
引言:本文学习整理自powerspreadsheets.com,非常清晰透彻地讲解如何使用VBA进行复制粘贴操作。
从多个Excel工作表(子工作表)中获取信息,并用子工作表中的所有数据填充汇总工作表(父工作表),这是很多朋友会提到的常见要求。如果部分数据是从添加新工作表到工作簿中而增长的,那么获得这些数据的汇总非常方便,例如,添加单独的工作表,包含新月份的数据。
在Excel工作表中,复制粘贴是最常用的操作之一。在已经输入的数据中,找到并复制想要的数据,然后粘贴到指定的地方,是再自然不过的操作了。或者从工作表的一个单元格区域复制到同一工作表中另外的单元格区域,或者从工作表的一个单元格区域复制到另一工作表中的单元格区域,甚至从工作表的一个单元格区域复制到不同工作簿中的工作表单元格区域。那么,如何使用VBA代码来实现复制粘贴操作呢?本文将介绍常用的一些代码。
大家好,本节开始将介绍excel事件的内容。前面介绍过的application主程序对象的ontime方法和onkey方法,也是一类的Excel事件。下面正式开始课程。
Q:我有两个工作表,分别是“表1”和“表2”,如下图1和图2所示。每天我打开工作簿后,在“表1”中的单元格C2中录入数据,这个数据会自动更新到“表2”与对应的日期相应的单元格中,其中“表1”中单元格A2我设置了公式=TODAY(),以便每天打开工作簿时,自动更新日期。
如下图1所示,当选择工作表Sheet2列A中的单元格下拉列表项后,其相邻列B中的单元格下拉列表项会与列A中选择项相关联,也就是说,列A中选择不同的项,列B中也会呈现相应的项。
这是一个有趣的VBA编程练习,来自于dailydoseofexcel.com。使用VBA代码在工作表中将数字显示为七段显示,如下图1所示。
Q:在《问与答122:如何根据输入数据动态添加提示信息?》中,我们实现了根据工作表“DataValue”中座位号、员工号及员工名字等信息,在工作表“Seatingarrangement”中的座位号单元格显示关于座位号、员工号及员工名字等信息提示,如下图1所示。
文章背景: 作为VBA新手,在运行自己编写的代码时,可能会遇到VBA运行缓慢的问题。可以采取以下8个措施来提高运行效率。
这是在contexturesblog.com中看到的一个技巧,非常有意思,稍作整理和修改,在这里和大家分享。
Q:这个问题很奇怪,需要根据在工作表Sheet1中输入的数值高亮显示工作表Sheet2中相应的单元格。具体如下:
大家好,后面开始将介绍VBA对象模型部分内容,会引入许多新的概念,尽量循序渐进的介绍相关内容,力求深入浅出。
使用Excel的宏来实现将每10行数据创建为一个新表的功能。以下是一个示例的VBA代码:
本文将给出一段VBA代码,从非连续的单元格区域复制值并粘贴到另外指定的单元格区域。
Q:在列A中是一系列日期,我如何操作,使得含有当天日期的单元格显示为红色,距离当天10天内的日期单元格显示为黄色?
遍历每个工作表,如果工作表的单元格S1中的值为“1”,则将该工作表的“Print_Area”(打印区域)复制并粘贴到一张空白幻灯片中。
如果Excel表格里数据比较多的时候,查看数据很容易看错行,这时候如果给要查看的这行数据标记颜色,那么查看数据就方便多了。
⭐Excel VBA宏(Visual Basic for Applications)是一种用于在Microsoft Excel中自动化和扩展功能的编程语言。VBA允许用户编写自定义的脚本或宏,以便通过执行一系列指令来自动完成特定任务。
本文的背景是:大学关系很好的老师问我能不能把Excel中1000个超链接网址对应的pdf文档下载下来。
类模块具有引发事件的能力,这也是它的另一个强大的功能。我们可以定义自已的事件,并在代码中引发这个事件,其他类模块也可以捕获这些自定义的事件并作出相应的响应。
Excel数据有效性(在Excel 2013及以上版本中改称数据验证)是一项很方便的功能,帮助我们让用户在单元格中输入规定的数据。然而,将数据复制粘贴到设置了数据有效性的单元格时,会破坏掉数据有效性设置。
引子:本文改编著自Microsoft很久以前的一篇技术文章,虽然年代已久,但完全不过时。文章以完整的示例详细介绍了用户窗体的基本概念及常用技术,能够帮助你快速掌握用户窗体编程基础。
首先,单击工作表左上角的交叉区域,选中工作表所有单元格。然后,单击功能区“开始”选项卡的“条件格式—新建规则”,在弹出的“新建格式规则”对话框的“选择规则类型”中选择“使用公式确定要设置格式的单元格”,在“为符合此公式的值设置格式”中输入公式:
假设要将一个工作簿中工作表Sheet2的单元格区域A1:B50的数据复制到当前工作簿的工作表Sheet1相应的单元格区域,可以使用下面的代码:
领取专属 10元无门槛券
手把手带您无忧上云