I have a userform that has an Add New Record command button and a
Submit command button. I don't want the Submit button to be available
until/unless the Add New Record has been used. I'm not sure how to go
about writing the code for that. Currently, the user can "browse"
thru existing records using my Previous and Next command buttons but I
don't want them to be able to edit the record they're viewing (at this
time, ultimately I do but I can't figure out the code for that
either), but in the meantime I would be content with disabling the
Submit button.

Any suggestions are greatly welcomed.

I'd probably create a named range called EnableSubmit and change it when
needed.

At the beginning of the Submit code, you could read the value for the range
and if it's TRUE, continue.
--
HTH,
Barb Reinhardt




" wrote:

I have a userform that has an Add New Record command button and a
Submit command button. I don't want the Submit button to be available
until/unless the Add New Record has been used. I'm not sure how to go
about writing the code for that. Currently, the user can "browse"
thru existing records using my Previous and Next command buttons but I
don't want them to be able to edit the record they're viewing (at this
time, ultimately I do but I can't figure out the code for that
either), but in the meantime I would be content with disabling the
Submit button.

Any suggestions are greatly welcomed.

On Sep 4, 11:02*am, Barb Reinhardt
wrote:
I'd probably create a named range called EnableSubmit and change it when
needed. *

At the beginning of the Submit code, you could read the value for the range
and if it's TRUE, continue.
--
HTH,
Barb Reinhardt



" wrote:
I have a userform that has an Add New Record command button and a
Submit command button. *I don't want the Submit button to be available
until/unless the Add New Record has been used. *I'm not sure how to go
about writing the code for that. *Currently, the user can "browse"
thru existing records using my Previous and Next command buttons but I
don't want them to be able to edit the record they're viewing (at this
time, ultimately I do but I can't figure out the code for that
either), but in the meantime I would be content with disabling the
Submit button.

Any suggestions are greatly welcomed.- Hide quoted text -

- Show quoted text -

That sounds great but I can't get my head around it, do you have a
minute that you could explain how I would do that or point me in the
right direction?

This should help you get started.

Sub ReadSubmit()

Dim Submit As String
On Error Resume Next
Submit = Evaluate(Names("Submit").Value)
On Error GoTo 0
If Submit = "" Then
Debug.Print "Named range submit doesn't exist"
Else
Debug.Print "Submit: " & Submit
End If
End Sub

Sub DefineSubmit()
Dim myName As String
Dim myRefersTo As String
'Change submit to Yes
myName = "Submit"
myRefersTo = "=""Yes"""
ThisWorkbook.Names.Add Name:=myName, RefersTo:=myRefersTo

Call ReadSubmit
'Change submit to No
myName = "Submit"
myRefersTo = "=""No"""
ThisWorkbook.Names.Add Name:="Submit", RefersTo:="=FALSE"
End Sub

--
HTH,
Barb Reinhardt




" wrote:

On Sep 4, 11:02 am, Barb Reinhardt
wrote:
I'd probably create a named range called EnableSubmit and change it when
needed.

At the beginning of the Submit code, you could read the value for the range
and if it's TRUE, continue.
--
HTH,
Barb Reinhardt



" wrote:
I have a userform that has an Add New Record command button and a
Submit command button. I don't want the Submit button to be available
until/unless the Add New Record has been used. I'm not sure how to go
about writing the code for that. Currently, the user can "browse"
thru existing records using my Previous and Next command buttons but I
don't want them to be able to edit the record they're viewing (at this
time, ultimately I do but I can't figure out the code for that
either), but in the meantime I would be content with disabling the
Submit button.

Any suggestions are greatly welcomed.- Hide quoted text -

- Show quoted text -

That sounds great but I can't get my head around it, do you have a
minute that you could explain how I would do that or point me in the
right direction?

On Sep 4, 11:30*am, Barb Reinhardt
wrote:
This should help you get started.

Sub ReadSubmit()

Dim Submit As String
On Error Resume Next
Submit = Evaluate(Names("Submit").Value)
On Error GoTo 0
If Submit = "" Then
* * Debug.Print "Named range submit doesn't exist"
Else
* * Debug.Print "Submit: " & Submit
End If
End Sub

Sub DefineSubmit()
Dim myName As String
Dim myRefersTo As String
'Change submit to Yes
myName = "Submit"
myRefersTo = "=""Yes"""
ThisWorkbook.Names.Add Name:=myName, RefersTo:=myRefersTo

Call ReadSubmit
'Change submit to No
myName = "Submit"
myRefersTo = "=""No"""
ThisWorkbook.Names.Add Name:="Submit", RefersTo:="=FALSE"
End Sub

--
HTH,
Barb Reinhardt



" wrote:
On Sep 4, 11:02 am, Barb Reinhardt
wrote:
I'd probably create a named range called EnableSubmit and change it when
needed. *

At the beginning of the Submit code, you could read the value for the range
and if it's TRUE, continue.
--
HTH,
Barb Reinhardt

" wrote:
I have a userform that has an Add New Record command button and a
Submit command button. *I don't want the Submit button to be available
until/unless the Add New Record has been used. *I'm not sure how to go
about writing the code for that. *Currently, the user can "browse"
thru existing records using my Previous and Next command buttons but I
don't want them to be able to edit the record they're viewing (at this
time, ultimately I do but I can't figure out the code for that
either), but in the meantime I would be content with disabling the
Submit button.

Any suggestions are greatly welcomed.- Hide quoted text -

- Show quoted text -

That sounds great but I can't get my head around it, do you have a
minute that you could explain how I would do that or point me in the
right direction?- Hide quoted text -

- Show quoted text -

That definitely gets me started. I'm a VBA newbie so I understand
what I need to do, but not how to get there. Thanks a million!