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

Excel宏VBA -使用按钮保存时更改活动打印机

Excel宏VBA是一种用于自动化Excel操作的编程语言。它可以帮助用户通过编写宏来执行各种任务,从而提高工作效率。在Excel中,VBA可以用于创建自定义函数、自动化数据处理、生成报表等。

使用按钮保存时更改活动打印机是指在Excel中,通过点击按钮来实现保存文件时自动更改当前活动打印机的设置。这样可以方便地切换打印机,从而实现不同打印机之间的切换,适应不同的打印需求。

在VBA中,可以通过以下步骤来实现按钮保存时更改活动打印机的功能:

  1. 打开Excel,并进入开发人员模式。
  2. 在开发人员选项卡中,点击插入按钮,然后在工作表上绘制一个按钮。
  3. 右键单击按钮,选择"编辑代码",进入VBA编辑器。
  4. 在VBA编辑器中,找到按钮的点击事件(Click事件),在其中编写VBA代码。
  5. 在代码中,使用Application.ActivePrinter属性来获取和设置当前活动打印机的名称。
  6. 使用Application.Dialogs(xlDialogPrinterSetup).Show方法来显示打印机设置对话框,让用户选择新的打印机。
  7. 将用户选择的打印机名称赋值给Application.ActivePrinter属性,以更改活动打印机。
  8. 最后,保存并关闭VBA编辑器。

以下是一个示例代码:

代码语言:txt
复制
Private Sub CommandButton1_Click()
    Dim printerName As String
    
    ' 显示打印机设置对话框,让用户选择新的打印机
    printerName = Application.Dialogs(xlDialogPrinterSetup).Show
    
    ' 更改活动打印机
    Application.ActivePrinter = printerName
End Sub

这样,当用户点击按钮时,就会弹出打印机设置对话框,用户可以选择新的打印机,然后VBA代码会将选择的打印机名称赋值给Application.ActivePrinter属性,从而实现更改活动打印机的功能。

腾讯云提供了一系列与Excel相关的云产品,例如腾讯文档、腾讯会议等,可以帮助用户实现在线协作、文档编辑等功能。你可以通过访问腾讯云官网(https://cloud.tencent.com/)来了解更多相关产品信息。

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

相关·内容

Excel 旧用户正成为恶意软件的目标

这种恶意软件攻击活动使用了一种新的恶意软件混淆技术来禁用Microsoft Office的安全防御机制,然后传播和感染Zloader木马病毒。...接下来,嵌入Word文档中的基于VBA的指令会读取精心构建的Excel电子表格单元以创建。这个使用附加的VBA填充同一XLS文档中的附加单元格,从而禁用Office的安全防御功能。...而VBA则是微软用于Excel、Word和其他Office程序的编程语言,VBA允许用户使用记录器工具创建命令字符串。...在这种情况下,与VBA的其他滥用案例一样,Zloader也会利用这种功能来创建恶意脚本。 Excel将记录用户执行的所有步骤,并将其保存为一个名为“process”的。...当用户停止操作之后,这个将会被保存下来,并且会被分配给一个按钮,当用户点击这个按钮,它会再次运行完全相同的过程。

4.7K10

EXCEL VBA开始,入门业务自动化编程

想实现同样的功能,使用Visual Basic(VB.NET)要比使用VBA多写很多行程序。 宏命令,说到底也就是记录操作步骤的一种功能。记录内容本质上是用VBA语言编写和保存的一段代码。...打开包含Excel文件,可能会显示如下安全警告(图5) 图5 单击[启用内容]按钮后,消息条就消失了。(图6)。...选择想要执行的「复制粘贴」后,单击[执行]按钮(图13)。 图13 你会发现,宏命令开始执行,数据被复制粘贴了。见图14 图14 频繁使用宏命令,每次都要从「一览」中执行是很麻烦的。...点击[拷贝粘贴]按钮,就是图23的样子;点击[删除]按钮,就是图24的样子。 图23 图24 保存包含宏命令的Excel工作表 下面我们来讲一下如何保存包含Excel文件。...Excel 2007 之后的版本,包含的文件簿通常会被保存成为另外一种文件格式「启用的工作簿」。 在Excel菜单上依次选择[文件][导出]。然后双击「更改文件类型」。

17.6K111
  • Python让Excel飞起来:使用Python xlwings实现Excel自动化

    你可以使用xlwings+Python执行下列任务: 1.使用Python自动化Excel,例如生成报告。 2.使用Python编写,并通过单击按钮Excel运行。...接下来,保存VBA代码,现在我们要在Excel工作表中创建一个按钮。返回Excel界面,在“开发工具”选项卡,单击“插入->按钮”,并指定刚创建的Rand_10。...图12 注意到,当键入函数,square实际上会显示在函数列表中——我们可以像使用Excel内置函数一样使用Python函数,并且可以将单元格引用传递到函数中。...上文中已讨论了如何修复此错误,确保Excel设置正确。 2.键入用户定义的函数,单元格中会显示“Object Require”(对象要求)。...确保在VBA编辑器菜单“工具->引用”中选取了“xlwings”,并将更改保存到相应的Excel文件中。有时,当打开多个Excel工作表,我们可能会无意中将此更改应用于另一个文件。

    8.9K41

    Excel编程周末速成班第3课:Excel对象模型

    有关详细信息,请参考VBA的在线帮助。 另一种方法SaveCopyAs使你可以使用新名称保存工作簿的副本,而无需更改打开的工作簿的名称。...如果省略,则提示用户保存更改。 参数Filename,此参数指定保存工作簿的名称。如果省略,则使用当前工作簿名称。...下面的代码示例演示如何使用ForNext … In循环关闭所有打开的工作簿,并保存所有更改。...但是,有时一个工作簿中的代码正在处理另一工作簿中的数据,当此类代码需要引用它所在的工作簿而不是要操纵的工作簿使用ThisWorkbook关键字。在对加载进行编程,这种情况最经常发生。...参数Preview,如果设置为True,则将打开“Excel打印预览”窗口供用户查看。默认值为False。 参数ActivePrinter,要使用打印机的名称,默认为Windows默认打印机

    5.1K30

    Excel VBA编程

    但是VBA中没有Excel的内置函数,使用worksheetfunction可以调用Excel中的内置函数。...当前活动工作簿中的所有的图表工作表 selection 当前活动工作簿中所有选中的对象 sheets 当前活动工作簿中的所有sheet对象,包括普通工作表,图表工作表,Excel4.0工作表和5.0...worksheet对象的selectionchange时间告诉VBA:当更改工作表中选中的单元格区域自动执行该事件的事件过程。...AddinUninstall 当工作簿作为加载卸载发生 AfterSave 当保存工作簿之后发生 BeforeClose 当关闭工作簿之前发生 BeforePrint 在打印指定工作簿之前发生 beforesave...在保存工作簿之前发生 Deavtivate 在工作簿状态作为非活动状态发生 NewChart 在工作簿新建一个图表发生 Newsheet 在工作簿新建一个工作表发生 open 打开工作簿发生

    45.4K22

    VBA实战技巧30:创建自定义的进度条1

    Excel中最好的工具之一,可以让我们节省时间。 使用VBA,可以自动执行重复、单调且有时非常无聊的任务。在某些情况下,这有可能将数小时的工作减少到几分钟或几秒钟。...1.设置可视化界面 使用VBA的用户窗体创建进度条。首先,在VBE中,单击“插入——用户窗体”,结果如下图1所示。...将其标题设置为“0%”,这将在代码执行期间更改为读取进度百分比。 在框架内,插入另一个标签,该标签将不包含文本,而是充当滚动条。...“DoEvents”指令允许VBA通过键盘检测用户交互,这在用户可能希望早点退出长时间循环的很有用。...7.将指定给按钮 添加一个Excel图标图像并将指定给该图像,这是通过右键单击图像并选择“指定”来实现的。 8.测试进度条 结果如下图4所示。

    3.4K10

    VBA专题10-6:使用VBA操控Excel界面之执行命令以及激活功能区选项卡的两种方法

    一种是使用SendKeys方法模拟按键,就好像是手工按活动窗口中的键一样;另一种是使用XML和VBA代码。...为了避免不可预料的结果,总是使用SendKeys方法作为最后的手段,并且确保活动窗口是想要发送按键的正确的窗口。...XML和VBA代码(Excel 2010及以后的版本) 激活功能区选项卡的另一种方法是使用XML和VBA代码。执行下列步骤: 1. 下载CustomUI Editor并安装。 2....创建新工作簿并将其保存为启用的工作簿。 3. 关闭该工作簿并在CustomUI Editor中打开。 4....使用对功能区的引用,可以接着通过myRibbon对象激活功能区选项卡(以及使功能区中的选项卡和控件无效)。 12. 保存,关闭,然后重新打开该工作簿。

    3.7K20

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

    不错,用公式确实能够实现上述案例的结果,但是,VBA拥有公式无可比拟的优越性: 第一,公式无法使用按钮控件」; 第二,日常的工作场景一般会涉及加减乘除等综合运算,如果我们使用公式就会格外的复杂而难以控制...按钮控件:大家可以将其类比我们常见的“保存”、 “预览” 、“确定”等按钮,当然了还有需要输入文本的“文本框”、“下拉列表”、“复选框”等 3. 那VBA如何操作呢?...(1)点选「开发工具」-「插入」-「按钮(窗体控件)」 (2)鼠标变为「黑色+号」,按住鼠标「左键」,向右拖动 (3)松开,自动弹出一个窗口 指定:是指按下某个按钮,运行哪一段VBA小程序...点击右上方「保存」,VBA弹窗出现提示,我们点击「否」,在「保存类型」中选择「Excel启用的工作簿(*.xlsm)」 要点注意: a.文件报错为「.xlsm」,而不是「.xlsx」 (13)点击...(2)的结构 (3)cells属性以及cells操作Excel单元格 (4)如何在Excel放置按钮,并关联 通过5步实现: 点选「开发工具」-「插入」-「按钮(窗体控件)」---> 鼠标变为

    43230

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

    不错,用公式确实能够实现上述案例的结果,但是,VBA拥有公式无可比拟的优越性: 第一,公式无法使用按钮控件」; 第二,日常的工作场景一般会涉及加减乘除等综合运算,如果我们使用公式就会格外的复杂而难以控制...按钮控件:大家可以将其类比我们常见的“保存”、 “预览” 、“确定”等按钮,当然了还有需要输入文本的“文本框”、“下拉列表”、“复选框”等 image.png 3. 那VBA如何操作呢?...指定:是指按下某个按钮,运行哪一段VBA小程序 (Macro):简单理解就是一段用VBA编写的小程序 (4)修改名「加减法」,点击「新建」 image.png (5)自动弹出界面,进入了VBA代码编辑器...点击右上方「保存」,VBA弹窗出现提示,我们点击「否」,在「保存类型」中选择「Excel启用的工作簿(*.xlsm)」 image.png image.png 要点注意: a.文件报错为「.xlsm...(2)的结构 image.png (3)cells属性以及cells操作Excel单元格 image.png (4)如何在Excel放置按钮,并关联 通过5步实现: 点选「开发工具」-「插入」-

    3.8K01

    (ExcelVBA编程入门范例)

    很喜爱VBA,喜欢使用她对Excel操作实现所需的功能,更喜欢使用VBA控制Excel以及实现结果后的那种感觉。...■ 选择菜单“工具————”命令打开对话框,若该工作簿中有宏程序,则单击该对话框中的“编辑”按钮即可进行VBE编辑器代码模块,如图00-05所示。...“编辑”按钮打开VBE编辑器 VBE编辑器窗口简介 刚打开VBE编辑器,所显示的窗口如图00-06所示,其中没有代码模块窗口。...在VBE编辑器的代码模块中输入VBA代码,通常有以下几种方法: ■ 手工键盘输入; ■ 使用录制器,即选择菜单“工具————录制新”命令,将所进行的操作自动录制成宏代码; ■ 复制/粘贴代码...2003高级VBA编程宝典 (2)Excel 2003与VBA编程从入门到精通(中文版) (3)巧学巧用Excel 2003 VBA(中文版) (4)ExcelVBA应用程序专业设计实用指南

    4.1K20

    Vba菜鸟教程

    文章目录 Vba菜鸟教程 编辑器 vba基本语法 运算符 变量 数组 字典 语句 简写语句 sub语句 调用语句 退出语句 跳转语句 错误处理语句 循环语句 判断语句 公式与函数...使用ADO连接外部Excel数据源 常用sql语句 使用ADO连接外部Access数据源 附表 对齐方式 字体格式 填充 对话框的值 Vba菜鸟教程 官方文档:https://docs.microsoft.com...,变量值,数组信息,Stop可以中断 开发者工具,设置安全性启用保存文件需要保存为启用的工作簿 使用相对流录制,不固定位置,相对位置操作 加载(本地代码库) 代码保存在模块 保存文件格式为...*,匹配到多个文件,返回一个,继续使用dir不带参数,返回下一个,没有了返回空,再使用dir报错 str = Dir("E:\code\exce_vba\*.xls*") '...values ('AA','男',33) 修改一条数据 update [data$] set 性别=‘男’,年龄=16 where 姓名=‘张三‘ 删除一条数据(不能用),可以通过多加一列,表示不删除,删除更改值为删除

    17K40

    Excel中自定义上下文菜单(下)

    在本文开头的VBA示例中,你看到了如何通过使用工作簿的Activate和Deactivate事件调用来创建和删除菜单控件,从而来更改单元格上下文菜单。...可以通过使用VBA代码禁用与上一节中所述类似的特定控件来使用变通方法。 那么,如何找到要更改的其他上下文菜单的名称呢?下面的在每个上下文菜单的底部添加了一个带有菜单名称的按钮。...小结 在Excel 97至Excel 2003中,可以使用VBA代码将控件添加到每个上下文菜单中,但无法使用RibbonX更改上下文菜单。...在Excel 2007中,可以使用VBA代码将控件添加到几乎每个上下文菜单中。但是,无法使用VBA更改某些上下文菜单,例如形状和图片的上下文菜单。此外,无法使用RibbonX更改上下文菜单。...在Excel 2010及后续版本中,可以使用VBA代码将控件添加到几乎每个上下文菜单中。使用VBA更改某些上下文菜单的限制与Excel 2007中相同。

    2.6K20

    疫情期间竟然还有这种病毒?解密古老而又神秘的宏病毒

    打开含有的文档文件,会遇到"安全警告",单击"启用内容"按钮就会执行。\使用快捷键Alt+F11可以打开vb编辑器,查看宏代码。...宏病毒中常用的自动执行方法有两种:一种是用户执行某种操作自动执行的,如Subbotton(),当用户单击文档中的按钮控件自动执行;另一种则是Auto自动执行,如SubAutoOpen()和Sub...Options.SaveNormalPrompt = False 修改公用模板在后台自动保存,不给任何提示 EnableCancelKey = wdCancelDisabled 使不可以通过ESC键取消正在执行的...https://myzxcg.github.io/20180921.html 简单示例:使用Excel 4.0执行ShellCode 新建一个xls文件。 创建一个新的Excel工作簿。...生成vba代码: word操作 点击上方标签视图标签,在该标签中点击按钮,弹出的对话框中输入名字,然后单击创建按钮

    5.5K30

    VBA专题10-9:使用VBA操控Excel界面之在功能区中添加自定义按钮控件

    这里的自定义命令是指程序员自已编写的VBA过程。 添加按钮 如果要在内置功能区选项卡中添加两个按钮,在单击这些按钮时会调用VBA过程,那么执行下面的步骤: 1....创建新工作簿并保存为启用的工作簿。 2. 关闭该工作簿,然后在CustomUI Editor中打开该工作簿。 3....按钮元素: 其imageMso属性为按钮指定预定义的图像。如果要使用自已设计的图像,只需使用image属性替换掉imageMso属性。 onAction属性是一个回调属性。...该属性的值是在单击按钮要执行的VBA过程的名称。 5. 单击工具栏中的Validation按钮来检查是否有错误。 6. 单击Generate Callbacks按钮。...之后,要将其粘贴到工作簿的VBA模块中。 7. 保存并关闭该文件。 8. 在Excel中打开该工作簿文件。 9. 按Alt+F11键打开VBE。 10.

    4.9K30

    VBA实战技巧32:安装Excel加载

    图2 如果你的加载不在“可用加载”列表中,则必须单击该对话框右侧的“浏览”按钮,进行查找,然后将其添加到可用加载列表中。...Excel是如何管理加载列表的 在后台,Excel使用注册表和一个特殊文件夹来管理存在哪些加载项以及已安装了哪些加载项。...2.注册表 对于与上述位置不同的加载项,Excel将在注册表中查找。当单击“浏览”按钮以查找加载项,会在此处添加键。...注意,这些注册表项在关闭Excel后更新。 如何使用VBA来安装Excel加载 编写一些简单的代码来启用加载项,弹出的消息框如下图5所示。...因为当没有活动工作簿你无法打开加载项对话框,显然这也会阻止Excel通过VBA将新加载项添加到列表中。

    4.8K20

    Excel中自定义上下文菜单(上)

    Excel中的上下文菜单 在Microsoft Excel中,人们最常用的上下文菜单是单元格上下文菜单,这是在工作表单元格或选定单元格上单击鼠标右键看到的菜单(如下图1所示)。...图1 在Excel中自定义上下文菜单 在Excel 2007以前的版本中自定义上下文菜单的唯一方法是使用VBA代码,然而,在Excel 2007后续版本中,还可以使用相同的功能区扩展性(RibbonX)...使用RibbonX自定义上下文菜单的优点之一是,可以添加无法使用VBA添加的控件。...menuSeparator) 拆分按钮(splitButton) 切换按钮(toggleButton) 使用VBA代码将控件添加到单元格上下文菜单 下面的示例在单元格上下文菜单顶部添加了自定义按钮、内置按钮...单击按钮或子菜单中的三个选项之一,会运行其他四个过程。在本例中,最后四个更改单元格中任何文本的大小写。

    2.7K40

    再见 VBA!神器工具统一 Excel 和 Python

    使用pip安装pyxll-jupyter软件包: pip install pyxll-jupyter 安装完毕后,启动Excel,将在PyXLL选项卡中看到一个新的Jupyter按钮。 ?...创建一个新的Notebook,选择新建按钮,然后选择Python 3。 ? 二、使用方法 这样做有什么用处呢?...从Excel调用Python函数 使用Excel离不开函数,而当我们需要一些复杂功能,自带函数未必能满足我们的需求。...更改输入会导致调用函数,并且计算出的输出会实时更新,这与我们期望的一样。 4. 替代VBA VBA脚本所需的功能函数,在Python中均有相同的API。...弄清楚如何使用Excel对象模型进行操作的一种好方法是记录VBA,然后将该转换为Python。 下图中尝试将当前选择单元格更改颜色。 ?

    5.4K10

    VBA: 多份Excel文件的批量顺序打印

    文章背景:测试仪器的数据有时会以Excel文件形式保存,工作量大时会选中多份文件进行批量打印。当office升级后,批量打印可能会出现顺序错乱,这时需要手动排序,费事费力。...现在以批量打印Excel文件(.xlsx格式)为例,采用VBA编程,进行任务的实现。...在批量打印文件的按钮中指定如下的宏命令代码: Sub printFiles() '批量打印Excel文件 Application.ScreenUpdating = False...因此,运行上述代码后,每打印一次,就会弹出对话框,选择 PDF 文档保存的位置和文件名。 (2)实际工作当中,如果连接了实体打印机,运行上述代码后会按顺序依次打印出你所选择的各个文件。...参考资料: [1] 利用Excel VBA实现批量打印的思路(https://zhuanlan.zhihu.com/p/55800879) [2] 你还在挨个打印word、excel文件吗(https:

    2.5K40
    领券