想在EXCEL工作表上方做一个帮助信息提示框。

来源：百度知道编辑：UC知道时间：2024/06/17 03:14:47

基本设想：如果取消“显示帮助信息”复选框的选中状态，则隐藏文本框。反之，则显示文本框。但输入代码后提示“编译错误缺少 END SUB”。请高手指点。代码如下：
Sub 显示帮助信息()
If ActiveSheet.Shapes("chkHelp").ControlFormat.Value = 1 Then
ActiveSheet.Shapes("Help1").Visible = True
Else
ActiveSheet.Shapes("Help1").Visible = False
End If
End Sub

以下代码写在工作表里面, 不要写在模块里面:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If ActiveSheet.Shapes("chkHelp").ControlFormat.Value = 1 Then
ActiveSheet.Shapes("Help1").Visible = True
Else
ActiveSheet.Shapes("Help1").Visible = False
End If
End Sub

在EXCEL中，一个工作表中的格式复制到另一个，怎样做呢/ 谁会做Excel工作表 excel中同一个工作薄中的一个工作表要加密，怎么做在excel中如何把工作簿中一个工作表保存为一个单独的excel文件? 谁知道在EXCEL中有N个工作表,我想查找某个工作表怎么做 Excel工作表中怎么做百分比? 在EXCEL里做两个格式一模一样的工作表怎么做呢? 如何在excel中将整个工作簿的某列，复制到一个工作表中。如何在excel表格一个文件中增加工作表数量（工作薄）在EXCEL工作表里怎样映射另外一个工作表呢