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

如何在单元格选择上运行宏,而不是ActiveCell

在Excel中,可以通过以下步骤在单元格选择上运行宏,而不是在ActiveCell上运行宏:

  1. 打开Excel文件并进入开发者模式。在Excel菜单栏中,选择"文件",然后选择"选项"。
  2. 在选项窗口中,选择"自定义功能区"。
  3. 在右侧的"主选项卡"列表中,勾选"开发者"选项卡,并点击"确定"。
  4. 现在在Excel菜单栏中,应该会出现"开发者"选项卡。
  5. 点击"开发者"选项卡中的"Visual Basic"按钮,打开Visual Basic for Applications(VBA)编辑器。
  6. 在VBA编辑器中,可以看到项目资源管理器和代码窗口。
  7. 在项目资源管理器中,双击打开需要运行宏的工作簿。
  8. 在代码窗口中,找到需要运行宏的工作表。
  9. 在工作表的代码窗口中,选择"Worksheet"对象,并选择"SelectionChange"事件。
  10. 在SelectionChange事件的代码窗口中,编写宏的代码。

以下是一个示例的VBA代码,用于在单元格选择上运行宏:

代码语言:txt
复制
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    ' 在这里编写你的宏代码
    ' 可以使用Target变量来引用被选择的单元格
End Sub

在上述代码中,你可以编写你的宏代码,以便在单元格选择时执行特定的操作。你可以使用Target变量来引用被选择的单元格。

需要注意的是,这种方法只会在所选单元格发生更改时触发宏的运行。如果你希望在单击或悬停在单元格上时运行宏,可以选择其他事件,如"Worksheet_BeforeDoubleClick"或"Worksheet_BeforeRightClick"。

推荐的腾讯云相关产品和产品介绍链接地址:

页面内容是否对你有帮助?
有帮助
没帮助

相关·内容

Excel 编程的常用代码

Const MyStr = “Hello”, MyDouble As Double = 3.4567 选择当前单元格所在区域 在EXCEL97中,有一个十分好的功能,他就是把鼠标放置在一个有效数据单元格中...) end sub 单元格位移 sub my_offset ActiveCell.Offset(0, 1).Select’当前单元格向左移动一格 ActiveCell.Offset(0, -1).Select...’当前单元格向右移动一格 ActiveCell.Offset(1 , 0).Select’当前单元格向下移动一格 ActiveCell.Offset(-1 , 0).Select’当前单元格向上移动一格...给当前单元格赋值 ActiveCell.Value = “你好!!!”...给指定单元格赋值 例如:A1单元格内容设为”HELLO” Range(“a1″).value=”hello” 又如:你现在的工作簿在sheet1,你要往sheet2的A1单元格中插入”HELLO” 1

2.7K10
  • Excel技巧:使用上方单元格的值填充空单元格

    有时候,工作表列中有许多空单元格不是在每行都重复相同的内容,这样可以使报表更容易阅读,然而也会导致一些问题,例如不方便排序或筛选数据。...图1 首先,选择包含空单元格的列,单击功能区“开始”选项卡“编辑”组中的“查找和选择——定位条件”,在弹出的“定位条件”对话框中勾选“空值”前的单选按钮。...然后,输入=号,按向上箭头键选择上方单元格,再按Ctrl+回车键,在所有被选择单元格中输入公式。 最后,选择列A,复制数据,然后在所选列中单击右键,选择“粘贴值”命令。...图2 如果你经常遇到填充空单元格的操作,那么可以使用来代替手工操作。...With .Cells(1, lngCol).EntireColumn .Value = .Value End With End With End Sub 在运行这个之前

    3.3K30

    AutoHotkey 通过 COM 操作 Excel 文档

    还有原来金士顿的终身质保不是噱头,原来真的可以。最近干坏了一条1600内存,大概5年以前的。...实际情况是这样:默认情况下,在任何时候使用脚本创建 Office 应用程序的实例,该应用程序都将在屏幕不可见的窗口中运行。Excel 其实存在于后台,所以您无法看到它。...正如您所期望的,有相似的命令来创建包含整个行的范围: objRange := objExcel.ActiveCell.EntireRow 如果您想要选择的行或列不同于带有活动单元格的行或列怎么办?...例如,下面这段代码使单元格 E5 成为活动单元格,然后通过选择整个行来创建包含第 5 行中的所有单元格的范围: objRange := objExcel.Range("E5") objRange.Activate...objRange := objExcel.ActiveCell.EntireRow 要创建包含一组单元格的范围: objRange := objExcel.Range("A1:C10"

    1.8K20

    EXCEL VBA语句集300

    Application.ScreenUpdating=True ‘打开屏幕刷新 (7) Application.Enable.CancelKey=xlDisabled ‘禁用Ctrl+Break中止运行的功能.../单元格区域 (32) ActiveCell.CurrentRegion.Select 或Range(ActiveCell.End(xlUp),ActiveCell.End(xlDown))....Select ’选择当前活动单元格所包含的范围,上下左右无空行 (33) Cells.Select ‘选定当前工作表的所有单元格 (34) Range(“A1”).ClearContents...‘清除活动工作表单元格A1中的内容 Selection.ClearContents ‘清除选定区域内容 Range(“A1:D4”).Clear ‘彻底清除A1至D4单元格区域的内容,包括格式...=XX ‘将值XX输入到所选单元格区域中 (40) ActiveWindow.RangeSelection.Count ‘活动窗口中选择单元格数 (41) Selection.Count ‘当前选中区域的单元格

    1.9K40

    Application主程序对象基础

    比如activecell 和 activesheet等。 3、调用excel的内部函数。利用excel内置函数,可以减少代码的编写工作量。 本节主要复习下对象的引用,回顾下返回活动状态的对象。...以最底层的range单元格对象的引用:引用工作簿“工作”这个文件的工作表“表1”中的A1单元格的具体语句就是:application.workbooks(”工作.xlsx“).worksheets("...表1").range("A1") 由于系统只运行一个excel程序,application主程序对象作为最顶层的通常可以省略。...1、activecell属性 activecell属性用来返回一个range对象,代表动动窗口或者指定窗口中的活动单元格。...(例如,如果选择单元格,此属性就返回range对象)。 8、sheets属性 sheets属性用来返回一个sheets集合,代表活动工作簿中所有的工作表。

    84620

    啰哩啰嗦地讲透VBA中引用单元格区域的18个有用方法--Cell属性和Offset属性

    使用Range.Cells属性相对于单元格区域引用单个单元格 假设当前选择区域覆盖了活动工作表的单元格C3至D5(单元格C3、C4、C5、D3、D4和D5)。你已经知道这是一个Range对象。...例如,假设要处理从单元格A1到单元格B10的单元格区域,想要选择单元格A5。...Cells属性显示其有用性的最重要场景可能是使用变量不是实际数字作为Cells属性的参数。实际,可能经常会发现要处理这种情况(使用变量不是硬编码的数字作为Cells属性的参数)。...ActiveCell.Offset(1,1) 本例中,没有使用Range,而是使用Application.ActiveCell属性,该属性返回代表当前活动单元格的Range对象。...为什么应该学会使用Range.Offset属性引用Range对象 Range.Offset属性在下列情形通常最有用: 1.使用变量不是实际的数字作为参数 2.循环过程 录制时使用相对引用时,录制器也通常使用

    3.8K40

    VBA实战技巧29:从一个工作表复制数据到另一个工作表

    Select Selection.Copy Sheets("汇总").Select Range("A3").Select Selection.End(xlDown).Select ActiveCell.Offset...False Selection.Copy Sheets("汇总").Select Range("A3").Select Selection.End(xlDown).Select ActiveCell.Offset...Range(Selection, Selection.End(xlDown)).Select Range(Selection, Selection.End(xlToRight)).Select 表示从所选单元格开始...Selection.End(xlDown).Select ActiveCell.Offset(1,0).Range("A1").Select 表示选择最后一行数据之后的空行中的第1个单元格。...这段代码很直观,基本根据三个工作表的特点,采用了“硬编码”,可以根据具体工作表的情况对上述代码进行修改。当然,也可以优化代码,使其具有通用性。 运行代码后,结果如下图4所示。 ? 图4

    24.7K31

    这些掌握了,你才敢说自己懂VBA

    (1)点选「开发工具」-「插入」-「按钮(窗体控件)」 (2)鼠标变为「黑色+号」,按住鼠标「左键」,向右拖动 (3)松开,自动弹出一个窗口 指定:是指按下某个按钮,运行哪一段VBA小程序...以「蓝色」模糊定位到出错的位置 出错的主要原因是我们采用了“人类语言”,不是计算机能够识别的语言,Excel只能识别VBA的语法。 那么,VBA语法是什么呢?...「Excel启用的工作簿(*.xlsm)」 要点注意: a.文件报错为「.xlsm」,不是「.xlsx」 (13)点击「按钮1」,我们就可以查看结果 (14)鼠标右键 「编辑文字」,然后将「按钮...(2)的结构 (3)cells属性以及cells操作Excel单元格 (4)如何在Excel放置按钮,并关联 通过5步实现: 点选「开发工具」-「插入」-「按钮(窗体控件)」---> 鼠标变为...最后,留个课后小练习:如何在Excel中其做他运算,并且各种运算符号能够随着按钮自动变换呢?

    45830

    ExcelVBA学习之取得Application.inputbox选择区域的起始行列号和终止行列号

    -------------------- InputBox 可用于显示简单对话框,方便用户输入要在中使用的信息。 对话框中有“确认”**** 按钮和“取消”**** 按钮。...Set myRange = Application.InputBox(prompt := "Sample", type := 8) 如果不使用 Set 语句,此变量就会被设置为区域中的值,不是 Range...ActiveCell.Value = MyFunction(rng) End Sub Function MyFunction(rng As Range) As Double MyFunction..." Exit Sub End If arr = Array("起始行", "起始列", "终止行", "终止列") '取得选择区域的总的单元格数,其中.Address...是取得 xx的引用 t = Range(myRange.Address).Count t2 = myRange.Cells.Count MsgBox "你总共选中的单元格数有:"

    1.7K60

    这些掌握了,你才敢说自己懂VBA

    是指按下某个按钮,运行哪一段VBA小程序 (Macro):简单理解就是一段用VBA编写的小程序 (4)修改名「加减法」,点击「新建」 image.png (5)自动弹出界面,进入了VBA代码编辑器...以「蓝色」模糊定位到出错的位置 image.png 出错的主要原因是我们采用了“人类语言”,不是计算机能够识别的语言,Excel只能识别VBA的语法。 那么,VBA语法是什么呢?...Cells(4, 1) + Cells(4, 3)”,发现程序没有报错,然后删除上方错误的代码 image.png (12)保存代码 点击右上方「保存」,VBA弹窗出现提示,我们点击「否」,在「保存类型」中选择...「Excel启用的工作簿(*.xlsm)」 image.png image.png 要点注意: a.文件报错为「.xlsm」,不是「.xlsx」 (13)点击「按钮1」,我们就可以查看结果 image.png...(2)的结构 image.png (3)cells属性以及cells操作Excel单元格 image.png (4)如何在Excel放置按钮,并关联 通过5步实现: 点选「开发工具」-「插入」-

    3.8K01

    Excel图表学习76:Excel中使用超链接的交互式仪表图

    不是让你印象深刻? 要创造这样一份图表,只需要一堆数据、一张图表、一行VBA代码和一些小技巧。 1.示例数据 仔细观察图1,会发现我们只有一个图表,并且根据用户选择的选项来更改图表的源数据。...只需设置4列区域(因为有4个图表),这样就可以放置图表和鼠标悬停单元格以供选择,如下图3所示。 图3 4.创建翻转效果 需要一个简单的或UDF(用户自定义函数)来根据用户鼠标指向的位置来更改系列。...然而,如何在鼠标悬停时激活该UDF?这就是我们可以使用超链接的地方。 你知道可以使用UDF作为超链接的来源吗?...当你将鼠标放在链接上时,Excel也会运行该函数。无需点击! 我们知道,Excel不允许函数更改其他单元格中的值或者对其格式化。然而,如果从超链接来使用函数,则该限制不适用!!!...注意,对超链接单元格进行自动换行,以便在鼠标悬停在单元格的任意位置时链接有效,不仅仅是向下箭头符号。

    2.5K20

    VBA表单控件(一)

    一、 按 钮 控 件 1、插入按钮并指定 按钮控件主要用于运行指定,首先需要有一个完整的sub过程。它的使用方法比较简单,下面简单演示下。...在工作表位置拖动画出一个按钮(窗体控件),松开鼠标后Excel会弹出指定的窗口,可以选择按钮绑定的sub过程,确定后即指定。 之后点击按钮即可运行对应的sub过程。设置起来是很简单。...选择设置控件格式时,选择属性,可以选择按钮的大小和位置是否随单元格的变化变化。根据需求进行选择即可。 控件的属性在后面介绍的其他表单控件都可以同样的设置,后面介绍的控件就不再多做说明。...只是在步长变化的基础增加了页步长变化。 内容很简单,下面以同样的的示例来进行简单演示介绍。 插入滚动条控件,右键选择设置控件格式--选择控件选项。...这样方便放置在每个类型的单元格后。 其他属性内容不再赘述,大家尝试下就可以很容易掌握。 ---- 今天下雨 本节主要介绍表单控件中的按钮控件,主要用于运行指定

    5K30

    office相关操作

    :显示公式不是数值储存格内换行:alt+enter19输入分数例如1/2时会自动识别成日期,需要输入0 1/2输入前面有0的数字时可以提前蛇尾文本格式或‘0...ctrl+1:设置单元格格式,自定义:...")=if(mod(row(),2),B2,"")从B2开始,隔一行取值后面再删除空单元格将行列用数字显示,不是字母如下图操作点击选项,选择公式,勾选R1C1引用样式最终结果excel同时冻结首行首列选中...2、然后在想让转换存储的单元格,单击单元格,在fx公式位置输入以下公式,=MID(C2,1,3)+MID(C2,5,2)/60mid函数num_chars表示的是步长,即取数的长度。...如果是,改成无基准可能真正有效的方法对进行操作,运行下面这段代码后,看看是否解决了你的问题选择菜单栏的 “开发工具” 注意:如果你的word没有开发工具这个选项,根据下面的步骤创建:如果没有菜单栏没有...Each lev In templ.ListLevelslev.Font.ResetNext levNext templ得到如下,然后点击 运行标志(具体可以参照下面链接) 后面又出现序号消失就再次运行这个定义的参考链接多级列表调整列表缩进

    10710

    ChatGPT Excel 大师

    ChatGPT 提示:“我想在单元格内显示趋势和模式,不使用单独的图表。如何在 Excel 中创建迷你图来可视化单元格内的数据趋势,并一目了然地获得见解?” 71....运行和管理 Pro-Tip 通过 ChatGPT 的专业知识掌握在 Excel 中运行和管理的技巧,包括如何运行、将分配给按钮或快捷键,以及高效地编辑、删除或组织您的。步骤 1....访问开发人员选项卡并选择选项。2. 从列表中选择运行或管理的。3. 选择适当的操作,运行、编辑、删除,或为创建按钮或快捷键。...ChatGPT 提示“我需要在 Excel 工作表中的多个单元格执行相同的操作。如何在中创建一个循环,迭代通过单元格范围并将操作应用于每个单元格,自动化重复任务?” 95....探索高级技术,使用动态数据验证、根据用户选择引用单元格、与多个工作簿中的数据交互以及创建模块化和高效的。3. 与 ChatGPT 合作,发现优化并高效完成特定任务的创造性方法。

    9400

    Excel表格的35招必学秘技

    1.执行“工具→→录制新”命令,打开“录制新”对话框,输入名“fuhao1” 并将保存在“个人工作簿”中,然后“确定” 开始录制。...选中“录制”工具栏的“相对引用”按钮,然后将需要的特殊符号输入到某个单元格中,再单击“录制”工具栏的“停止”按钮,完成的录制。   ...4.选中C列任意单元格(C4),单击右侧下拉按钮,选择相应的“企业类别”填入单元格中。...然后选中该单元格对应的D列单元格(D4),单击下拉按钮,即可从相应类别的企业名称列表中选择需要的企业名称填入该单元格中。   ...九、让“自动更正”输入统一的文本   你是不是经常为输入某些固定的文本,《电脑报》烦恼呢?那就往下看吧。   1.执行“工具→自动更正”命令,打开“自动更正”对话框。

    7.5K80

    实用干货|简单9步,教你在PPT中演示动态图表

    好在我之前写《用地图说话》的时候,曾琢磨过如何在 PPT 里演示点击地图选择的动态图表,琢磨出一种做法,现在就和大家分享。 ?...用户的选择结果记录在 dashboard 工作表的 A1 单元格,这是动态图表的驱动引擎。 2、将包含动态图表的 Excel 文件嵌入到 PPT。...复制 Excel 文件里放置图表的单元格区域(注意是图表后面的单元格区域,不是图表本身),在 PPT 里新开一页,选择性粘贴 - 工作表对象,这样,就把那个 Excel 文件“嵌入”到这个 PPT 里了...保存文件时会提示含有选择保存为后缀名为 .pptm 带格式的文件。下次打开时会有提示,选择启用即可。 9、以后的数据更新。...要在嵌入对象 右键 - 工作表对象 - 打开,这样会打开一个大的 Excel 窗口供你编辑,方便得多。

    5.2K50

    二 详解VBA编程是什么

    2、选择A1单元格。调出”常用”工具栏。 3、选择”工具”-“”-“录制新”。...要执行刚才录制的,可以按以下步骤进行: 1、选择任何一个单元格,比如A3。 2、选择”工具”-“”-“”,显示””对话框。...3、选择”改变颜色”,选择”执行”,则 A3 单元格的颜色变为红色。试着选择其它单元格和几个单元格组成的区域,然后再执行,以便加深印象。 查看录制的代码 到底是什么在控制EXCEL的运行呢?...在 With 语句前加入一行: Range(“A5”).Select 试着运行,则无论开始选择哪个单元格,运行结果都是使A5单元格变红. 现在可以看到,编辑录制的同样非常简单。...需要编辑是因为以下三个方面的原因。 一:在录制中出错不得不修改。 二:录制的中有多余的语句需要删除,提高运行速度。 三:希望增加的功能。比如:加入判断或循环等无法录制的语句。

    5.7K20
    领券