0

さて、いくつかの同様の質問を見ましたが、私の問題に完全に対処するものはありませんでした.

私がやりたいことは、列 A を通過し、*(アスタリスク) を含む各 cl について、値を に変更したいことです0。 

私が間違っていなければ、アスタリスクは Excel コーディングで使用されるため、通常のテキストとは異なる方法で処理する必要があります。私が間違っていても、別の方法で扱わなければならない別の文字や単語を知っている場合は、読者と私自身の知識の両方について教えてください.

以下は私のコードがどのように見えるかです。ご協力いただきありがとうございます

For each cl.value in range("A2:A300").
    If cl.value contains "*" then. Cl.value = 0.
End if.
Next cl. 
4

2 に答える 2

2

if statementあなたの状況でVBAで適切に書く方法はほとんどありません。1つは次のようになります。

For Each cl In Range("A2:A300")
    If InStr(1, cl.Value, "*") > 0 Then
        cl.Value = 0
    End If
Next cl
于 2013-05-22T20:56:11.033 に答える