Excel to Copy and Paste to a non MS Program

Thomo4321

New Member
Joined
Apr 18, 2019
Messages
15
Morning,

I am trying to figure out how to get Excel to integrate with another program that is not a MS program.

All i am wanting to do is take a selection of data out of Excel, cell L:L and paste it to the fields in this program into the Normal Bin Location.

How would i do that with VBA?



 

Thomo4321

New Member
Joined
Apr 18, 2019
Messages
15
So i have figured out how to use sendkeys.

The below is the macro i am currently running, but i would like this macro to continue on until the end of the table (roughly 5000 Rows)

Thanks

Sub Test()
'
' Test Macro
'
'
ActiveCell.Range("L15").Select
Selection.Copy
Application.Wait (Now() + TimeValue("00:00:01"))
Application.SendKeys "%{TAB}"
Application.Wait (Now() + TimeValue("00:00:01"))
Application.SendKeys "~"
Application.Wait (Now() + TimeValue("00:00:0001"))
Application.SendKeys "^v"
Application.Wait (Now() + TimeValue("00:00:0001"))
Application.SendKeys "%{TAB}"
Application.Wait (Now() + TimeValue("00:00:0001"))
SendKeys "{Down}"
Application.Wait (Now() + TimeValue("00:00:0001"))
Selection.Copy
Application.Wait (Now() + TimeValue("00:00:0001"))
Application.SendKeys "%{TAB}"
Application.Wait (Now() + TimeValue("00:00:0001"))
Application.SendKeys "~~~~~~~~"
Application.Wait (Now() + TimeValue("00:00:0001"))
Application.SendKeys "^v"
Application.Wait (Now() + TimeValue("00:00:0001"))
Application.SendKeys "%{TAB}"
Application.Wait (Now() + TimeValue("00:00:0001"))
SendKeys "{Down}"


End Sub
 

Forum statistics

Threads
1,085,584
Messages
5,384,583
Members
401,911
Latest member
bluesquared

Some videos you may like

This Week's Hot Topics

Top