Pop-up reminder on Forms??

G

Guest

Hi all -

Can anyone tell me how to set up a popup reminder when a user moves off a
record as they use my form to inpout data?

I want to reinforce a few specific fields to them, which I would like ensure
they have reviewed before moving to the next record input/update.

Thanks anyone!!
M
 
G

Guest

You can use the before update event of the form, to check if specific fields
were used.

If IsNull(me.Field1Name) Or IsNull(Me.Field2Name) then
msgbox "Fields 1 and 2 must be filled"
cancel = True ' wont let the user move to the next record
End if
 
G

Guest

Thanks for the guidance...I want to make sure of one thing however:

I am trying to simply alert the user to the lack of data in certain fields.
I then want to allow them to hit OK and move to the next record if that was
their action (or close the form if that was their action)

Will this allow them to do so?

Also, an amateurish qn:
What is within the parentheses? Is me.Field1Name reflective of a field I
want to specify? And if so, can I simply keep adding to the string with
multiple fields ( I am looking at about 12-15 I wish to highlight in this
process)

M
 
G

Guest

For the first question, it will allow them but you need to remove the
cancel = true
Line in the code I provided you with
================================
The Me stand for the current form
Me.Field1name refer to the field Field1name in the current form.
To have a loop that check the field you can try this

Dim I as Integer
For I = 1 To 15
If IsNull(me("Fieldname" & I)) then
msgbox "Not all data was entered"
I = 15 ' To exit the loop
End If
Next I
You can use this loop if all fields has the same name, with an extra number
next to it.
--
If I answered your question, please mark it as an answer. That way, it will
stay saved for a longer time, so other can benifit from it.

Good luck
 
G

Guest

It is giving me a Compile Error when I tried to test as the following:

Private Sub Form_BeforeUpdate(Cancel As Integer)
If IsNull(PIPELINE REPORT.Sales Alert Date) Or IsNull(PIPELINE
REPORT.Eligibles) Then
MsgBox "Please check for valid entries in Sales Alert Date and Eligibles"
End If

End Sub

Any suggestions??

M
 
G

Guest

What PIPELINE REPORT Stand for?

Try this
Private Sub Form_BeforeUpdate(Cancel As Integer)
If IsNull(Me.[Sales Alert Date]) Or IsNull(Me.Eligibles) Then
MsgBox "Please check for valid entries in Sales Alert Date and Eligibles"
End If
End Sub

--
If I answered your question, please mark it as an answer. That way, it will
stay saved for a longer time, so other can benifit from it.

Good luck
 
G

Guest

This is awesome - thanks so much!!

I do have one follow-up qn however: how can I let the user stay on this
record, review the 2 fields visually and then decide to continue on with
their action, either after entering data in these fields or not (as it may
not be available yet)?

Currently, because I removed the one line from your code it simply goes to
the next record - this was per my earlier request of course, which I now wish
to reconsider...

Sorry for the extra qns, but I really appreciate your help.

M

Ofer said:
What PIPELINE REPORT Stand for?

Try this
Private Sub Form_BeforeUpdate(Cancel As Integer)
If IsNull(Me.[Sales Alert Date]) Or IsNull(Me.Eligibles) Then
MsgBox "Please check for valid entries in Sales Alert Date and Eligibles"
End If
End Sub

--
If I answered your question, please mark it as an answer. That way, it will
stay saved for a longer time, so other can benifit from it.

Good luck



Monish said:
It is giving me a Compile Error when I tried to test as the following:

Private Sub Form_BeforeUpdate(Cancel As Integer)
If IsNull(PIPELINE REPORT.Sales Alert Date) Or IsNull(PIPELINE
REPORT.Eligibles) Then
MsgBox "Please check for valid entries in Sales Alert Date and Eligibles"
End If

End Sub

Any suggestions??

M
 
G

Guest

No problem, just add the other line again
Private Sub Form_BeforeUpdate(Cancel As Integer)
If IsNull(Me.[Sales Alert Date]) Or IsNull(Me.Eligibles) Then
MsgBox "Please check for valid entries in Sales Alert Date and Eligibles"
cancel = true
End If
End Sub
--
If I answered your question, please mark it as an answer. That way, it will
stay saved for a longer time, so other can benifit from it.

Good luck



Monish said:
This is awesome - thanks so much!!

I do have one follow-up qn however: how can I let the user stay on this
record, review the 2 fields visually and then decide to continue on with
their action, either after entering data in these fields or not (as it may
not be available yet)?

Currently, because I removed the one line from your code it simply goes to
the next record - this was per my earlier request of course, which I now wish
to reconsider...

Sorry for the extra qns, but I really appreciate your help.

M

Ofer said:
What PIPELINE REPORT Stand for?

Try this
Private Sub Form_BeforeUpdate(Cancel As Integer)
If IsNull(Me.[Sales Alert Date]) Or IsNull(Me.Eligibles) Then
MsgBox "Please check for valid entries in Sales Alert Date and Eligibles"
End If
End Sub

--
If I answered your question, please mark it as an answer. That way, it will
stay saved for a longer time, so other can benifit from it.

Good luck



Monish said:
It is giving me a Compile Error when I tried to test as the following:

Private Sub Form_BeforeUpdate(Cancel As Integer)
If IsNull(PIPELINE REPORT.Sales Alert Date) Or IsNull(PIPELINE
REPORT.Eligibles) Then
MsgBox "Please check for valid entries in Sales Alert Date and Eligibles"
End If

End Sub

Any suggestions??

M

:

For the first question, it will allow them but you need to remove the
cancel = true
Line in the code I provided you with
================================
The Me stand for the current form
Me.Field1name refer to the field Field1name in the current form.
To have a loop that check the field you can try this

Dim I as Integer
For I = 1 To 15
If IsNull(me("Fieldname" & I)) then
msgbox "Not all data was entered"
I = 15 ' To exit the loop
End If
Next I
You can use this loop if all fields has the same name, with an extra number
next to it.
--
If I answered your question, please mark it as an answer. That way, it will
stay saved for a longer time, so other can benifit from it.

Good luck



:

Thanks for the guidance...I want to make sure of one thing however:

I am trying to simply alert the user to the lack of data in certain fields.
I then want to allow them to hit OK and move to the next record if that was
their action (or close the form if that was their action)

Will this allow them to do so?

Also, an amateurish qn:
What is within the parentheses? Is me.Field1Name reflective of a field I
want to specify? And if so, can I simply keep adding to the string with
multiple fields ( I am looking at about 12-15 I wish to highlight in this
process)

M


:

You can use the before update event of the form, to check if specific fields
were used.

If IsNull(me.Field1Name) Or IsNull(Me.Field2Name) then
msgbox "Fields 1 and 2 must be filled"
cancel = True ' wont let the user move to the next record
End if
--
If I answered your question, please mark it as an answer. That way, it will
stay saved for a longer time, so other can benifit from it.

Good luck



:

Hi all -

Can anyone tell me how to set up a popup reminder when a user moves off a
record as they use my form to inpout data?

I want to reinforce a few specific fields to them, which I would like ensure
they have reviewed before moving to the next record input/update.

Thanks anyone!!
M
 
G

Guest

lastly, I dont want to keep them stuck on this record (as this function does
until they enter data into the 2 fields) - I simply want to alert them to the
fact that the two fields have not been populated...and then allow them to
move on if they wish.

There is a scenario where these elements may not be available...

Can you offer any advice on hiw I can do this?

Thanks again.

BTW, how do I mark a post as "Answered"?

M

Ofer said:
No problem, just add the other line again
Private Sub Form_BeforeUpdate(Cancel As Integer)
If IsNull(Me.[Sales Alert Date]) Or IsNull(Me.Eligibles) Then
MsgBox "Please check for valid entries in Sales Alert Date and Eligibles"
cancel = true
End If
End Sub
--
If I answered your question, please mark it as an answer. That way, it will
stay saved for a longer time, so other can benifit from it.

Good luck



Monish said:
This is awesome - thanks so much!!

I do have one follow-up qn however: how can I let the user stay on this
record, review the 2 fields visually and then decide to continue on with
their action, either after entering data in these fields or not (as it may
not be available yet)?

Currently, because I removed the one line from your code it simply goes to
the next record - this was per my earlier request of course, which I now wish
to reconsider...

Sorry for the extra qns, but I really appreciate your help.

M

Ofer said:
What PIPELINE REPORT Stand for?

Try this
Private Sub Form_BeforeUpdate(Cancel As Integer)
If IsNull(Me.[Sales Alert Date]) Or IsNull(Me.Eligibles) Then
MsgBox "Please check for valid entries in Sales Alert Date and Eligibles"
End If
End Sub

--
If I answered your question, please mark it as an answer. That way, it will
stay saved for a longer time, so other can benifit from it.

Good luck



:

It is giving me a Compile Error when I tried to test as the following:

Private Sub Form_BeforeUpdate(Cancel As Integer)
If IsNull(PIPELINE REPORT.Sales Alert Date) Or IsNull(PIPELINE
REPORT.Eligibles) Then
MsgBox "Please check for valid entries in Sales Alert Date and Eligibles"
End If

End Sub

Any suggestions??

M

:

For the first question, it will allow them but you need to remove the
cancel = true
Line in the code I provided you with
================================
The Me stand for the current form
Me.Field1name refer to the field Field1name in the current form.
To have a loop that check the field you can try this

Dim I as Integer
For I = 1 To 15
If IsNull(me("Fieldname" & I)) then
msgbox "Not all data was entered"
I = 15 ' To exit the loop
End If
Next I
You can use this loop if all fields has the same name, with an extra number
next to it.
--
If I answered your question, please mark it as an answer. That way, it will
stay saved for a longer time, so other can benifit from it.

Good luck



:

Thanks for the guidance...I want to make sure of one thing however:

I am trying to simply alert the user to the lack of data in certain fields.
I then want to allow them to hit OK and move to the next record if that was
their action (or close the form if that was their action)

Will this allow them to do so?

Also, an amateurish qn:
What is within the parentheses? Is me.Field1Name reflective of a field I
want to specify? And if so, can I simply keep adding to the string with
multiple fields ( I am looking at about 12-15 I wish to highlight in this
process)

M


:

You can use the before update event of the form, to check if specific fields
were used.

If IsNull(me.Field1Name) Or IsNull(Me.Field2Name) then
msgbox "Fields 1 and 2 must be filled"
cancel = True ' wont let the user move to the next record
End if
--
If I answered your question, please mark it as an answer. That way, it will
stay saved for a longer time, so other can benifit from it.

Good luck



:

Hi all -

Can anyone tell me how to set up a popup reminder when a user moves off a
record as they use my form to inpout data?

I want to reinforce a few specific fields to them, which I would like ensure
they have reviewed before moving to the next record input/update.

Thanks anyone!!
M
 
G

Guest

Give the user a message with an option to continue
If IsNull(Me.[Sales Alert Date]) Or IsNull(Me.Eligibles) Then
If msgbox ("Sales Alert Date and Eligibles are not complete, do you wish
to continue anyway?",vbYesNo)<>vbYes then
cancel = true
End If
============================
On the buttom of my replay it ask if I answered your question, you can mark
it as Yes

Good luck



Monish said:
lastly, I dont want to keep them stuck on this record (as this function does
until they enter data into the 2 fields) - I simply want to alert them to the
fact that the two fields have not been populated...and then allow them to
move on if they wish.

There is a scenario where these elements may not be available...

Can you offer any advice on hiw I can do this?

Thanks again.

BTW, how do I mark a post as "Answered"?

M

Ofer said:
No problem, just add the other line again
Private Sub Form_BeforeUpdate(Cancel As Integer)
If IsNull(Me.[Sales Alert Date]) Or IsNull(Me.Eligibles) Then
MsgBox "Please check for valid entries in Sales Alert Date and Eligibles"
cancel = true
End If
End Sub
--
If I answered your question, please mark it as an answer. That way, it will
stay saved for a longer time, so other can benifit from it.

Good luck



Monish said:
This is awesome - thanks so much!!

I do have one follow-up qn however: how can I let the user stay on this
record, review the 2 fields visually and then decide to continue on with
their action, either after entering data in these fields or not (as it may
not be available yet)?

Currently, because I removed the one line from your code it simply goes to
the next record - this was per my earlier request of course, which I now wish
to reconsider...

Sorry for the extra qns, but I really appreciate your help.

M

:

What PIPELINE REPORT Stand for?

Try this
Private Sub Form_BeforeUpdate(Cancel As Integer)
If IsNull(Me.[Sales Alert Date]) Or IsNull(Me.Eligibles) Then
MsgBox "Please check for valid entries in Sales Alert Date and Eligibles"
End If
End Sub

--
If I answered your question, please mark it as an answer. That way, it will
stay saved for a longer time, so other can benifit from it.

Good luck



:

It is giving me a Compile Error when I tried to test as the following:

Private Sub Form_BeforeUpdate(Cancel As Integer)
If IsNull(PIPELINE REPORT.Sales Alert Date) Or IsNull(PIPELINE
REPORT.Eligibles) Then
MsgBox "Please check for valid entries in Sales Alert Date and Eligibles"
End If

End Sub

Any suggestions??

M

:

For the first question, it will allow them but you need to remove the
cancel = true
Line in the code I provided you with
================================
The Me stand for the current form
Me.Field1name refer to the field Field1name in the current form.
To have a loop that check the field you can try this

Dim I as Integer
For I = 1 To 15
If IsNull(me("Fieldname" & I)) then
msgbox "Not all data was entered"
I = 15 ' To exit the loop
End If
Next I
You can use this loop if all fields has the same name, with an extra number
next to it.
--
If I answered your question, please mark it as an answer. That way, it will
stay saved for a longer time, so other can benifit from it.

Good luck



:

Thanks for the guidance...I want to make sure of one thing however:

I am trying to simply alert the user to the lack of data in certain fields.
I then want to allow them to hit OK and move to the next record if that was
their action (or close the form if that was their action)

Will this allow them to do so?

Also, an amateurish qn:
What is within the parentheses? Is me.Field1Name reflective of a field I
want to specify? And if so, can I simply keep adding to the string with
multiple fields ( I am looking at about 12-15 I wish to highlight in this
process)

M


:

You can use the before update event of the form, to check if specific fields
were used.

If IsNull(me.Field1Name) Or IsNull(Me.Field2Name) then
msgbox "Fields 1 and 2 must be filled"
cancel = True ' wont let the user move to the next record
End if
--
If I answered your question, please mark it as an answer. That way, it will
stay saved for a longer time, so other can benifit from it.

Good luck



:

Hi all -

Can anyone tell me how to set up a popup reminder when a user moves off a
record as they use my form to inpout data?

I want to reinforce a few specific fields to them, which I would like ensure
they have reviewed before moving to the next record input/update.

Thanks anyone!!
M
 
G

Guest

Honestly this is my last qn on this topic...

Is there a way I can format this messgae box so that it looks like this:

One or more of the following fields are incomplete:
Sales Alert Date
Eligibles
Something Else

Would you like to continue anyway?
======

Instead of how it currently scrolls across the screen?

M

Ofer said:
Give the user a message with an option to continue
If IsNull(Me.[Sales Alert Date]) Or IsNull(Me.Eligibles) Then
If msgbox ("Sales Alert Date and Eligibles are not complete, do you wish
to continue anyway?",vbYesNo)<>vbYes then
cancel = true
End If
============================
On the buttom of my replay it ask if I answered your question, you can mark
it as Yes

Good luck



Monish said:
lastly, I dont want to keep them stuck on this record (as this function does
until they enter data into the 2 fields) - I simply want to alert them to the
fact that the two fields have not been populated...and then allow them to
move on if they wish.

There is a scenario where these elements may not be available...

Can you offer any advice on hiw I can do this?

Thanks again.

BTW, how do I mark a post as "Answered"?

M

Ofer said:
No problem, just add the other line again
Private Sub Form_BeforeUpdate(Cancel As Integer)
If IsNull(Me.[Sales Alert Date]) Or IsNull(Me.Eligibles) Then
MsgBox "Please check for valid entries in Sales Alert Date and Eligibles"
cancel = true
End If
End Sub
--
If I answered your question, please mark it as an answer. That way, it will
stay saved for a longer time, so other can benifit from it.

Good luck



:

This is awesome - thanks so much!!

I do have one follow-up qn however: how can I let the user stay on this
record, review the 2 fields visually and then decide to continue on with
their action, either after entering data in these fields or not (as it may
not be available yet)?

Currently, because I removed the one line from your code it simply goes to
the next record - this was per my earlier request of course, which I now wish
to reconsider...

Sorry for the extra qns, but I really appreciate your help.

M

:

What PIPELINE REPORT Stand for?

Try this
Private Sub Form_BeforeUpdate(Cancel As Integer)
If IsNull(Me.[Sales Alert Date]) Or IsNull(Me.Eligibles) Then
MsgBox "Please check for valid entries in Sales Alert Date and Eligibles"
End If
End Sub

--
If I answered your question, please mark it as an answer. That way, it will
stay saved for a longer time, so other can benifit from it.

Good luck



:

It is giving me a Compile Error when I tried to test as the following:

Private Sub Form_BeforeUpdate(Cancel As Integer)
If IsNull(PIPELINE REPORT.Sales Alert Date) Or IsNull(PIPELINE
REPORT.Eligibles) Then
MsgBox "Please check for valid entries in Sales Alert Date and Eligibles"
End If

End Sub

Any suggestions??

M

:

For the first question, it will allow them but you need to remove the
cancel = true
Line in the code I provided you with
================================
The Me stand for the current form
Me.Field1name refer to the field Field1name in the current form.
To have a loop that check the field you can try this

Dim I as Integer
For I = 1 To 15
If IsNull(me("Fieldname" & I)) then
msgbox "Not all data was entered"
I = 15 ' To exit the loop
End If
Next I
You can use this loop if all fields has the same name, with an extra number
next to it.
--
If I answered your question, please mark it as an answer. That way, it will
stay saved for a longer time, so other can benifit from it.

Good luck



:

Thanks for the guidance...I want to make sure of one thing however:

I am trying to simply alert the user to the lack of data in certain fields.
I then want to allow them to hit OK and move to the next record if that was
their action (or close the form if that was their action)

Will this allow them to do so?

Also, an amateurish qn:
What is within the parentheses? Is me.Field1Name reflective of a field I
want to specify? And if so, can I simply keep adding to the string with
multiple fields ( I am looking at about 12-15 I wish to highlight in this
process)

M


:

You can use the before update event of the form, to check if specific fields
were used.

If IsNull(me.Field1Name) Or IsNull(Me.Field2Name) then
msgbox "Fields 1 and 2 must be filled"
cancel = True ' wont let the user move to the next record
End if
--
If I answered your question, please mark it as an answer. That way, it will
stay saved for a longer time, so other can benifit from it.

Good luck



:

Hi all -

Can anyone tell me how to set up a popup reminder when a user moves off a
record as they use my form to inpout data?

I want to reinforce a few specific fields to them, which I would like ensure
they have reviewed before moving to the next record input/update.

Thanks anyone!!
M
 
G

Guest

No problem, try this

Dim MyMsg As String
MyMsg = "One or more of the following fields are incomplete:" & Chr(13) & _
"Sales Alert Date " & Chr(13) & _
"Eligibles " & Chr(13) & _
"Something Else" & Chr(13) & Chr(13) & _
"Would you like to continue anyway?"

If IsNull(Me.[Sales Alert Date]) Or IsNull(Me.Eligibles) Then
If msgbox (MyMsg ,vbYesNo)<>vbYes then
cancel = true
end if
End If

Good luck



Monish said:
Honestly this is my last qn on this topic...

Is there a way I can format this messgae box so that it looks like this:

One or more of the following fields are incomplete:
Sales Alert Date
Eligibles
Something Else

Would you like to continue anyway?
======

Instead of how it currently scrolls across the screen?

M

Ofer said:
Give the user a message with an option to continue
If IsNull(Me.[Sales Alert Date]) Or IsNull(Me.Eligibles) Then
If msgbox ("Sales Alert Date and Eligibles are not complete, do you wish
to continue anyway?",vbYesNo)<>vbYes then
cancel = true
End If
============================
On the buttom of my replay it ask if I answered your question, you can mark
it as Yes

Good luck



Monish said:
lastly, I dont want to keep them stuck on this record (as this function does
until they enter data into the 2 fields) - I simply want to alert them to the
fact that the two fields have not been populated...and then allow them to
move on if they wish.

There is a scenario where these elements may not be available...

Can you offer any advice on hiw I can do this?

Thanks again.

BTW, how do I mark a post as "Answered"?

M

:

No problem, just add the other line again
Private Sub Form_BeforeUpdate(Cancel As Integer)
If IsNull(Me.[Sales Alert Date]) Or IsNull(Me.Eligibles) Then
MsgBox "Please check for valid entries in Sales Alert Date and Eligibles"
cancel = true
End If
End Sub
--
If I answered your question, please mark it as an answer. That way, it will
stay saved for a longer time, so other can benifit from it.

Good luck



:

This is awesome - thanks so much!!

I do have one follow-up qn however: how can I let the user stay on this
record, review the 2 fields visually and then decide to continue on with
their action, either after entering data in these fields or not (as it may
not be available yet)?

Currently, because I removed the one line from your code it simply goes to
the next record - this was per my earlier request of course, which I now wish
to reconsider...

Sorry for the extra qns, but I really appreciate your help.

M

:

What PIPELINE REPORT Stand for?

Try this
Private Sub Form_BeforeUpdate(Cancel As Integer)
If IsNull(Me.[Sales Alert Date]) Or IsNull(Me.Eligibles) Then
MsgBox "Please check for valid entries in Sales Alert Date and Eligibles"
End If
End Sub

--
If I answered your question, please mark it as an answer. That way, it will
stay saved for a longer time, so other can benifit from it.

Good luck



:

It is giving me a Compile Error when I tried to test as the following:

Private Sub Form_BeforeUpdate(Cancel As Integer)
If IsNull(PIPELINE REPORT.Sales Alert Date) Or IsNull(PIPELINE
REPORT.Eligibles) Then
MsgBox "Please check for valid entries in Sales Alert Date and Eligibles"
End If

End Sub

Any suggestions??

M

:

For the first question, it will allow them but you need to remove the
cancel = true
Line in the code I provided you with
================================
The Me stand for the current form
Me.Field1name refer to the field Field1name in the current form.
To have a loop that check the field you can try this

Dim I as Integer
For I = 1 To 15
If IsNull(me("Fieldname" & I)) then
msgbox "Not all data was entered"
I = 15 ' To exit the loop
End If
Next I
You can use this loop if all fields has the same name, with an extra number
next to it.
--
If I answered your question, please mark it as an answer. That way, it will
stay saved for a longer time, so other can benifit from it.

Good luck



:

Thanks for the guidance...I want to make sure of one thing however:

I am trying to simply alert the user to the lack of data in certain fields.
I then want to allow them to hit OK and move to the next record if that was
their action (or close the form if that was their action)

Will this allow them to do so?

Also, an amateurish qn:
What is within the parentheses? Is me.Field1Name reflective of a field I
want to specify? And if so, can I simply keep adding to the string with
multiple fields ( I am looking at about 12-15 I wish to highlight in this
process)

M


:

You can use the before update event of the form, to check if specific fields
were used.

If IsNull(me.Field1Name) Or IsNull(Me.Field2Name) then
msgbox "Fields 1 and 2 must be filled"
cancel = True ' wont let the user move to the next record
End if
--
If I answered your question, please mark it as an answer. That way, it will
stay saved for a longer time, so other can benifit from it.

Good luck



:

Hi all -

Can anyone tell me how to set up a popup reminder when a user moves off a
record as they use my form to inpout data?

I want to reinforce a few specific fields to them, which I would like ensure
they have reviewed before moving to the next record input/update.

Thanks anyone!!
M
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top