Hi Rene, thanks for your answer.
This code is running code all machines but not working on a machine. I want to understand the reason. When I use OLE, working on that machine but DDE is not working.
For example, this code is working;
integer result
long ll_value
myoleobject = create OLEObject
ll_value = myoleobject.ConnectToNewObject ('excel.sheet')
IF ll_value <> 0 THEN
messagebox("Error","excel not found")
else
messagebox("Info","excel found")
END IF
myoleobject.application.visible = True
myoleobject.Application.ActiveWindow.WindowState = 2
IF result = 0 THEN
myoleobject.application.worksheets(1).cells(1,1).value = "1212"
myoleobject.application.worksheets(1).cells(1,2).value= "1212333"
END IF
myoleobject.Application.Cells.Select
myoleobject.Application.Cells.Font.Name = "Arial Tur"
myoleobject.Application.Cells.Font.Size = 8
myoleobject.Application.ActiveCell.Select