making cell manditory??

[kimberly13]

I am working on a biding program using valiation, dialog boxes and such. I was wondering if there was a way to make certain that they have to put a value other that zero or none in a cell before moving on to the next step??

 

[Damon Ostrander]

Yes Kimberly, you can. The following example will not allow you to select cell C6 until something has been entered in cell B4.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = "$C$6" Then
If IsEmpty([B4]) Then
Beep
MsgBox "You must enter data in B4 before selecting this cell"
[B4].Activate
End If
End If
End Sub

This code must be placed in the worksheet's event code module. To do this, right-click on the worksheet tab, select View Code, and paste this code into the Code pane.

 

[kimberly13]

Damon,

could this been done with dialog boxes??? Right now the dialog box opens with either "none" or "0" in each box. right now have drop downs to fill in the needed information.

 

[Damon Ostrander]

Hi again Kimberly,

I assume you are referring to textboxes on a custom userform? If so, here is an example that prevents the entry of date in TextBox2 until TextBox1 contains a value other than 0 or "none".

Private Sub TextBox2_Change()
If TextBox2 = 0 Or TextBox2 = "none" Then Exit Sub
If TextBox1 = 0 Or TextBox1 = "none" Then
EnableEvents = False
TextBox2 = 0
EnableEvents = True
MsgBox "can't enter date until after field 1 entry"
TextBox1.SetFocus
End If
End Sub

I hope this helps.

Damon

 

[kimberly13]

Thanks Damon!! I will work with this over the weekend and let you know!!

One day maybe I too will be really good at excel!?!?!?!? OR I will just have many notebooks full of notes!!