如何利用VBA获取指定工作簿中的工作表名称

获取指定的工作簿中工作表名称而非本工作簿中表的名称，下面的代码可以使用：

Sub 提取name()

Dim wk As Workbook

Dim sh As Worksheet

Dim rw As Byte

Set wk = WorkbooksOpen("D:\函数习题\第1章 函数基础xls")

For Each sh In Workbooks(2)Worksheets

rw = rw + 1

ThisWorkbookSheets(1)Range("a" & rw) = shName

Next sh

wkClose True

End Sub

新建一个工作簿，在VBA中新建一个模块，将上面的代码复制进去。记住要根据自己指定的工作簿改变一下workbooksopen后面的路径。结果会在新建工作簿中sheets1a列罗列出工作表名称。

ASPNET 获取 Excel 中工作表的名称方法如下：

string date = DateTimeNowYearToString() + DateTimeNowMonthToString() + DateTimeNowDayToString() + DateTimeNowHourToString() + DateTimeNowMinuteToString();

path = UserCompany + UserName + YearListSelectedValueToString() + "年" + MonthListSelectedValueToString() + "月" + date + "xls";

FileUpload1PostedFileSaveAs(path);

//将文件复制到服务器指定目录中

//调用获取excel为dataset的函数

DataSet data = new DataSet();

for (int i = 0; i < tablenum; i++)

{

tablename[i] = tables[i]TableNameToString();

//获取表格名 称,excel表格中sheet的名称

}

data = GetExcelDataGetDataSetFromExcel(path);

int tablenum;

tablenum = dataTablesCount;

//只充许一个excel中有一个sheet页，通过选择页面中表格类型确定,如需要一个excel中有多个sheet页面，则可去掉下面的判断

if (tablenum>1)

{

ResponseWrite("<Script Language=JavaScript>alert('excel表格中只充许有一个sheet页面!');</Script>");

return;

}

DataTable[] tables = new DataTable[tablenum];

for (int i = 0; i < tablenum; i++)

{

tablename[i] = tables[i]TableNameToString();

//获取表格名称,excel表格中sheet的名称

}

以上就是关于如何利用VBA获取指定工作簿中的工作表名称全部的内容，包括:如何利用VBA获取指定工作簿中的工作表名称、ASP.NET 如何获取 Excel 中工作表的名称。、等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！