Msgbox based on If statement
I have a macro assigned to a button, but it can only run if a particular cell
is zero. If the cell is greater than or less than zero, I want a message box to appear telling the user that the cell in question isn't zero. I know the code for making the Msgbox appear, but don't know the syntax for only having the box appear if the cell in question isn't zero. Any advice? |
One way:
Public Sub Test If Range("A1").Value < 0 Then MsgBox "Cell A1 must be equal to zero" Else 'your code here End If End Sub Or, slightly more robust Public Sub Test Dim bSuccess As Boolean With Range("A1") If IsNumeric(.Value) Then If .Value = 0 Then 'your code here bSuccess = True End If End If End With If Not bSuccess Then _ MsgBox "Cell A1 must be equal to zero" End Sub In article , "Neil Jimack" <Neil wrote: I have a macro assigned to a button, but it can only run if a particular cell is zero. If the cell is greater than or less than zero, I want a message box to appear telling the user that the cell in question isn't zero. I know the code for making the Msgbox appear, but don't know the syntax for only having the box appear if the cell in question isn't zero. Any advice? |
Try This ...
If Range("A1").FormulaR1C1 < 0 Then 'run your code here ActiveWindow.SelectedSheets.PrintPreview Else MsgBox ("Cell [A1] cannot equal Zero") End If regards, Nick "Neil Jimack" wrote: I have a macro assigned to a button, but it can only run if a particular cell is zero. If the cell is greater than or less than zero, I want a message box to appear telling the user that the cell in question isn't zero. I know the code for making the Msgbox appear, but don't know the syntax for only having the box appear if the cell in question isn't zero. Any advice? |
All times are GMT +1. The time now is 04:04 AM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com