|
▼nibu さん:
>時間の差分を求めるマクロを作成しているのですが、コマンドボタンを押すと
>1行目に100,70,80,60,78,78というような数字が出力されます。
>7行目に合計が出力されます。内容は1行目と同じです。
>2〜6行目に数字を手動で入力していくと1行目の数字が減少していく。
>
>例)
> 40 30 40 30 40 40
> 30 20 10 10 18 18
> 20 10 20 10 10 10
> 10 10 10 10 10 10
>
>合計 100 70 80 60 78 78
>
>1行目が入力された状態でこのようなマクロは組めるのでしょうか?
INAさん横レスすみません。
下記のマクロで良いとおもいます。
Private Sub Worksheet_Change(ByVal Target As Range)
' MsgBox "行=" & Target.Row & "列=" & Target.Column
If (Target.Row = 1) Then
Cells(7, Target.Column).Value = Cells(Target.Row, Target.Column).Value
Cells(Target.Row, Target.Column) = "=R[6]C-(SUM(R[1]C:R[5]C))"
End If
End Sub
|
|