Excel如何添加一个可以实现打印的按钮

Excel如何添加一个可以实现打印的按钮,第1张

解决Excel如何添加一个可以实现打印按钮的步骤如下:

1.新建一个EXCEL文档,并保存为启用宏的工作薄。

2.启用宏控制。

3.按ALT+F11,进入VBA编辑页面。

4.双击左边要添加打印按钮的sheet1,将准备好的代码复制进去。

5.点击开发工具--插入---按钮控件,出现对话框。

6.选择下面的那个代码名称,确定,而后在空间按钮上,先右键,出现周围6个圆圈时,左键点击一下文字区,修改文字为打印按钮。这样就解决了Excel如何添加一个可以实现打印的按钮的问题了。

你好!楼主想要的,其实很简单,VBA代码如下:(望笑纳)

Sub SuoDing()

On Error Resume Next  '忽略可能出现的错误

Set MySheet1 = ThisWorkbook.Worksheets("Sheet1") '定义Sheet1

MySheet1.Protect Password:="123456", DrawingObjects:=True, _

Contents:=True, Scenarios:=True  '保护工作表

End Sub

Sub JieSuo()

On Error Resume Next

Set MySheet1 = ThisWorkbook.Worksheets("Sheet1")

MySheet1.Unprotect Password:="123456"  '解除保护

End Sub

在工作表界面的两个按钮分别指定这两个宏:

之后点击【锁定】则不能输入内容,点击【解锁】就可以正常输入。


欢迎分享,转载请注明来源:内存溢出

原文地址:https://54852.com/bake/11905820.html

(0)
打赏 微信扫一扫微信扫一扫 支付宝扫一扫支付宝扫一扫
上一篇 2023-05-19
下一篇2023-05-19

发表评论

登录后才能评论

评论列表(0条)

    保存