| 网站首页 | VB.Net实例分析 | .Net技术文摘 | 下载中心 | VB.Net书籍笔记 | .Net源码 | VBS脚本与组件调用 | Windows2008技术文摘 | 给我们留言 | 
最新公告:

  没有公告

您现在的位置: 乐博网 >> VB.Net实例分析 >> 其他 >> 实例分析正文
最新推荐 更多内容
VB.Net显示和隐藏Excel操作窗格的实例
VB.Net显示和隐藏Excel操作窗格的实例
作者:Ilu    来源:乐博网整理     更新时间:2009-9-23

乐博网lob.cn提示:调试环境为 vs2008 +  windows2003 / windows2008 / xp / vista

Imports Microsoft.Office.Tools.Ribbon
Public Class Ribbon1
    Private MyActionsPane As New ActionsPaneControl1()
    Private Sub Ribbon1_Load(ByVal sender As System.Object, ByVal e As RibbonUIEventArgs) Handles MyBase.Load
        Globals.ThisWorkbook.ActionsPane.Controls.Add(MyActionsPane)
        MyActionsPane.Hide()
        Globals.ThisWorkbook.Application.DisplayDocumentActionTaskPane = False
    End Sub
    '显示操作窗格
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As Microsoft.Office.Tools.Ribbon.RibbonControlEventArgs) Handles Button1.Click
        Globals.ThisWorkbook.Application.DisplayDocumentActionTaskPane = True
        MyActionsPane.Show()
    End Sub
    '显示雇员数据表
    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As Microsoft.Office.Tools.Ribbon.RibbonControlEventArgs) Handles Button2.Click
        Globals.Sheet1.ImportDataFromAccess()
    End Sub
    '隐藏操作窗格 '更多.net源码和实例,来自乐博网 www.lob.cn
    Private Sub ToggleButton1_Click(ByVal sender As System.Object, ByVal e As Microsoft.Office.Tools.Ribbon.RibbonControlEventArgs) Handles ToggleButton1.Click
        If (ToggleButton1.Checked = True) Then
            Globals.ThisWorkbook.Application.DisplayDocumentActionTaskPane = False
        Else
            Globals.ThisWorkbook.Application.DisplayDocumentActionTaskPane = True
        End If
    End Sub
End Class

 

  • 上一篇:

  • 下一篇:
  • 【字体: 】【打印此文】【关闭窗口
      相关文章:(只显示最新16条)
    VB.Net数据自增的3个实例
    VB.Net在Excel工作簿中使用Chart宿主控件显示图表
    VB.Net为excel取消用户密码的实例
    VB.Net为excel设置用户密码的实例
    VB.Net把excel导出XPS文件
    VB.Net把excel导出PDF文件的实例
    VB.Net把excel导入Access数据库
    VB.Net把excel导入文本文件的实例
    VB.Net把excel导入XML文件的实例
    VB.Net Excel合并单元格的实例
    VB.Net输出Word和Excel报表的实例

    | 设为首页 | 加入收藏 | 联系站长 | | 友情链接 | 版权申明 |
    乐博网欢迎各种媒体转载我们的原创作品[转载请注明出处];我们鼓励更多VB.Net开发者一起加入研究与探讨;如发现文章访问错误、内容错误或版权疑问、内容有违相关法律(如涉及政治、色情、反动或散布虚假有害信息)等情况,请及时向我们举报,我们将及时纠正!
    联系邮箱:Shiny#vip.qq.com (#替换为@) QQ交流群: 40797788 [闽ICP备05014267号]