0

Excelワークシートで毎月の見越額を処理しています。月が変わると値が負になる関数やマクロを書きたいです。私が持っているのは、月がある列（K）と、月がある別のセル（M18）です。また、K = M18の場合、量（N）列の値を負にします。ただし、= if（$ K21 = $ M $ 18、N = N * -1、 ""）は機能しません。別の列を横に書くことができます。たとえば、Qと書くことができます=if($K21=$M$18, N*-1, "")が、実際にはN列自体の値が負である必要があります。Nの値を条件付きでそれ自体の負のバージョンに置き換えるマクロまたはネストされた関数を作成する方法はありますか？負のNの値をQで計算する必要がある場合、戻ってN = Qになる2番目の関数を作成できますか？

K_ __ L __ M __ _ ___ N
____前月の入力
____ 2月
___ **会場_ベンダー_金額**
2月 ____ ___ 1 , 6662 月
__ _ __ __ 2 月 3,240
__ _ __ _ _718

4

1 に答える 1

1

トリックを実行するためのマクロは次のとおりです。

Sub AccrualsMacro()

Dim rngN As Range
Dim clVal As Double
Dim cl As Range
Dim makeNegative As Boolean

makeNegative = [K21] = [M18]

If makeNegative Then
    Set rngN = Range("N1", Range("N1").End(xlDown))
    For Each cl In rngN
        With cl
            clVal = .Value
            If Not clVal < 0 Then 'only apply this rule if the value is still positive
               .Value = -1 * clVal
            End If
        End With
    Next
End If

End Sub
于 2013-03-22T18:39:59.477 に答える