精华内容
下载资源
问答
  • VBA实现 Excel自动填充

    千次阅读 2020-05-11 11:07:25
    简单的VBA代码搞定: Sub 自动填充() Dim i As Integer For i = 2 To 743 If Range("b" & i) = "" Then '此时只循环判断,填充了B列,只需手动更改一下代码中的"b".(下一段代码也要改) Range("b" & i) = ...

    遇到这种情况时,使用!
    数百次的向下自动填充,手动敲?
    在这里插入图片描述
    简单的VBA代码搞定:

    Sub 自动填充()
    Dim i As Integer
    For i = 2 To 743
        If Range("b" & i) = "" Then           '此时只循环判断,填充了B列,只需手动更改一下代码中的"b".(下一段代码也要改)
        Range("b" & i) = Range("b" & i).Offset(-1, 0)
        End If
    Next
    End Sub
    
    展开全文
  • excel双击列标题自动排序的VBA代码.docx
  • 上周,我发了关于Excel VBA的第一篇文章后,社群里就砸开了锅 看到辣么多小伙伴们,辣么喜欢,我的干劲儿就更足了。于是,我准备把Excel VBA写成一个系列免费教程,撸完这个系列你也是VBA界的黑山老妖了。 今天是这...

    34dd236af5c1e56607631f5d3f31b2b2.png

    上周,我发了关于Excel VBA的第一篇文章后,社群里就砸开了锅

    42ac22f62aa71a3a1e55136adc32dae7.png

    看到辣么多小伙伴们,辣么喜欢,我的干劲儿就更足了。

    于是,我准备把Excel VBA写成一个系列免费教程,撸完这个系列你也是VBA界的黑山老妖了。

    e48d0bd6594ecf30a9142d60d7dd276c.png

    今天是这个系列的第2篇,我们用「如何利用VBA加减乘除运算」的例子,帮助大家理解VBA的一些基础概念。

    基础很重要,正所谓“基础不牢,地动山摇”。好了,闲话不多说,直接上硬菜(大家看图自己跟着实操)

    1. 准备案例

    (1)新建一个Excel工作簿,随意命名

    (2)单元格A4输入「10」,单元格B4输入「+」,单元格C4输入「8」,单元格D4输入「=」

    877cb981284d8190dc296f9aae4de05e.png

    2. 如何计算上述运算,并写入单元格E4里?

    (1)青铜小白-符号运算

    ebd8e1a4c7cd63b3f599f27767dac965.png

    (2)铂金老鸟-公式运算

    e94eaf6c48fd15babd8715fc07360134.png

    (3)王者大牛-代码运算

    ef5dac223f66b130c289d81797faa890.png

    有经验的同学,看到这里,肯定嘴角上扬45度,“我用公式就能轻松实现,何必用VBA呢?”

    不错,用公式确实能够实现上述案例的结果,但是,VBA拥有公式无可比拟的优越性:

    第一,公式无法使用「按钮控件」; 第二,日常的工作场景一般会涉及加减乘除等综合运算,如果我们使用公式就会格外的复杂而难以控制。

    按钮控件:大家可以将其类比我们常见的“保存”、 “预览” 、“确定”等按钮,当然了还有需要输入文本的“文本框”、“下拉列表”、“复选框”等

    18181e8242187e997b4b43a0605562e1.png

    3. 那VBA如何操作呢?

    (1)点选「开发工具」-「插入」-「按钮(窗体控件)」

    b1e88c338dafe313351856beff375ad5.png

    (2)鼠标变为「黑色+号」,按住鼠标「左键」,向右拖动

    7b2433ce5200a1ae2cb068a6708fc06a.png

    (3)松开,自动弹出一个窗口

    f28c3f4924bf528ea5cbc8723552bc05.png

    指定宏:是指按下某个按钮,运行哪一段VBA小程序

    宏(Macro):简单理解就是一段用VBA编写的小程序

    (4)修改宏名「加减法」,点击「新建」

    f8288c3af57767e3cbe8b47f6fb3090e.png

    (5)自动弹出界面,进入了VBA代码编辑器

    f34d58919881295a920775b16c17af78.png

    上次介绍了什么是VBA以后,我们知道多数代码放置在标准代码「模块」中。刚刚的操作自动在左边的「工程」窗口插入「模块1」,而右边是「模块1」的代码区域

    8cedd124ab199055360a8a3630867517.png

    (6)系统自建的代码解释

    fe2715dcf02a25a1f984694ecc0ab019.png

    sub和End sub:VBA系统保留字,具有特殊含义。

    大白话就是“看到这些单词系统就去执行指定的动作”,比如:sub代表一个程序的开始,End sub代表该程序的结束。

    做减法:这段小程序的名字。

    要点注意:

    a. sub和小程序之间有1个空格,切记别忘了 b. 程序名称尽量采用英文 c. 1对圆括号为输入法「英文模式下」的输入内容

    (7)题目分析

    我们将题目翻译为白话就是:计算「单元格A4」和「单元格C4」的和,将结果写入「单元格E4」中

    26da151d43c70c03c39e20e3f97c19b6.png

    (8)开始写代码

    我们按照正常的思考思路,在代码块区域输入“单元格E4 等于 单元格 A4 加上 单元格C4”,按下键盘「Enter」,发现立刻报错,我们看到:

    a. 弹窗提示「编译错误」

    b. 出错的内容自动变为红色

    c. 以「蓝色」模糊定位到出错的位置

    13946e097f695541fde2cd37a66e2f3e.png

    出错的主要原因是我们采用了“人类语言”,而不是计算机能够识别的语言,Excel只能识别VBA的语法。

    那么,VBA语法是什么呢?别急,接着往下看~

    (9)题目过渡

    1ca5ccb351e2b79858ebb60320a9f05c.png

    既然,我们知道怎样等价变换「加号」和「等号」,那么关于「单元格」就必须要引入一个重要的概念【cells属性】

    (10)Cells属性

    cd311729eba8024aee5d28a07282882c.png

    要点注意]:

    a. Cells属性中是先行后列的次序,别颠倒了; b. 字母的数字代表在26个英文字母中的位置,比如:A=1,B=2,C=3.....以此类推.

    (11)书写代码

    我们输入“Cells(4, 4) = Cells(4, 1) + Cells(4, 3)”,发现程序没有报错,然后删除上方错误的代码

    abe9643d0398ec6d4dd0b9ca3ab7d490.png

    (12)保存代码

    点击右上方「保存」,VBA弹窗出现提示,我们点击「否」,在「保存类型」中选择「Excel启用宏的工作簿(*.xlsm)」

    91a139bda3d4c8cd7fe1517e7b326640.png

    5bc71566de68c73d076e168d8173aa02.png

    要点注意:

    a.文件报错为「.xlsm」,而不是「.xlsx」

    (13)点击「按钮1」,我们就可以查看结果

    04ca8a875680adb92a315c8134313af1.png

    (14)鼠标右键 「编辑文字」,然后将「按钮1」变为「查看结果」

    5ea85e422336ed0f582253a3c3c464cd.png

    840f774fa5a892c3d8e99fe10154beb0.png

    4. 总结

    好了,最后,画一下知识点。

    (1)什么是宏?

    一段用VBA编写的小程序。

    (2)宏的结构

    eb26b2312b6540b63ed346f8b89a9a80.png

    (3)cells属性以及cells操作Excel单元格

    cd311729eba8024aee5d28a07282882c.png

    (4)如何在Excel放置按钮,并关联宏

    通过5步实现:

    点选「开发工具」-「插入」-「按钮(窗体控件)」--->

    鼠标变为「黑色+号」,按住鼠标「左键」,向右拖动 --->

    松开,自动弹出一个窗口 --->

    修改宏名「加减法」,点击「新建」

    ---> 编辑代码即可

    要点注意:

    在案例Excel文件中,附赠有日常工作中常用的「指定区域英文首字母自动转换为大写」小程序,大家可以直接拿去用,也可以分析一下那个代码。

    340fefa284443212f3bd9d1eff71584e.png

    最后,留个课后小练习:如何在Excel中其做他运算,并且各种运算符号能够随着按钮自动变换呢?

    4ac3d4f625a475bc5b0c71d66374b07d.png

    推荐:人工智能时代的必学技能

    28d46fe831100d8c06a7772a1ce471a3.png
    展开全文
  • 他的操作也不难,在这里跟大家分享2中方法,下面就让我们来看一下他是如何操作的一、使用vba对于这种自动填充颜色的功能,最简单有效的方法就是使用vba来实现这样的操作,首先我们点击工作表的名...

    Hello,大家好,今天跟大家分享我们如何实现实现点击一个单元格,自动为数据区域的整行填充一个颜色,效果如下图,当我们点击一个单元格的时候们就会为整行填充一个颜色,这个的操作跟我们之前分享的聚光灯效果十分的相似,他的操作也不难,在这里跟大家分享2中方法,下面就让我们来看一下他是如何操作的

    98084aa368863732079faa505211e187.gif

    一、使用vba

    对于这种自动填充颜色的功能,最简单有效的方法就是使用vba来实现这样的操作,首先我们点击工作表的名称然后点击鼠标右键选择查看代码,将如如下代码粘贴进对话框中,然后直接将其关闭,这样的话当我们回到excel中就会发现,当我们点击某一个单元格的时候就会为整行填充红色

    Private Sub Worksheet_SelectionChange(ByVal Target As Range)

    Cells.Interior.TintAndShade = 0

    r = ActiveCell.Row

    Rows(r & ":" & r).Interior.Color = vbRed

    End Sub

    b4cc1652656ecda9c9b3be554a7b8d8d.gif

    二、使用条件格式

    使用条件格式实现这样的效果,我们需要用到的cell函数,cell函数是宏表函数,所谓宏表函数是vba的前身,现在已经被vba所取代,不过我们仍然可以使用,但是只能通过定义名称来调用函数,不能直接使用函数

    Cell函数:它可以返回所引用单元格的格式、位置或内容等信息

    第一参数:info_type,指定所需的单元格信息的类型。

    第二参数:需要其有关信息的单元格,如果省略 reference,则在 info_type 中指定的信息将返回给最后更改的单元格

    Cell函数的第一参数的信息类型很多在这里我们仅仅用到他的 “row”这一个信息类型,它的作用是自动获取鼠标点击的单元格的行号

    05ad080a28c7e970ab74e9c4ae7012fb.png

    首先我们点击想要设置的数据区域,然后找到条件格式,选择新建规则,然后选择使用公式确定格式,输入公式= CELL("row")=ROW(),然后点击格斯找到填充选择一个自己喜欢的然后点击确定,这样的话我们就为鼠标点击的整行填充了颜色

    d445bf3567ab72301e73e40de33443e9.gif

    这样做有一个缺点就是我们需要双击单元格然后移动鼠标才能为整填充颜色,这是因为宏表函数不能实现自动刷新导致的,我们可以使用vba来实现数据的自动刷新,首先我们点击表格的名称,然后点击鼠标右键选择选择查看代码在代码输入窗口中将通用更改为worksheet,然后加上一个单词:calculate然后关闭这个界面,这个时候就能实现自动刷新我们点击某一个单元格就能实现自动填充颜色的效果

    570fa6ede576f82e7fc7df280afc0852.gif

    最后需要注意的是我们使用这两种方法设置自动填充颜色,需要将表格的格式另存为xlsm的格式,因为只有这个格式的文件才能储存vba代码,当我们打开文件的时候需要选择启用宏这样的话代码才能起到作用,

    怎么样,你学会了吗?

    我是excel从零到一,关注我持续分享更多excel技巧

    展开全文
  • 一般的数据透视表,修改原表数据后,需要手动刷新才可以更新计算,本文通过几步简单的操作,来实现自动计算。 情况一:透视表与原始表格在同一个工作表 普通表格转换成为动态表 点击表格中的任意一个单元格,在...

    转载自品略图书馆 http://www.pinlue.com/article/2020/04/2815/5810254760534.html

    一般的数据透视表,修改原表数据后,需要手动刷新才可以更新计算,本文通过几步简单的操作,来实现自动计算。

    情况一:透视表与原始表格在同一个工作表

    普通表格转换成为动态表

    点击表格中的任意一个单元格,在插入菜单,点击表格,此表是有标题的,因此将其勾选,确定后,普通表格就转换成为动态表。

    插入数据透视表

    如果不需要筛选,可以在数据菜单,将其取消。

    回到插入菜单,选择数据透视表,透视表的数据源已经自动选定,现在先以现有工作表为例,指定一个单元格,确定后插入一个数据透视表。

    插入必要的字段和值,构建完整透视表

    勾选需要分析的字段和值,适当调整行列标签的位置,一个透视表就建立好了。

    现在的透视表只能手动更新

    此时添加一条数据,在透视表上使用右键,点击刷新,数据才会重新计算。

    打开开发工具并切换过去

    要实现透视表的自动更新,需要进行一点简单的设置。

    点击电子表格左上角的:文件,点击选项,选择自定义功能区,在开发工具前打勾,确定后,切换到开发工具。

    进行录制宏的操作

    点击录制宏,点击确定。鼠标点击透视表内任意一个单元格,切换至分析菜单,点击全部刷新,返回开发工具,停止录制。

    点击宏,可以在弹出的对话框内看到刚刚录制好的宏。

    复制录制宏自动产生的代码

    点击编辑,在弹出的窗口中,将此段代码选择并复制。

    选择粘贴宏代码的位置

    因为透视表位于工作表sheet1中,所以此处双击左侧的sheet1,在弹出的窗口中选择Worksheet,右侧选择SelectionChange。

    SelectionChange的含义

    从字面意思来说,SelectionChange就是选择发生改变,当单元格从一个移动到另外一个时,就会触发这个事件。

    粘贴刚刚复制的代码

    将刚刚复制的代码粘贴到此段代码的中间。

    这几步操作的意思是,对于工作表sheet1,当活动单元格发生改变时。就运行这段代码。

    如果窗口中有其他多余代码,要将他们删除,然后关闭窗口。

    修改数据,验证透视表是否自动更新

    增加一条记录,回车后,透视表就会自动计算并更新。修改或删除数据,透视表也会自动计算。

    情况二:透视表与原始表格不在同一个工作表

    在新工作表内插入数据透视表

    鼠标点击原表,插入透视表,如果透视表的位置选择新工作表,操作略有不同,先将新插入的透视进行简单设置。

    选择插入代码的位置

    还是在开发工具,点击Visual Basic,在弹出的窗口中双击ThisWorkbook,选择Workbook,再选择SheetSelectionChange,字面意思是指选择的工作表发生了改变,当工作表从一个切换到另外一个时,就会触发这个事件。

    粘贴代码并返回

    将之前录制宏时所产生的代码粘贴到此处,删除其他多余的代码,关闭此窗口返回工作表。

    修改原始表格数据,验证透视是否自动更新

    此时,对原表进行的任何修改,透视表就可以实现自动更新计算了。

    鼠标移回到原表,再多插入一个数据透视表,位置选择新工作表或现有工作表都可以,确定后设置好透视表的字段,对原表进行的任何修改,所有透视表都会自动更新。

    数据透视图也会自动更新

    数据透视图自动更新

    点击数据透视表,在分析菜单内,插入数据透视图,数据更改后,透视图也会实时更改。

    重要的收尾步骤

    保存时要注意的事项

    上述步骤完成后,很重要的一步是保存。

    点击文件,选择另存为,点击浏览,选择电脑上一个合适的位置,修改文件名,类型一定要选择Excel 启用宏的工作簿,再点击保存。

     

    展开全文
  • 想要使用VBA程序在Excel中批量添加超链接;将Excel其中一个工作表的某列添加另外一个工作表的某列的超链接。下面我们就来看看详细的教程。软件名称:Microsoft Office 2019 正式版 中文个人版/学生版(附批量授权) 64...
  • 一个十分有用的软件,在表格中要用大量复制和粘贴时,它的作用就很大了,只需要双击即可实现快速复制或粘贴,跨软件使用那就仅简化复制或粘贴其中一个功能,仅在表格中使用就可以完全不用键盘来复制和粘贴了
  • 本系列讲讲在Outlook中使用VBA实现一些功能 今天讲讲当收件箱收到一个新邮件的时候,会触发响应 Part 1:场景描述 我们希望对收件箱进行监控,每收到一个新邮件的时候,就触发一个动作 延伸一下,我们可以对特定...
  • 看了本文标题,什么叫事件? excel将下面叫做“数据”的工作表根据分类条件拆分成多个sheet工作表,表名为分类条件。 我的理解是发生了什么就执行一些...点击Visual Basic,需要双击对应的表选择对象为worksheet,...
  • 利用VBA开发数据汇总工具通常在日常工作中总会用到Excel并且经常会遇到Excel将多个表格进行汇总。经过工作中的实践,发现用VBA开发具有一定重复性的功能,能够极大提高工作效率。最近,将本人曾开发的的Excel数据...
  • excel使用vba语言实现宏,虽然没学过 但是大致的代码可以看懂 就搞了一个打开excel自动运行宏 在ftp服务器上下载文件到本地的小脚本 0x01 配置 首先需要打开excel的宏,在excel的 开始-》选项-》信任中心 -》宏...
  • EXCEL的VBA版本扫雷

    2018-08-03 16:45:40
    右键标记地雷,未点开方块双击视为点开,已点开方块双击视为递归扫雷(类似于WIN扫雷的左右键一起按)。 可以自由制定宽和高,以及地雷数,自动埋雷。 其实后来我又在这个基础上改进了一版功能更加强大的扫雷,解决...
  • 在Excel表中通过VBA编码,制做了一个小程序,功能是"修改指定文件夹包括子文件中文件后缀名".说明:Excel表的sheel1列A中存放了后缀名,不能删除。...使用方法,双击打开Excel表就可以弹出窗口使用了。
  • 打开excel就能看到数据库查询结果,而且能定时自动完成查询并更新数据,想要实现么?跟着这些步骤操作起来: 1、打开excel中的vb 表单名称->右键->查看代码 2、双击上图中模块1 添加查询数据库及定时...
  • 步骤4 在“工程资源管理器”中双击之前插入的窗体,在“控件”工具箱中将CommandButton控件拖入窗体中,并调整大小和位置,如所图所示。 步骤5 在“工程资源管理器”中右键单击之前插入的窗体,选择“查看代码”...
  • VBA研究】EXCEL启动时自动启动窗体

    千次阅读 2015-08-26 10:09:44
    VBA编程时为了界面美观,我们经常用到窗体Form,那么,如何做到让VBA窗体在EXCEL启动时自动运行呢? 方法有二,第一,双击ThisWorkbook,输入以下代码(Open事件): Private Sub Workbook_Open() UserForm1.Show ...
  • 内容提要:文章介绍在excel中vba打开网页的四种方法,分别使用API、SHELL函数、FollowHyperlink方法、“InternetExplorer”对象来实现。Q:在excel中学习VBA代码时,用vba打开网页的代码如何写?A:按ALT+F11,打开...
  • 纲举目张说明实现功能代码code使用说明 ...添加该事件的方法:Alt+F11调出Microsoft Visual Basic for Applications窗口,双击该文件下的相应的Sheet,例如Sheet1,在右侧出现的Sheet1 (代码)窗口的左上部选择
  • 双击Thisworkbook,选择workbook,选择Open事件,会自动出现2段代码: Private Sub Workbook_Open() End Sub 在出现的代码中间添加这段指令,保存即可。 Private Sub Workbook_Open() Call sheet1.ngy End Sub ...
  • VBA常用技巧

    2014-12-21 16:39:28
    技巧60 使用VBA自动生成图表 12 技巧61 使用独立窗口显示图表 12 技巧62 导出工作表中的图表 12 技巧63 多图表制作 12 第5章 Application对象 12 技巧64 取得Excel版本信息 12 技巧65 取得当前用户名称 12 技巧66 ...
  • 今天又实现了一个“梦寐以求”的功能:为Excel中创建的新记录自动添加时间戳。虽然这是个简单需求,但是我却等了很久。虽然代码不难,但是调试却花了我一个多小时,特次分享给所有有缘之人。方法:1. 首先要确保当前...
  • 让wps支持vba

    2013-04-03 19:52:26
    运行批处理脚本SET.BAT可自动复制和设置。在WIN XP中双击SET.BAT即可。在Win7中, 需在SET.BAT上点右键,以管理员身份运行才能设置成功。 WPS 2012中:ALT + F8 运行宏,ALT + F11 打开宏编辑器。 SET.BAT中的...
  • 要操作工作簿,要使用工作表分析和处理数据,都需要先打开工作簿。...在VBA中,我们可以使用Workbooks对象的Open方法打开工作簿,其语法为:Workbooks对象.Open(FileName,[UpdateLinks],[ReadOnly],[F...
  • 利用几个典型的实例介绍了应用程序层事件(禁用命令)、文档层事件(双击事件和快捷菜单事件)和对象层事件(临时“反应器”)的处理方法,然后用一个序号球的实例模拟了永久“反应器”。 第9章处理在三维空间中的程序设计...
  • 目录 窗体对象及其属性 ...使用窗体制作专业化的软件界面时,Excel VBA允许在窗体中添加ActiveX控件以实现更强大的功能。 步骤1 在工作表中插入一个ActiveX按钮,将其命名为CommandButton1,Captio...
  • Excel VBA编程

    万次阅读 多人点赞 2019-04-11 16:45:51
    文章目录如何创建VBAVBA语法规则声明变量给变量赋值让变量存储的数据参与运算关于声明变量的其他知识变量的作用域特殊的变量——数组声明多维数组声明动态数组其他创建数组的方法数组函数利用UBound求数组的最大索引...
  • vba做一个事件驱动程序。 第一步:点击开发工具-visual basic。 第二步:在当前工作表中编制程序如下: Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) If Target....
  • Excel VBA实用技巧大全 附书源码

    热门讨论 2010-10-08 18:59:24
    01040设置保存自动恢复文件的时间间隔和保存位置 01041停止屏幕刷新 01042使事件无效 01043使取消键无效 01044不显示警告信息对话框 01045设置使用的打印机 01046安装加载宏 01047利用GetOpenFilename方法获取文件名...
  • Vba菜鸟教程

    万次阅读 多人点赞 2020-05-02 18:21:15
    文章目录Vba菜鸟教程编辑器宏vba基本语法运算符变量语句简写语句sub语句调用语句退出语句分支语句循环语句判断语句公式与函数在单元格输入公式利用单元格公式返回值调用工作表函数利用vba函数自定义函数操作对象操作...

空空如也

空空如也

1 2 3 4 5 ... 20
收藏数 1,890
精华内容 756
关键字:

vba自动双击

友情链接: gogojob.rar