滚动条设置

lichdo24

我在Excel Worksheet中使用一个包含大量文本的文本框,所以我具有垂直滚动条。但是,第一次打开文档时,滚动条不可见。您必须单击进入文本框才能看到它滚动。

打开文档后,是否可以使滚动条可见?

另外,当您单击该框时,滚动条会捕捉到底部...我如何才能使它停留在顶部?

这就是我的工作表的样子。

在此处输入图片说明

悉达思·劳特

选项 文本框在工作表中

在此处输入图片说明

您可以通过在Workbook_Open代码中进行设置来实现所需的功能更改Sheet1为文本框所在的工作表。

Option Explicit

Private Sub Workbook_Open()
    With Sheets("Sheet1")
        .TextBox1.Activate
        DoEvents
        .TextBox1.SelStart = 0
    End With
End Sub

在此处输入图片说明


选项B 文本框位于用户窗体中

在此处输入图片说明

使用UserForm_Initialize活动

Option Explicit

Private Sub UserForm_Initialize()
    'TextBox1.Text = [a1].Value ' For testing

    TextBox1.SetFocus: DoEvents: TextBox1.SelStart = 0
End Sub

在此处输入图片说明

本文收集自互联网,转载请注明来源。

如有侵权,请联系[email protected] 删除。

编辑于
0

我来说两句

0条评论
登录后参与评论

相关文章

来自分类Dev

以编程方式设置滚动条的宽度

来自分类Dev

如何设置AvalonEdit滚动条的样式

来自分类Dev

HighCharts设置滚动条位置

来自分类Dev

设置动画时禁用滚动条

来自分类Dev

在Firefox上设置滚动条的样式。如何摆脱滚动条上的黑色边框/轮廓?

来自分类Dev

像Chrome聊天滚动条一样设置Chrome滚动条的样式?

来自分类Dev

如何设置文本框滚动条的样式以匹配网站的滚动条?

来自分类Dev

如何为标签设置滚动窗格的滚动条

来自分类Dev

如何为水平滚动列表设置滚动条的样式?

来自分类Dev

左侧的滚动条

来自分类Dev

水平滚动条?

来自分类Dev

移动滚动条

来自分类Dev

个别滚动条

来自分类Dev

滚动条消失了

来自分类Dev

双滚动条

来自分类Dev

滚动条操作

来自分类Dev

滚动条覆盖

来自分类Dev

移动滚动条

来自分类Dev

TableLayout的滚动条

来自分类Dev

滚动条设计

来自分类Dev

火狐滚动条

来自分类Dev

滚动js滚动条

来自分类Dev

设置为展开时,ScrolledComposite不显示滚动条

来自分类Dev

如何从右侧设置ListView滚动条的偏移量

来自分类Dev

Jscrollpane设置垂直滚动条的轨道高度

来自分类Dev

将水平滚动条位置设置在最右边

来自分类Dev

设置了margin top的嵌套div导致滚动条出现

来自分类Dev

Delphi-获取和设置ListView的滚动条位置

来自分类Dev

如何设置GWT DataGrid的滚动条的样式