Copy Field to Clipboard Problem

[vito1010]

Hi,

Currently have this executing at a button press:

Private Sub GoIRS_Click()
   Me!Social.SetFocus
   DoCmd.RunCommand acCmdCopy
   FollowHyperlink "https://sa.www4.irs.gov/irfof/lang/en/irfofgetstatus.jsp"
End Sub

It's supposed to copy the field "Social" into the clipboard.
Unfortunatley, it only copies the 1st character (Social is Text).

Any assistance would be appreciated.

(FYI: The hyperlink goes to the IRS page "Where's My Refund?")

 

[arnelgp]

With DoCmd
.GoToControl "Social"
.RunCommand acCmdCopy
End With

 

[vito1010]

That didn't work.....BUT, I copied the DB to my VM (Windows 11/Still Office 2013) and it DID work. I saw when I clicked the button, it highlighted the whole field, not just the first character/number. Any ideas why?

 

[arnelgp]

it will highlight the Whole field.
if you need only certain number of characters, at certain
starting point, you go and google the Textbox properties:

SelStart and SelLength.

 

[vito1010]

No. On my Win10 system, it only copies the first character of the field. When I copied and pasted the exact same db file to the Win11 VM, it copies the whole field.

 

[arnelgp]

maybe it has to do with your MS Access Options.
open ms access.
on ribbon->file->options
select, Client Setting->Behaviour Entering Field->Select Entire Field.

 

[GPGeorge]

maybe it has to do with your MS Access Options.
open ms access.
on ribbon->file->options
select, Client Setting->Behaviour Entering Field->Select Entire Field.

In other words, that option, which applies to the Client, not the specific accdb, could be different on two different installations of Access. It may not be related to the Windows version at all, which I think is a red herring.

 

[vito1010]

maybe it has to do with your MS Access Options.
open ms access.
on ribbon->file->options
select, Client Setting->Behaviour Entering Field->Select Entire Field.

Thank you. This fixed it. I don't know why it's different on the two systems? I installed them from the same files and never changed anything. Oh well, at least the problem was solved. Again, thank you.

 

[cheekybuddha]

You should be able to code this so that it doesn't matter what settings the user has set in their version of Access:

Private Sub GoIRS_Click()
  With Me.Social
    .SetFocus
    .SelStart = 0
    .SelLength = Len(.Text)
  End With
  DoCmd.RunCommand acCmdCopy
  Application.FollowHyperlink "https://sa.www4.irs.gov/irfof/lang/en/irfofgetstatus.jsp"
End Sub

(nb untested)