View Single Post
  #1   Report Post  
MrPetreli MrPetreli is offline
Junior Member
 
Posts: 7
Default Macro to copy to application

Hi

I want to create a macro which will copy data in cell from excel to another application.

I need to macro to run through column A copy the first cell (A1), and paste it an external application, The go to B2 in excel copy and paste in application and do the same until it reaches a blank cell and the macro stops.

I have the basic concept to work the sendkeys with the application, but Im stuck how to loop in excel and proceed down the columns until it reaches a blank cell.

Any Suggestions?

Code:
 Sub copy()


'
'Excel Sheet
    Selection.Copy

'Activate Application
    AppActivate "appname"
    Delay 1
    SendKeys "{HOME}{TAB 7}", True
    SendKeys "%(EP)", True
    SendKeys "{F2}", True
    
  End Sub