当我打开工作簿时,Workbook_Open sub不会运行? [英] Workbook_Open sub won't run when I open the workbook?
本文介绍了当我打开工作簿时,Workbook_Open sub不会运行?的处理方法,对大家解决问题具有一定的参考价值,需要的朋友们下面随着小编来一起学习吧!
问题描述
该程序应该创建一个按钮,用户可以按下该按钮激活不同的子。从我的搜索在线,似乎下面的子句应该在打开工作簿时激活,但不是?
This program is supposed to create a button that the user can press to activate a different sub. From my searches online, it seems that the sub below should activate when opening up the workbook, but it's not?
我做错了什么?
Option Explicit
Private Sub Workbook_Open()
Dim btn As Button
Dim rng As Range
With Worksheets("Sheet1")
Set rng = .Range("B2:C2")
Set btn = .Buttons.Add(rng.Left, rng.Top, rng.Width, rng.Height)
With btn
.Caption = "To begin the program, please click this button"
.AutoSize = True
.OnAction = "TableCreation1"
End With
End With
End Sub
推荐答案
确保您的 Private Sub Workbook_Open()子例程粘贴在此工作簿对象内,而不是模块,表单或工作表对象。
Make sure your Private Sub Workbook_Open() subroutine is pasted inside of the This Workbook object and not in a Module, Form, or Sheet object.
这篇关于当我打开工作簿时,Workbook_Open sub不会运行?的文章就介绍到这了,希望我们推荐的答案对大家有所帮助,也希望大家多多支持IT屋!
查看全文