Hello,

I've been searching the forum to get some clues but wasn't successful.

I'm trying to run a bit of code that will trigger an inputbox when the value of a certain cell is changed to "0". The inputbox entry will be placed in a different cell. Been trying this:

Private Sub Workbook_SheetChange()

Dim amount As String
Set amountcell = Sheet1.Range("C5")

    If amountcell = "0" Then

        amount = InputBox("How Much?", vbOKCancel, "Move Money")
        Worksheets("Sheet1").[L4] = amount

    End If

End Sub
Nothing occurs when the cell "C5" changes to "0". I feel as if I'm missing something simple here and I'd appreciate any guidance.

TIA
cherkey