vba- 将字符串与工作表名称进行比较

Question

抱歉，与字符串相比我遇到了问题，我无法弄清楚哪里出了问题。

For I = 3 To WS_Count

    If "*rojekt*" = Worksheets(I).Name Then
    Set rng = Worksheets("Übersicht").Range("A2" & I - 1)
    rng.Value = ActiveWorkbook.Worksheets(I).Range("A2").Value
    End If

    Next I

它没有通过任何错误，但我希望 if 语句检查字符串是否是工作表名称的一部分，然后执行某项操作。在那个ws.

Answer 1

您需要替换这一行：

If "*rojekt*" = Worksheets(I).Name Then

有了这个：

If InStr(1, Worksheets(i).Name, "rojekt", vbTextCompare) Then

Answer 2

只需使用：

if Worksheets(I).Name Like "*rojekt*" Then

应该可以解决问题

vba- 将字符串与工作表名称进行比较

vba- compare string to Worksheet name

string

vba

string-comparison