如果单元格值以字母开头

时间:2013-07-15 22:07:56

标签: vba excel-vba excel

当这个单元格以字母K开头时,尝试制作这个GOTO ZPLUS。我希望它以G31中的Goto ZPLUS为例,因为它以字母K开头。事实上我想要它如果值包含任何字母,则为GOTO ZPLUS。

  If Application.Worksheets("RawData").Range("H" & Z) = 1 Or Left("A" & Z, 1) = K Then
    Y = Application.Worksheets("RawData").Range("A" & Z + 1)
    GoTo ZPLUS
  End If

1 个答案:

答案 0 :(得分:2)

With Application.Worksheets("RawData")
    If .Range("H" & Z).Value = 1 Or .Range("A" & Z).Value Like "[A-Z]*" Then
        Y = .Range("A" & Z + 1).Value
        GoTo ZPLUS
    End If
End With