乔山办公网我们一直在努力
您的位置:乔山办公网 > excel表格制作 > <em>excel</em>设置<em>滚动字幕</em>

<em>excel</em>设置<em>滚动字幕</em>

作者:乔山办公网日期:

返回目录:excel表格制作


视图-工具栏,在"窗体"前打勾.然后会出来控件工具箱.里面有滚动条的.

用冻结窗格不行吗

或用拆分也行

excel里滚动条能滚动,但是表格里面的内容不动,是因为窗口被冻结了,取消窗口冻结就可以了。

取消窗口冻结步骤:

1、电脑打开excel表格

2、打开excel表格之后,点击工具栏中的视图选项。

3、进入视图页面,点击取消冻结窗口就可以了



源文件在VBA编辑器中。除了楼上的代码之外
打开工作薄和关闭工作薄的时候还有一段代码

以下是thisworkbook的代码
Private Sub Workbook_BeforeClose(Cancel As Boolean)
ActiveSheet.Shapes("text").Visible = False
ActiveSheet.Shapes("text2").Visible = False
End Sub

Private Sub Workbook_Open()
Worksheets("Sheet1").EnableSelection = xlNoSelection
zimu
End Sub

以下是主代码

Sub zimu()
Dim i, j As Integer
Do While True
ActiveSheet.Shapes("text2").Visible = False
ActiveSheet.Shapes("text").Visible = True
ActiveSheet.Shapes("text").Height = 0
ActiveSheet.Shapes("text3").Visible = True
j = 0
For i = 271.5 To 15.5 Step -1
ActiveSheet.Shapes("text").Top = i
j = j + 1
ActiveSheet.Shapes("text").Height = j
DoEvents
Next i
ActiveSheet.Shapes("text2").Left = ActiveSheet.Shapes("text").Left
ActiveSheet.Shapes("text2").Top = ActiveSheet.Shapes("text").Top - 1
ActiveSheet.Shapes("text2").Visible = True
ActiveSheet.Shapes("text").Visible = False
For i = 253 To 0 Step -1
ActiveSheet.Shapes("text2").Height = i
DoEvents
Next i
ActiveSheet.Shapes("text2").Visible = False
Loop
End Sub

需要删除作者名字和日期,或需要替换这个名字或日期
不能直接删除这个控件,删除控件后会出错
先取消工作表保护(幸运的是工作表保护没密码)
然后双击这个控件(名字和日期)
打开属性窗口,找到picture这个属性,将属e799bee5baa6e59b9ee7ad94331性直接修改成(None)
这样,这个控件的内容就没有了

相关阅读

  • <em>excel</em>设置<em>滚动字幕</em>

  • 乔山办公网excel表格制作
  • 视图-工具栏,在"窗体"前打勾.然后会出来控件工具箱.里面有滚动条的.用冻结窗格不行吗或用拆分也行excel里滚动条能滚知动,但是表格里面的内容不动,是因为窗口被冻结了,取消窗口
关键词不能为空
极力推荐
  • 怎样将<em>excel</em>中几个<em>单元格</em>内容合并

  • 单元格数据汇总到一个单元格" src="/uploads/tu/564.jpg" style="width: 400px; height: 267px;" />可以使用公式来实现例如:将A1、A2、A3单元格的内容合并到A4单元格中可以在A4中输入“=A1&A2&A3”,回车即

ppt怎么做_excel表格制作_office365_word文档_365办公网