Home |
Search |
Today's Posts |
|
#1
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
i am running the following macro,
Private Sub Worksheet_Change(ByVal Target As Range) If Range("FE11") = 1 Then MsgBox "VEHICLE MAY BE DUE FOR A SERVICE !!", vbBEEP + vbOKOnly End If End Sub i am a newbie to programming and can't figure out how to stop it from running everytime any cell value is changed in the worksheet other than "FE11" ! also i would like to add the date due in the message box if possible that is a reult of cell "FE12". any help would be aprreciated thanks in advance bassfisher |
#2
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
The argument Target is the cell that just changed, so you want something like
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$FE$11" and Target.Value = 1 Then MsgBox "VEHICLE MAY BE DUE FOR A SERVICE !!", vbBEEP + vbOKOnly End If End Sub -- HTH... Jim Thomlinson "bassfisher" wrote: i am running the following macro, Private Sub Worksheet_Change(ByVal Target As Range) If Range("FE11") = 1 Then MsgBox "VEHICLE MAY BE DUE FOR A SERVICE !!", vbBEEP + vbOKOnly End If End Sub i am a newbie to programming and can't figure out how to stop it from running everytime any cell value is changed in the worksheet other than "FE11" ! also i would like to add the date due in the message box if possible that is a reult of cell "FE12". any help would be aprreciated thanks in advance bassfisher |
#3
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
jim, thanks for the info, but now the message box doesn't appear as a an
alert to the user! ???? bassfisher "Jim Thomlinson" wrote: The argument Target is the cell that just changed, so you want something like Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$FE$11" and Target.Value = 1 Then MsgBox "VEHICLE MAY BE DUE FOR A SERVICE !!", vbBEEP + vbOKOnly End If End Sub -- HTH... Jim Thomlinson "bassfisher" wrote: i am running the following macro, Private Sub Worksheet_Change(ByVal Target As Range) If Range("FE11") = 1 Then MsgBox "VEHICLE MAY BE DUE FOR A SERVICE !!", vbBEEP + vbOKOnly End If End Sub i am a newbie to programming and can't figure out how to stop it from running everytime any cell value is changed in the worksheet other than "FE11" ! also i would like to add the date due in the message box if possible that is a reult of cell "FE12". any help would be aprreciated thanks in advance bassfisher |
#4
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
Is FE11 a Formula by chance. In that case the target is not FE11 and the
warning will not fire. You need to look at the precidents of that function and change the line (Target.Address = "$?$" Or Target.Address = "$?$") and Range("FE11") = 1 -- HTH... Jim Thomlinson "bassfisher" wrote: jim, thanks for the info, but now the message box doesn't appear as a an alert to the user! ???? bassfisher "Jim Thomlinson" wrote: The argument Target is the cell that just changed, so you want something like Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$FE$11" and Target.Value = 1 Then MsgBox "VEHICLE MAY BE DUE FOR A SERVICE !!", vbBEEP + vbOKOnly End If End Sub -- HTH... Jim Thomlinson "bassfisher" wrote: i am running the following macro, Private Sub Worksheet_Change(ByVal Target As Range) If Range("FE11") = 1 Then MsgBox "VEHICLE MAY BE DUE FOR A SERVICE !!", vbBEEP + vbOKOnly End If End Sub i am a newbie to programming and can't figure out how to stop it from running everytime any cell value is changed in the worksheet other than "FE11" ! also i would like to add the date due in the message box if possible that is a reult of cell "FE12". any help would be aprreciated thanks in advance bassfisher |
#5
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
thanks again jim, i'll give it a shot and let you know how it works
bassfisher "Jim Thomlinson" wrote: Is FE11 a Formula by chance. In that case the target is not FE11 and the warning will not fire. You need to look at the precidents of that function and change the line (Target.Address = "$?$" Or Target.Address = "$?$") and Range("FE11") = 1 -- HTH... Jim Thomlinson "bassfisher" wrote: jim, thanks for the info, but now the message box doesn't appear as a an alert to the user! ???? bassfisher "Jim Thomlinson" wrote: The argument Target is the cell that just changed, so you want something like Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$FE$11" and Target.Value = 1 Then MsgBox "VEHICLE MAY BE DUE FOR A SERVICE !!", vbBEEP + vbOKOnly End If End Sub -- HTH... Jim Thomlinson "bassfisher" wrote: i am running the following macro, Private Sub Worksheet_Change(ByVal Target As Range) If Range("FE11") = 1 Then MsgBox "VEHICLE MAY BE DUE FOR A SERVICE !!", vbBEEP + vbOKOnly End If End Sub i am a newbie to programming and can't figure out how to stop it from running everytime any cell value is changed in the worksheet other than "FE11" ! also i would like to add the date due in the message box if possible that is a reult of cell "FE12". any help would be aprreciated thanks in advance bassfisher |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
How to stop running macros everytime I run excel? | Excel Discussion (Misc queries) | |||
Password Prompt Everytime a Link is Changed | Excel Discussion (Misc queries) | |||
How do I stop a Macro from running? | Excel Worksheet Functions | |||
stop from running everytime a cell is changed | Excel Programming | |||
Automaticlly Running Macro on Changed Cell | Excel Programming |