Search results

First let me say that while I’ve been writing code for 30 years, my understanding of the mechanics of computers is just what I’ve picked up, here and there. I usually leave that kind of stuff to the techies. Have a home setup with two ‘stationary’ laptops running on WIFI with a standard setup...

As said, we really need to see all of your code in the problematic event! There are a number of things in Access that will cause truncation of a field...but using Replace() isn't one of them. It's possible that something other than Replace() is actually causing the problem. Linq ;0)>

A Form that doesn't have a RecordSource cannot be Dirty...it has no Bound data...hence the error! The Microsoft wonks finally fixed an old, old bug: If one or more Controls on a Form were Required...and DoCmd.Close (used by the Command Button Wizard to Close a Form) was used...the Form would...

Would code are you using to retrieve the Record in question? Linq ;0)>

Doing a Requery of a Form doesn't Requery its Comboxes or Listboxes...they must be explicitly Requeried! Linq ;0)>

When you say a 'blank form,' do you mean a Form with no data? Or do you mean 'blank' as in you cannot even see the empty Controls? The latter occurs when two conditions are true: You have no (matching in this case) Records New Records cannot be added to the Form, for whatever reason And I...

When using a Combobox to retrieve Records...the Combobox must be Unbound! Using a Bound Combobox, as you're attempting, isn't retrieving the Record...it's editing the value of the Field that is Bound to the Combobox in the Current Record. Linq ;0)>

Where TargetField is the name of your Textbox: Private Sub MyListbox_Click() Me.TargetField = Me.MyListbox If Nz(Me.TargetField, "") <> "" Then TargetField.SetFocus TargetField.SelStart = 0 TargetField.SelLength = Len(Me.TargetField) DoCmd.RunCommand acCmdCopy End If End Sub Note that...

Only time this shouldn't work would be if you tried to do it while the date Control had the Focus. What event were you trying to do it from? Linq ;0)>

Actually...the OP said he has Office 2019...but does he have Access 2019? Unless something has changed...all versions of Office don't necessarily include Access. Perhaps there's an earlier version of Access on board? Or maybe even two versions? Linq ;0)>

The question, to me, is why would you have a Main Form and 5 Subforms based on a single Table? Linq ;0)>

Using the LostFocus event of a Control will update the Record...even if you simply move thru the Control...without making any change! As suggested...you need to use the Form's BeforeUpdate event. This will only fire if you make a change to any Control: Private Sub Form_BeforeUpdate(Cancel As...

Found this Function in my archive files, and the Comments included seems to say that the answer is 'Yes.' Public Function HexColor(strHex As String) As Long 'converts Hex string to long number, for colors 'the leading # is optional 'example usage 'Me.iSupplier.BackColor = HexColor("FCA951")...

DBguy is right, of course! PAPrice is shorthand, if you will, for PAPrice.Value and since this is being done without you actually leaving the PAPrice Control...it has no Value, as yet...so you have to use the Text Property: PAPrice.Text Anytime you refer to PAPrice. You probably also...

when you move into the Control 'down-arrow' will appear...for a selection to be made. Linq ;0)>

Is this a Single View, Continuous View or Datasheet View Form? Linq ;0)>

Not sure why Access would be popping the 'Deleted' message (not that the Access Gnomes are known for being accurate in their error messages) but prior to v2007, if you forced a Save by simply closing a Form...and one or more Required Fields were left empty, Access would Close the Form without...

And note that you need to use your code in both events to keep the formatting as you move from Record to Record! Linq ;0)>

Using transactions seems a bit of overkill. I agree with Gasman...and always use this Private Sub Form_BeforeUpdate(Cancel As Integer) If Me.NewRecord Then If MsgBox("Would You Like To Save This Record?", vbQuestion + vbYesNo + vbDefaultButton1, "Save This Record ???") = vbNo Then...

This has worked for me for a number of years: Private Sub Form_Current() Me.SubformName.SetFocus DoCmd.GoToRecord , , acNewRec Me.SubformName.Form!FirstControlName.SetFocus End SubLinq ;0)>