在vba中添加如下代码,可取的当前连接到电脑的所有打印机,通过取的名称可实现一键设置打印机