Hi !
I have now started to fin a sollution to move data from access to a non windows program and I need some help... Here is the code...
Private Sub Kommandoknapp537_Click()
Dim XKordinat, YKordinat As String
'CopyToClip (txtCoustumerNr) '1. This copy the textfield from Access to the clipboard and it works fine
XKordinat = "192" '2. This is the cordinates for the textfields in a other program
YKordinat = "199"
SetCursorPos XKordinat, YKordinat
mouse_event MusKlick_VänsterNer, 0&, 0&, 0&, 0& 'Left click down
mouse_event MusKlick_VänsterUpp, 0&, 0&, 0&, 0& 'release left click '3. This code is moving the cursor to the textfield in the other program.
SendKeys "%{TAB}", True ' 4. This comand makes the other program active, So far so god... We have the textfield in the other program highlited and
' the cursor blinking
'Now I'm stucked. I cant get the code to paste the value. If I manually press ctrl+V it paste the value as it should
DoCmd.RunCommand acCmdPaste
End Sub
Problebly very easy so I need some help
Sincerly Shas
I have now started to fin a sollution to move data from access to a non windows program and I need some help... Here is the code...
Private Sub Kommandoknapp537_Click()
Dim XKordinat, YKordinat As String
'CopyToClip (txtCoustumerNr) '1. This copy the textfield from Access to the clipboard and it works fine
XKordinat = "192" '2. This is the cordinates for the textfields in a other program
YKordinat = "199"
SetCursorPos XKordinat, YKordinat
mouse_event MusKlick_VänsterNer, 0&, 0&, 0&, 0& 'Left click down
mouse_event MusKlick_VänsterUpp, 0&, 0&, 0&, 0& 'release left click '3. This code is moving the cursor to the textfield in the other program.
SendKeys "%{TAB}", True ' 4. This comand makes the other program active, So far so god... We have the textfield in the other program highlited and
' the cursor blinking
'Now I'm stucked. I cant get the code to paste the value. If I manually press ctrl+V it paste the value as it should
DoCmd.RunCommand acCmdPaste
End Sub
Problebly very easy so I need some help
Sincerly Shas