当前位置: 首页 > 图文教程 > 网络编程 > ASP.NET > 列出所有的sheet,然后点击其中的一个,自动跳过去

ASP.NET
使用CodeDom来生成.cs文件
在.NET中定义结构设计标准
c#v2.0 扩展特性 翻译2
.NET框架下的自动内存管理
在设计期跟踪代码 .NET
VB新發現
原来Smart Client 是这样的
flash内嵌于C#程序中的应用
解读.NET Framework中的COM+与MTS
获取Sql服务器列表 C#
.Net Framework Beta 2 初步介绍
DLL的应用。
编译自己的资源文件编辑器reseditor.exe
.NET 2.0 基础类库中的范型:其他范型类
.NET 2.0 基础类库中的范型:Functional Programming
Lion.Web.UpLoadModule 1.1.2004.0720 大文件上传带进度显示组件DOTNET
.NET编程规范
web.config配置文件示例
编程实现QQ表情文件CFC格式
关于线程的参数、“返回值”、及线程的中止

ASP.NET 中的 列出所有的sheet,然后点击其中的一个,自动跳过去


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-11-03   浏览: 50 ::
收藏到网摘: n/a

很高兴啊,刚才实现了一个功能,excel的vba编程,终于可以列出所有的sheet,然后点击其中的一个,自动跳过去!代码很简单,如下:Private Sub ListBox1_Click()

Workbooks.Application.Sheets(ListBox1.ListIndex + 1).Select

End Sub


Private Sub UserForm_Click()

ListBox1.Clear

Dim i As Integer

For i = 1 To Workbooks.Application.Sheets.Count

Set WsheetA = Workbooks.Application.Sheets(i)

Me.ListBox1.AddItem WsheetA.Name

Next i

End Sub