ゼロ値は別のセルの内容に基づいています

列Qが閉じている場合は、列AB、AD、AF、AL、AN、APをすべて0に戻します。これは各行のためのものです。

2016-07-13 Chris

あなたはこれまでに何をしようとしたのですか？ –

'Worksheet_Change'イベントに関するいくつかの調査を行い、あなたのニーズに合っているかどうかを確認してください。 – arcadeprecinct

Public Sub SetZeroForClosed() 
 
Dim TRange As Range 
 
    Set TRange = ActiveSheet.UsedRange 
 
    For i = 1 To TRange.Rows.Count 
 
If VBA.LCase(VBA.Trim(TRange.Cells(i, 17).Value)) = VBA.LCase("Closed") Then 
 
    TRange.Cells(i, 28).Value = 0 
 
    TRange.Cells(i, 30).Value = 0 
 
    TRange.Cells(i, 32).Value = 0 
 
    TRange.Cells(i, 38).Value = 0 
 
    TRange.Cells(i, 40).Value = 0 
 
    TRange.Cells(i, 42).Value = 0 
 
End If 
 
    Next i 
 
End Sub

出典

2016-07-13 11:09:58

このvbaコードを使用してマクロに入れると、このコードを実行して実行する方法がわかります。 –

はい、それは私にコンパイルエラーを与えることを続けた – Chris

は、そのエラーのスナップを送信し、同様にコードのスナップを –

ゼロ値は別のセルの内容に基づいています

答えて

関連する問題