The situation is that.

Right now I have the VBA code as below:

Dim test
Sub macro1()
On Error Resume Next
Dim x As Variant
If test < Empty And test < Null Then
x = test.end()
Set test = Nothing
End If
On Error GoTo 0
Set test = CreateObject("Place.interface")
End Sub

And there is also a customized appllication programm is with
title"Place". And this one a user interface that you could see the
detail progress of the data processing.

But where I could find the definition of the object "Place", and also
class "interface". And also the class of "test".

I am confused.

Does your "Place" application support COM automation?
That is, does it have a scripting interface?

Tim

"Ella" wrote in message
oups.com...
The situation is that.

Right now I have the VBA code as below:

Dim test
Sub macro1()
On Error Resume Next
Dim x As Variant
If test < Empty And test < Null Then
x = test.end()
Set test = Nothing
End If
On Error GoTo 0
Set test = CreateObject("Place.interface")
End Sub

And there is also a customized appllication programm is with
title"Place". And this one a user interface that you could see the
detail progress of the data processing.

But where I could find the definition of the object "Place", and also
class "interface". And also the class of "test".

I am confused.

It doesn't.

It is just one small window with kinds of bottons there,but I have no
idea how this is created. What kind of tool is used. It is a "exe"
file. And how it is connected with the vba.

At least I could find any useful information on the website?

Do you have any idea what might it related with?

And it is an old program,written in 1997.



On Oct 18, 4:10 am, "Tim Williams" <timjwilliams at gmail dot com
wrote:
Does your "Place" application support COM automation?
That is, does it have a scripting interface?

Tim

"Ella" wrote in message

oups.com...



The situation is that.

Right now I have the VBA code as below:

Dim test
Sub macro1()
On Error Resume Next
Dim x As Variant
If test < Empty And test < Null Then
x = test.end()
Set test = Nothing
End If
On Error GoTo 0
Set test = CreateObject("Place.interface")
End Sub

And there is also a customized appllication programm is with
title"Place". And this one a user interface that you could see the
detail progress of the data processing.

But where I could find the definition of the object "Place", and also
class "interface". And also the class of "test".

I am confused.- Hide quoted text -

- Show quoted text -