作者:乔山办公网日期:
返回目录:excel表格制作
如果抄有窗体存在的话百,在代码前加上unload 窗体度名,将窗体关问闭后再答执行打印
Private Sub CommandButton1_Click()
unload form1
Sheets("Sheet3").Select
ActiveWindow.SelectedSheets.PrintPreview
End Sub
没明白 什么是 磁盘下启动EXCEL
如果是 用窗体交互 预览的话,建议把预览的 代码卸载 窗体加载事件中,或者在窗体上放一个按钮,把代码放在按钮 点击事件中
With workSheet.PageSetup
.CenterHorizontally = True '水平自居百中度
.CenterVertically = True '垂直知居道中
End With
1、用重命名方式道将Sheet5的名称修改为了“测试表单”,但在VBAProject中,前面的名字依然叫Sheet5。
2、点击 VBAProject下面的Sheet3,下面对应出现Sheet3的属性,我们能够看到属性中 一个叫“名称”,就是工作表的CodeName,另外一个Name,就是平时大家所见的Sheet 的名字。
3、在“名称”属内性中输入新的名称,直接对CodeName进行修改。
4、工作表的CodeName就是工作表在VBE工程中所在部件的名称,通过修改VBE工程中所在部件的名称来达到修改工作表的CodeName的目的。
5、运行,输入新的codename以后,系统给出提示“未信任容到VB工程访问,请在信任选项中勾选VB工程访问”。
6、点击开发工具|宏安全性,打开宏安全性配置窗口。
7、勾选“信任对VBA工程对象模型的访问”,然后点击确定。
8、重新运行,成功将Sheet1修改为testaaa。