VSTO VB类型用于隐藏板的循环
我正在处理一个问题。
我尝试添加色带和一些按钮以隐藏和显示床单。
因此,我使用了以下代码,但无法管理。 VB中的表格名称以“ S”开头。
例如表格名称(S0,S1,S2,S3 .....,S10)
Private Sub BtnIslemPortfoy_Click(sender As Object, e As RibbonControlEventArgs) Handles BtnIslemPortfoy.Click
Dim i As Integer
For i = 1 To 10
Dim syf As Excel.Worksheet = Globals.ThisWorkbook.Application.Worksheets("S" & i)
syf.Visible = false
Next i
Globals.S3.Visible = True
Globals.S4.Visible = True
End Sub
I'm dealing with a problem.
I try to add ribbon and some buttons to hide and show sheets.
So I used the codes below but I couldn't managed. Sheet names in vb are starting with "S".
For example sheet names(S0,S1,S2,S3.....,S10)
Private Sub BtnIslemPortfoy_Click(sender As Object, e As RibbonControlEventArgs) Handles BtnIslemPortfoy.Click
Dim i As Integer
For i = 1 To 10
Dim syf As Excel.Worksheet = Globals.ThisWorkbook.Application.Worksheets("S" & i)
syf.Visible = false
Next i
Globals.S3.Visible = True
Globals.S4.Visible = True
End Sub
如果你对这篇内容有疑问,欢迎到本站社区发帖提问 参与讨论,获取更多帮助,或者扫码二维码加入 Web 技术交流群。

绑定邮箱获取回复消息
由于您还没有绑定你的真实邮箱,如果其他用户或者作者回复了您的评论,将不能在第一时间通知您!
发布评论
评论(1)
您可以尝试将
可见
属性设置为 xlsheetvisibily 值。要显示一个工作表,您需要使用XLSheetVisible
值。You may try setting the
Visible
property to the XlSheetVisibility value. To display a sheet you need to use thexlSheetVisible
value.