设置EXCEL的默认打印机

excel vba中设置打印机的代码 在excel中通过注册表获得所有系统打印机,并根据需要指定其一的代码。 立即下载

系统设置了一个默认打印机,但在EXCEL有些人喜欢用其它的打印机做默认项,这个可以通过EXCEL的workbook的事件来实现

  1.     Private Sub Workbook_BeforePrint(Cancel As Boolean)   
        Application.ActivePrinter = "pdfFactory Pro 在 FPP3:"   
        End Sub   

 

 注意: 1、括号里打印机的名称一定不能错,如果不知道你想设置的打印机名称,可以设置默认打印机后再在EXCEL的立即窗口输入

    ?Application.ActivePrinter  


这样就能获取该打印机的完整全称


转自http://blog.youkuaiyun.com/laoyebin/article/details/5302092


vb设置默认打印机 vb设置默认打印机 可选择要设置的打印机进行设置,设置选择的打印机为默认打印机,源代码 立即下载

相关推荐

VB设置默认打印机设置默认打印机

Option Explicit Const KeyName = "Software\Microsoft\Windows NT\CurrentVersion\Windows" Private Sub Command1_Click() Dim Ver As OSVERSIONINFO, S As String, hKey As Long Dim Device As String, length As Long Ver.dwOSVersionInfoSize = Len(Ver) GetVersionEx Ver Device = List1.Text length = LenB(StrConv(Device, vbFromUnicode)) + 1 If Ver.dwPlatformId = VER_PLATFORM_WIN32_NT Then RegOpenKey HKEY_CURRENT_USER, KeyName, hKey RegSetValueEx hKey, "Device", 0, REG_SZ, ByVal Device, length RegCloseKey hKey MsgBox "设置默认打印机: " & List1.Text & " 成功!", vbInformation, "温馨提示" Else WriteProfileString "windows", "device", Device SendMessage HWND_BROADCAST, WM_WININICHANGE, 32767&, ByVal "windows" End If End Sub Private Sub Command2_Click() Unload Me End Sub Private Sub Form_Load() Dim i As Integer For i = 0 To Printers.Count - 1 List1.AddItem Printers(i).DeviceName & "," & _ Printers(i).DriverName & "," & _ Printers(i).Port Next End Sub

【VBA研究】打印表单时指定打印机

作者:iamlaosong ​ 我用Excel做做了一个打印拣货单标签的工具,实际上是打印邮件标签兼做拣货单,由于仓库电脑需要连接多台打印机(不同标签用纸不同,换纸还不如换打印机),所以打印标签时,经常要改变默认打印机,一旦忘了修改,就会打印出一堆废纸来。那么,不改变默认打印机,能不能将标签打印到指定的打印机上面呢? 答案是肯定的。

驽马十驾 才定不舍 1万+

【导航】ESP32 教学篇目录 【快速跳转】

本文章 来自原创专栏《ESP32教学专栏 (基于ESP-IDF)》,讲解如何使用 ESP-IDF 构建 ESP32 的WIFI及连接的程序,发布文章并会持续为已发布文章添加新内容! 每篇文章都经过了精打细磨! ↓↓↓通过下方 按钮 进入专栏主页↓↓↓ 专栏主页:点击进入→ESP32 教学专栏 (基于ESP-IDF) WIFI二级专栏:点击进入→ESP32 上的 WiFi ............

Augtons 的博客 3万+

博客摘录「 VBA打印机设置(列出所有打印机名字、选用合适的打印机并设计端口号)」2023年6月13日

【代码】博客摘录「 VBA打印机设置(列出所有打印机名字、选用合适的打印机并设计端口号)」2023年6月13日。

Flynn 1991

碳酸钙岩石酸蚀酸溶COMSOL建模:非均质对酸蚀通道的影响

多孔介质中的流动与化学反应耦合是石油工程和地下资源开发中的核心问题,酸液与岩石矿物的溶蚀过程直接关系到酸化增产效果。在碳酸盐岩储层中,盐酸与方解石的反应速率极快,酸液会优先沿高渗透区域推进,形成指状酸蚀通道,即wormhole。传统均质模型难以描述这种局部溶蚀行为,而数值模拟工具COMSOL通过耦合达西定律、稀物质传递与孔隙度演化方程,能够定量刻画酸蚀路径与渗透率的变化规律。工程实践中,模拟结果可用于预测酸液突破体积、优化注入排量,并为基质酸化方案设计提供依据。本文围绕碳酸钙岩石酸蚀酸溶COMSOL模型,探

weixin_29009401的博客 327

偷懒必备:3种方法快速移植MFC界面资源(含.rc文件打不开解决方案)

本文针对MFC桌面应用开发,详细介绍了三种快速移植界面资源的实战方法:直接编辑.rc文件、利用Visual Studio“添加现有项”进行可视化挂载,以及双实例拖拽应急方案。文章重点剖析了.rc文件无法打开的常见问题,提供了通过修复rc.exe等关键文件来根治此问题的解决方案,帮助开发者高效复用资源,规避ID冲突等陷阱。

weixin_28358083的博客 272

VBA打印机设置(列出所有打印机名字、选用合适的打印机并设计端口号)

Sub PrinterDemo() Dim WshNetwork As Object Dim oPrinter As Object Dim i As Long Set WshNetwork = CreateObject("WScript.Network") Set oPrinter = WshNetwork.EnumPrinterConnections For i = 0 To oPrinter.Count - 1 If i Mod 2 = 0

piao3701的博客 6492

华为OD机试 - 不含101的数(Python/JS/C/C++ 双机位C卷 100分)

本专栏收录于《华为OD机试真题(Python/JS/C/C++)》。刷的越多,抽中的概率越大,私信哪吒,备注华为OD,加入华为OD刷题交流群,每一题都有详细的答题思路、详细的代码注释、3个测试用例、为什么这道题采用XX算法、XX算法的适用场景,发现新题目,随时更新。小明在学习二进制时,发现了一类不含101的数,也就是:现在给定一个正整数区间,请问这个区间内包含了多少个不含101的数?输入的唯一一行包含两个正整数。输出的唯一一行包含一个整数,表示在区间内一共有几个不含101的数。8 1668 → “1000”

学Java,找哪吒 1250

excel 默认打印机与系统不一致_不能设置表格页面属性,试试这个解决办法吧!||Excel技巧...

前两天一个童鞋求助加油菌:刚开始加油菌怀疑是这个工作簿有什么问题,不过紧接着她就介绍道,所有的工作簿都不能进行页面设置,并且她已经重新安装了Office…既然是所有工作簿都有这个问题,而且已经重装了Office,那就排除是Excel软件本身的原因。需要注意的是,这里进行的是页面设置方面的操作,而页面设置是需要打印机支持的,所以这里需要查看打印机是否可用。单击桌面左下角的“开始”按钮,在打...

weixin_36489344的博客 1137

基于STM32、HAL库的ZMOD4510AI4R气体传感器驱动程序设计

ZMOD4510AI4R是Renesas公司推出的一款数字空气质量传感器,主要用于检测臭氧(O₃)和总挥发性有机化合物(TVOC)浓度。(status & 0x80)) // 检查数据就绪位。// 等待测量完成 (实际应用中应该使用非阻塞方式)// 转换为ppb (简化转换,实际应根据传感器文档校准)* @param hzmod: ZMOD4510句柄。* @param tvoc: TVOC浓度(ppb)* @param ozone: 臭氧浓度(ppb)* @param hi2c: I2C句柄。

corlin6688的博客 311

RK3576 PCIE接口调试:基于RTL8111HS的网卡驱动移植

检查项方法电源电压复位时序检查设备树 reset-gpios链路速率设备识别lspci -vvv驱动加载。

小灰灰的博客 731

excel怎么设置打印区域_怎么设置word的默认打印机

我们日常办公的时候都会用到word来编辑文档,有时候会需要将word打印出来,但是在使用打印机之前,我们要先设置默认打印机才可以,很多用户可能还不知道怎么设置word的默认打印机吧,针对这个问题,本文给大家讲述一下word设置默认打印机的步骤吧。 具体方法如下: 1、选择“开始”; 2、选择“设置”; 3、选择“打印机和传真”; 4、在弹出的“打印机和传真...

weixin_39819152的博客 1030

PHP实现获取本机ip及mac地址​(附完整源码)

PHP实现获取本机ip及mac地址​(附完整源码)

希望我的博客,能帮上你解决学习中工作中所遇到的问题 351

excel怎么设置打印区域_彩色打印机怎么设置默认打印黑白色?

购买的彩色打印机,想要打印黑白文件,该怎么设置默认打印黑白色呢?下面我们就来看看详细的教程。1、点击电脑左下角'开始',然后选择'设备和打印机'。2、如果在'开始'中未能看到'设备和打印机',可以按如下操作。点击电脑左下角'开始',然后选择'设备和打印机'。3、在打开的'控制面板'窗口中,选择'查看设备和打印机'。4、在打开的'控制面板\硬件和声音\设备和打印机'窗口中,可以看到已经连接...

weixin_39988331的博客 2005

Virtual Hard Disk version 2 (VHDX) 文件格式详解

VHDX 镜像格式详解 0. References windows github 1. Overview Microsoft 虚拟化产品中常用的映像格式是虚拟硬盘版本 2 (VHDX) 映像格式。该规范基于可用文档,并通过分析测试数据进行了增强。 VHDX 镜像格式种类 固定硬盘镜像 动态硬盘镜像 差异硬盘镜像 VHDX 镜像文件由以下元素构成: file (type) identifier 2x image headers 2x region tables log or metadata journ

圣三一 2695

SIMATIC S7-1200, S7-1500 PID 控制[手册]

SIMATIC S7-1200, S7-1500 PID 控制[手册]

打开excel弹出打印机设置_【Printer】玩转办公打印机

点击蓝字关注我们玩转办公打印机分享工作中好用的打印机使用心得对于渴望成为职场达人的同事办公技巧方面的功夫相当重要而打印机办公技巧就是一个重要的办公技巧如果想要掌握这种办公技巧玩转办公打印机请阅读下文详情1添加打印机我们有一个打印机工具,可以快速添加全球打印机。它的名字叫做Add Printer。使用方法如下:1. 先通过Windows搜索功能搜到Self Service Portal2....

weixin_39594080的博客 3367

pscad IEEE标准系统搭建说明

pscad IEEE标准系统搭建说明,包含典型的IEEE 9节点、14节点、30节点、39节点和118节点系统。内含标准测试系统的原始数据和潮流结果。

关于Excel一输入内容就卡死无响应的解决办法

解释一下:Excel打开文件时候会调用打印机,把打印机原先的默认指向从xxx网络打印机设置成Microsoft print to PDF。(★★★★★很多网友估计都是这种情况,百试不爽★★★★★)如果未将“设置”视为默认选项,则可能会选择“让Windows管理我的默认打印机选项。需要先清除该选择,然后才能自行选择默认打印机。在系统任务栏上转到“开始”>“设置”>“设备”>“打印机和扫描仪”> 选择打印机 >“管理”。我的问题是不管是新建的表格还是以前的表格,打开都是正常的,一输入内容就直接卡死了。

qq_33947629的博客 1万+

IDEA的使用指南

IDEA基于java的使用手册,可以最快速的上手,在使用中不断的丰富自己的使用技巧.

最新的sdio 4.0 spec 协议标准 带书签 高清完整PDF版

Part-E1-SDIO-Specification-Ver4.00-Final-120220.pdf:最新的sdio 4.0 spec 协议标准 带书签 高清完整PDF版,包括SDIO 接口的外设,SDIO 接口官方协议等。

解决excel卡顿问题

在实际应用中,excel打开的数量并没有很多,excel文件也并没有很大,打开任务管理器检查CPU 内存的使用率也并不高,但是excel文件却特别卡,或者某个时间段特别卡。一种可能的原因是由于excel的打印设置导致的,excel在后台一直寻找打印机,导致卡顿。

芯片测试小白的博客 659

【已解决】WPS/OFFICE中word文件可以打印,excel打印后无响应

问题 WPS/OFFICE中word文件可以打印,excel打印后无响应 博主用的是办公室同事共享的HP打印机,在使用过程中出现了WORD文件可以打印,但是EXCEL文件打印无反应,查看打印作业进程也无记录。 解决方法 不要将该共享打印机设置为默认打印机,后测试解决! ...

程序小白博客 7072

execl不能设置纵向、横向

今天遇到一个问题,一用户反映execl 不能设置纵向、横向,过去看了下,果然,纵向、横向设置的地方是灰色的,开始以为是offic的问题,多方查找,没能找出原因。 后来换了个默认打印机,问题解决了。。竟然这么简单,,,哈哈,,但不知为什么打印机会引起execl 不能设置纵向、横向。 转载于:https://blog.51cto.com/chi8463/127164...

weixin_33893473的博客 161

excel--打印预览后整个表格中按页显示虚线,打印时就会打印很多页

█问题描述:    excel打印预览后整个表格中按页显示虚线,打印时就会打印很多页. █原因分析:    可能使用了很多打印机,预览的时候并不是使用期望的打印机来预览并打印. █解决方法: 1.找到"打印机与传真" 2.选择所期望使用打印机,设置为默认打印机. For more details , contacts me by : cquptzx@qq.com o...

weixin_34138139的博客 1190

一份很长的表格如何分页打印_打印表格或者文件时弹出另存为时该如何解决?...

工作中每次打印Word文档或者Excel表格时,会弹出“另存为”窗口,我们明明是在已保存的文件中进行打印,为何还会弹出“另存为”窗口?其实通常导致此类问题产生的重要原因是打印机设置不正确导致的,下面我们可以试试下面的这个方法首先,现在打印页面查看打印机是否选择正确,或者查看是否有连接的打印机查看是否有相应的打印机2.进入Windows设置-->设备-->打印机和扫描仪,进行打印机设置选...

weixin_39752434的博客 690

计算机怎么保存窗口画面,电脑打印文件时总出现保存界面怎么办

电脑打印word/excel/ppt文件时总出现保存界面怎么办打开需要打印的文档,excel表格,word文档,ppt幻灯片等办公用软件,这里我们以word举例。点击文件菜单--打印,弹出打印对话框。查看箭头所指的位置是否为Microsoft XPS Document Writer如果选择的是这个打印机,就会弹出保存文件的对话框。所以,安装时选择其他打印机为默认打印机,打印时就会正常了,这样平时工...

weixin_28475533的博客 1415

打开office 文档慢的小技巧1 更改默认打印机

打开office 文档慢的小技巧1 更改默认打印机为本机虚拟打印机因为word打开时要缓存打开的文件到预览的缓存,如果默认打印机为离线,则office word,excel,ppt等打开有可能稍慢点。  本人设定了默认打印机为本地的虚拟的打印机,这样减少了Word与其他连接的打印机沟通时间,达到快速打开文件的目的。      ...

weixin_34199405的博客 263

解决Windows打开Excel时正在访问打印机问题、复制Word文档卡死的问题

解决Windows打开Excel时正在访问打印机问题、复制Word文档卡死的问题

Meta39的博客 2万+
上一篇: EXCEL表的自杀代码
下一篇: 不打开另一个工作簿取它里面的工作表名 (使用数据库引擎)
foreverfall
博客等级 码龄18年 46粉丝 1原创
评论
成就一亿技术人!
拼手气红包6.0元
还能输入1000个字符
 
 条评论被折叠 查看
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付:10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值