vb.net - 如何使用 VB.NET 检查 Excel 工作表名称中的特定文本？（这段代码有什么问题？）

Question

我想实现以下，

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

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

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

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

任何帮助将不胜感激。

这是我尝试过的：

创建了工作表名称列表并循环访问此列表以执行我想做的事情。

谢谢

Answer 1

未经测试的代码，但应该让你朝着正确的方向前进......

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

Answer 2

以下代码有效。

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

谢谢。

Answer 3

我想，现在我知道如何处理这个问题了。显然，如果我可以创建所有 excel 工作表名称的列表，那么我将能够遍历该列表。我会尝试写下来并发布。

谢谢