Home |
Search |
Today's Posts |
#1
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
I had some pretty good help on this problem and thought we had it nailed,
but a slight problem still remains. I need a message box to appear when two amounts do not match and I need this to happen as the amounts are typed in. To make this short lets say Column A-Cell 1 through Cell 1000 has a negative number ($50.00) and this will always be the case. Column B-Cell 1 through Cell1000 will have a matching number with the exception it will be a positive number. Column C-Cell 1 has the following formula =SUM(A1:B1) and all Cells below that =SUM(B1:C1) and so on. The following code whom someone wrote for me works with the exception as soon as you type in the first number the message box appears. Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range) Application.EnableEvents = False Set myRng = Range("C2:X1000") ' Change if necessary If Application.WorksheetFunction.Sum(myRng) < 0 Then MsgBox "Totals are out of Balance" End If Set myRng = Nothing Application.EnableEvents = True End Sub Is there a way to make this code pause until both numbers are entered before it checks it? Conditional formatting was suggested and turns the Cell a color, but this is no good for what I need. I really need a message box as I input the Data. This sheet is quite large and the Cells and Columns run out of site. It was suggested to do a Window-Freeze, freezing the First 4 or 5 rows, but this won't work for me. It still causes me to go back and read Check numbers, the amount entered in the negative number and scroll over to the positive number and make the correction whichever it may be. I use the Data Form to cut down on scrolling, but at the end of the day I have to check my last row formulas to see if all Data was entered correctly and if not it's taking to much time to correct all my mistakes. All the best, SG |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
Create error message if number entered is greater than previous ce | Excel Discussion (Misc queries) | |||
Message box if cell is greater than less than 0 [Zero] | Excel Discussion (Misc queries) | |||
Intercept/replace standard 'cell protected' message with my own message? | Excel Programming | |||
Addition to Turn cell red if today is greater or equal to date in cell | New Users to Excel | |||
Turn cell red if today is greater or equal to date in cell | New Users to Excel |