Hi Captains
Two Small problems tonite
1) On a userform if I insert a labelBox is there a setting in the Properties of that label... so that the end user can enter text into it ? say a box of tomatoes
2)I have Tried to insert the day of the week in a user form hmm I can get the Now() statement to work but not the day
my code
[VBA]Private Sub CommandButton1_Click()
Hide
OverHeads.Show
End Sub
Private Sub Label45_Click()
End Sub
Private Sub UserForm_Activate()
End Sub
Private Sub UserForm_Initialize()
TextBox1 = Now()
TextBox3 = Date
TextBox4 = MyWeekdayDay
End Sub
Private Sub TextBox3_Change()
Dim MyDate
MyDate = Date ' MyDate contains the current system date.
End Sub
Private Sub TextBox4_Change()
Dim MyDate, MyWeekDay
MyDate = #8/31/2007# ' Assign a date.
MyWeekDay = Weekday(MyDate) ' MyWeekDay contains 4 because
' MyDate represents a Wednesday.
End Sub
Private Sub TextBox17_AfterUpdate()
TextBox17 = Format(TextBox17, "#,##0.00")
If TextBox17.Text <> "" Then
End If
TextBox26.Text = Format(SumExpensesCash, "#,##0.00")
TextBox49.Text = Format(TextBox26.Text, "#,##0.00")
End Sub[/VBA]
Picture
Thanks guys and ladies
Darren
South Africa