自動根據excel的某一列單元格的值計算，並將計算的結果給同行的下一列單元格賦值

Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column = 13 And Target.Row > 1 Then Target.Offset(0, 1) = Target.Value * 5 End If End Sub

>>阅读原文<<