Tab Function Question

[Huey462]

I am using VBA to insert a string of text to transfer to another program using the clipboard. The issue I'm running into is that the vbTab function doesn't translate as an actual tab key being pressed. Is there a way to do this without trying to use sendkey?

Private Sub btnTMP_Click()
‘Declares Variables
Dim obj As New DataObject
Dim txt As String
'Put some text inside a string variable
  txt = "IN" & vbTab & Me!txtMerchNo.Value
'Make object's text equal above string variable
  obj.SetText txt
'Place DataObject's text into the Clipboard
  obj.PutInClipboard
End Sub

 

[Legacy 456155]

Strange. Your code works just fine for me. I don't know if replacing vbTab with CHR(9) will help, but you could try.
Also, try string(4,chr(32)). Maybe that'll work if your destination app is looking for a count of spaces instead of an actual tab key. Don't know...

 

[Huey462]

I had tried the CHR(9) but it appears that the other application (not a microsoft product) looks at those like a set number of spaces not a tab.

 

[Legacy 456155]

Are you populating two fields in the destination application? If so, then you may be stuck doing two or more operations as you probably have no control over how the other application handles various characters such as CHR(9).

 

[JonXL]

I had tried the CHR(9) but it appears that the other application (not a microsoft product) looks at those like a set number of spaces not a tab.

Do you need the tab in order to move to another field in the other app?

 

[Huey462]

Do you need the tab in order to move to another field in the other app?

Apologies for the late response. Yes, that is exactly the situation

 

[JonXL]

Apologies for the late response. Yes, that is exactly the situation

Hmmm... I can only say that when I've been in this situation, I've had to use SendKeys - very much not ideal.