Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 245
Default Class module Question

Greetings,
I would like to build a class module to check that all the values in a
userform are completed. Any direction would be helpful.
  #2   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 7,247
Default Class module Question


You don't need a class module to do this. The validation code can
reside in the UserForm's code module. There is no intrinsic way to
determine whether all the controls have been filled out. You need to
test each control individually and if one is not filled out, display a
message to the user. E.g.,

Private Sub btnOK_Click()
Dim B As Boolean
B = IsFormComplete()
If B = False Then
Msgbox "Form is not complete"
Exit Sub
End If
' form is complete -- do something
End Sub

Private Function IsFormComplete() As Boolean
' Test each control
' if incomplete, then
IsFormComplete= False
Exit Function
' form is complete
IsFormComplete = True
End Function

Cordially,
Chip Pearson
Microsoft MVP
Excel Product Group
Pearson Software Consulting, LLC
www.cpearson.com
(email on web site)


On Wed, 26 Nov 2008 06:13:01 -0800, Office_Novice
wrote:

Greetings,
I would like to build a class module to check that all the values in a
userform are completed. Any direction would be helpful.

  #3   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 245
Default Class module Question

Thanks for the tip. Could you not gather the controls in a collection then
test if the form is complete?

"Chip Pearson" wrote:


You don't need a class module to do this. The validation code can
reside in the UserForm's code module. There is no intrinsic way to
determine whether all the controls have been filled out. You need to
test each control individually and if one is not filled out, display a
message to the user. E.g.,

Private Sub btnOK_Click()
Dim B As Boolean
B = IsFormComplete()
If B = False Then
Msgbox "Form is not complete"
Exit Sub
End If
' form is complete -- do something
End Sub

Private Function IsFormComplete() As Boolean
' Test each control
' if incomplete, then
IsFormComplete= False
Exit Function
' form is complete
IsFormComplete = True
End Function

Cordially,
Chip Pearson
Microsoft MVP
Excel Product Group
Pearson Software Consulting, LLC
www.cpearson.com
(email on web site)


On Wed, 26 Nov 2008 06:13:01 -0800, Office_Novice
wrote:

Greetings,
I would like to build a class module to check that all the values in a
userform are completed. Any direction would be helpful.


  #4   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 7,247
Default Class module Question



Thanks for the tip. Could you not gather the controls in a collection then
test if the form is complete?



You could, but I don't see what advantage that would bring about. In
general, the best approach would depend on the type of control (e.g.,
TextBox, ComboBox, etc) and what is meant by "complete".

Cordially,
Chip Pearson
Microsoft MVP
Excel Product Group
Pearson Software Consulting, LLC
www.cpearson.com
(email on web site)

On Wed, 26 Nov 2008 07:21:00 -0800, Office_Novice
wrote:

Thanks for the tip. Could you not gather the controls in a collection then
test if the form is complete?

"Chip Pearson" wrote:


You don't need a class module to do this. The validation code can
reside in the UserForm's code module. There is no intrinsic way to
determine whether all the controls have been filled out. You need to
test each control individually and if one is not filled out, display a
message to the user. E.g.,

Private Sub btnOK_Click()
Dim B As Boolean
B = IsFormComplete()
If B = False Then
Msgbox "Form is not complete"
Exit Sub
End If
' form is complete -- do something
End Sub

Private Function IsFormComplete() As Boolean
' Test each control
' if incomplete, then
IsFormComplete= False
Exit Function
' form is complete
IsFormComplete = True
End Function

Cordially,
Chip Pearson
Microsoft MVP
Excel Product Group
Pearson Software Consulting, LLC
www.cpearson.com
(email on web site)


On Wed, 26 Nov 2008 06:13:01 -0800, Office_Novice
wrote:

Greetings,
I would like to build a class module to check that all the values in a
userform are completed. Any direction would be helpful.


  #5   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 245
Default Class module Question

Thanks again and hoping not to take to much of your time,
using you function and testing each control with a If statement b is always
false.
where did i go wrong?

"Chip Pearson" wrote:



Thanks for the tip. Could you not gather the controls in a collection then
test if the form is complete?



You could, but I don't see what advantage that would bring about. In
general, the best approach would depend on the type of control (e.g.,
TextBox, ComboBox, etc) and what is meant by "complete".

Cordially,
Chip Pearson
Microsoft MVP
Excel Product Group
Pearson Software Consulting, LLC
www.cpearson.com
(email on web site)

On Wed, 26 Nov 2008 07:21:00 -0800, Office_Novice
wrote:

Thanks for the tip. Could you not gather the controls in a collection then
test if the form is complete?

"Chip Pearson" wrote:


You don't need a class module to do this. The validation code can
reside in the UserForm's code module. There is no intrinsic way to
determine whether all the controls have been filled out. You need to
test each control individually and if one is not filled out, display a
message to the user. E.g.,

Private Sub btnOK_Click()
Dim B As Boolean
B = IsFormComplete()
If B = False Then
Msgbox "Form is not complete"
Exit Sub
End If
' form is complete -- do something
End Sub

Private Function IsFormComplete() As Boolean
' Test each control
' if incomplete, then
IsFormComplete= False
Exit Function
' form is complete
IsFormComplete = True
End Function

Cordially,
Chip Pearson
Microsoft MVP
Excel Product Group
Pearson Software Consulting, LLC
www.cpearson.com
(email on web site)


On Wed, 26 Nov 2008 06:13:01 -0800, Office_Novice
wrote:

Greetings,
I would like to build a class module to check that all the values in a
userform are completed. Any direction would be helpful.




  #6   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 245
Default Class module Question

Nevermind. I figured out what i was doing wrong thanks a lot Chip.

"Office_Novice" wrote:

Thanks again and hoping not to take to much of your time,
using you function and testing each control with a If statement b is always
false.
where did i go wrong?

"Chip Pearson" wrote:



Thanks for the tip. Could you not gather the controls in a collection then
test if the form is complete?



You could, but I don't see what advantage that would bring about. In
general, the best approach would depend on the type of control (e.g.,
TextBox, ComboBox, etc) and what is meant by "complete".

Cordially,
Chip Pearson
Microsoft MVP
Excel Product Group
Pearson Software Consulting, LLC
www.cpearson.com
(email on web site)

On Wed, 26 Nov 2008 07:21:00 -0800, Office_Novice
wrote:

Thanks for the tip. Could you not gather the controls in a collection then
test if the form is complete?

"Chip Pearson" wrote:


You don't need a class module to do this. The validation code can
reside in the UserForm's code module. There is no intrinsic way to
determine whether all the controls have been filled out. You need to
test each control individually and if one is not filled out, display a
message to the user. E.g.,

Private Sub btnOK_Click()
Dim B As Boolean
B = IsFormComplete()
If B = False Then
Msgbox "Form is not complete"
Exit Sub
End If
' form is complete -- do something
End Sub

Private Function IsFormComplete() As Boolean
' Test each control
' if incomplete, then
IsFormComplete= False
Exit Function
' form is complete
IsFormComplete = True
End Function

Cordially,
Chip Pearson
Microsoft MVP
Excel Product Group
Pearson Software Consulting, LLC
www.cpearson.com
(email on web site)


On Wed, 26 Nov 2008 06:13:01 -0800, Office_Novice
wrote:

Greetings,
I would like to build a class module to check that all the values in a
userform are completed. Any direction would be helpful.


Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
Chart Class Module/follow on question to hyperlink post earlier. Rominall Charts and Charting in Excel 2 March 7th 07 02:43 AM
Class Module Question Andrew Yates Excel Programming 8 March 5th 06 03:50 PM
Class module question David Excel Programming 4 September 8th 05 04:51 PM
Variable from a sheet module in a class module in XL XP hglamy[_2_] Excel Programming 2 October 14th 03 05:48 PM


All times are GMT +1. The time now is 11:26 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"