View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Dan Tabla[_2_] Dan Tabla[_2_] is offline
external usenet poster
 
Posts: 51
Default Copy/Paste problem from another app to Excel

I have an application that supports VBA and I'm trying to copy some values
from its
screen into Excel using VBA. If I do it manualy, wont be a problem. Cliping
the text manualy from "Session"
and pasting in Excel gives me the wanted result.(text in Excel will be
pasted in different lines like
the in the original in "Session")

Session Excel

9889790 9889790
9889791 9889791
9889792 9889792

But, when I use the VBA code bellow, the text in Excel wont be in 3
different lines,cells like when I do it manually.
The whole string value will be assigned to same cell and I want to be like
the original cliptext from Session.

Session Excel

9889790 9889790 9889791 9889792
9889791
9889792



Dim Sessions As Object
Dim System As Object
Set System = CreateObject("EXTRA.System")
Set Sessions = System.Sessions
Dim Sess0 As Object
Set Sess0 = System.ActiveSession


Set MyScreen = Sess0.Screen
Set myarea = MyScreen.Area(StartRow, StartCol, EndRow, EndCol, , 3)
myarea.Select
myarea.Copy
ActiveSheet.Cells(Row, Col).Value = myarea.Value



THANKS EVERYONE FOR ANY SUGGESTION AND COMPILE SUCCESFULLY!