Recent content by MS_Access_Amature

I have a browse button to open up files with the following function on the click event. When I click it it gives me an error message saying - Object doesn't support this property or method. I did a debug and it gives me the error after the red line. Does anybody have any idea what I'm doing...

If Me![ComboBox].Column(0) = "Employee1" Then Me![Button].Enabled = False Else Me![Button].Enabled = True End If

That hides the button when either employee is selected.

I have a ComboBox with a ValueList ("Employee1";"Employee2") and Button1 How do you disable Button1 only when Employee1 is selected from the ComboBox??

TxtRecordNumber: ControlSource = CurrentRecord TxtRecordCount: ControlSource = Count(*) Private Sub ButtonNextRecord_Click() On Error GoTo MyErrorControl If Me.CurrentRecord = Me.Count Then Me![ButtonLastRecord].Enabled = False Me![ButtonPreviousRecord].SetFocus...

I have a really quick question that has to to with the topic (form properties)... How do I call an event from another event on the same form? Private Sub UserPasswordConfirmation_KeyDown(KeyCode As Integer, Shift As Integer) On Error GoTo MyErrorControl If KeyCode = vbKeyReturn Then...

I did it on the Load Event on Form2 then when i click edit or new i disable them before i run the command. Everything works now. Thanks to all.

Thanks. It works, but does this effect other commands? On my ButtonNew (button user clicks to add new record) I have DoCmd.GoToRecord , , acNewRec But when I run it, an error message pops up telling me I can't go to that record. Other words, I can't create new record. Is it because I disabled...

I want to change FORM2 properties from when you click a button in FORM1 so you can't edit, delete, or change anything until you click the Edit button. What am I doing wrong? Private Sub ButtonCompany_Click() On Error GoTo MyErrorControl DoCmd.OpenForm "MyCompanyInfo"...

IT SURE WORKS!! THANKS BOB Private Sub CompanyName_KeyDown(KeyCode As Integer, Shift As Integer) On Error GoTo MyErrorControl If KeyCode = 9 And Len(Me![CompanyName] & vbNullString) = 0 Then KeyCode = 0 MsgBox "Please enter a company name", vbExclamation, "Required Data"...

I tired putting Len(Me!CompanyName & vbNullString) = 0 and also turned on the Key Preview property but it's still letting me press Tab without typing anything.

The user can't press tab until he types something into the textbox..how do I do this?? This is what i have.. Private Sub CompanyName_KeyPress(KeyAscii As Integer) On Error GoTo MyErrorControl If KeyCode = 9 and Me![CompanyName].Value = "" Then KeyCode = 0 msgbox "Please enter a...

wow:o..Thanks!

When my program starts it makes you create an admin account to continue on. Once created, it takes you a form to create users. In this form i have a tab control called MyTabs and it has 3 tabs (tab1, tab2, tab3). Tab 1 is to create users. I want to disable tab 2 and 3 until at least one user...

Exactly what i needed. Thanks again Bob, you're always saving me!!