如何使用VB.NET检查Excel工作表名称中的特定文本? (这个代码有什么错误?)

我想实现以下,

我有一个包含不同名称的工作表的Excel文件。 一些表被命名为A1,A2,B1,B2,C1,C2等

如果工作表名称包含“A”,则将A3:A70导出到另一个名为“range.xlsx”的工作簿

如果工作表名称包含“B”,则将范围B3:B70导出到“range.xlsx”

如果工作表名称包含“C”,则将范围C3:C70导出到“range.xlsx”

任何帮助将非常感激。

这是我试过的:

创build了一个表格名单,并通过这个列表循环做我想做的事情。

谢谢

未经testing的代码,但应该让你朝着正确的方向前进…

Dim wkbk As Excel.Workbook = ... Dim regxp As New Regex("[abc]") For Each wkst In wkbk.Worksheets If Not regxp.Match(wkst.Name) = "" Then ... End If Next 

我想,现在我知道如何处理这个问题。 显然,如果我可以创build一个所有Excel工作表名称的列表,那么我将能够遍历这个列表。 我会尝试写它并发布。

谢谢

以下代码作品。

 Dim sheets As Excel.Worksheet Dim slist As String = "" For Each sheets In oWB1.Worksheets slist += sheets.Name Next RichTextBox1.Text = slist For i = 1 To num If slist.Contains("C" & i) Then 'loops to export values End If Next 

谢谢。