1

変数を 2 セットの値で定義したいと思います。例えば、

Dim i as integer
For i = 92 to 97 and 104 to 109

これを行う適切な方法を説明できますか？これが私が持っているものです-

Dim k As Integer
For k = 92 To 97

If Range("A" & k).Text = "#NUM!" Then

Range("A" & k).Select
Selection.ClearContents

Range("I" & k).Select
Selection.ClearContents

Range("J" & k).Select
Selection.ClearContents

End If

Next k


Dim j As Integer
For j = 104 To 109

If Range("A" & k).Text = "#NUM!" Then

Range("A" & j).Select
Selection.ClearContents

Range("I" & j).Select
Selection.ClearContents

Range("J" & j).Select
Selection.ClearContents

End If

Next j

変数 k と j を結合したいと思います。ありがとう！

4

1 に答える 1

4 
Dim k As Integer
For k = 92 To 109
    If Range("A" & k).Text = "#NUM!" and (k <= 97 or k >= 104) Then
        Range("A" & k).ClearContents
        Range("I" & k).ClearContents
        Range("J" & k).ClearContents
    End If
Next k

これは私には論理的な方法のように思えます。また、それらすべての選択をクリーンアップしました。それらは不要であり、何よりも問題を引き起こす可能性があります。

于 2012-12-06T11:12:07.240 に答える