Devuelve una referencia a un objeto de automatización desde un archivo.

GetObject([ruta] [, clase])

Argumentos

ruta

Opcional. Cadena. Ruta de acceso y nombre completos del archivo que contiene el objeto que se va a recuperar. Si se omite la ruta, se requiere clase.

clase

Opcional. Cadena. Clase del objeto.

El argumento clase utiliza la sintaxis nombreAplicación.tipoObjeto y se compone de:

Argumentos

nombreAplicación

Requerido. Cadena. Nombre de la aplicación que proporciona el objeto.

tipoObjeto

Requerido. Cadena. Tipo o clase de objeto que se va a crear.

Observaciones

Utilice la función GetObject para tener acceso a un objeto de automatización desde un archivo y asignar el objeto a una variable de objeto. Utilice la instrucción Set para asignar el objeto devuelto por GetObject a la variable de objeto. Por ejemplo:

Dim CADObject
Set CADObject = GetObject("C:\CAD\SCHEMA.CAD")

Cuando se ejecuta este código, la aplicación asociada con la ruta especificada se inicia y se activa el objeto en el archivo especificado. Si ruta es una cadena de longitud cero (""), GetObject devuelve una instancia de objeto nuevo del tipo especificado. Si omite el argumento ruta, GetObject devuelve un objeto activo actual del tipo especificado. Si no existe ningún objeto del tipo especificado, se produce un error.

Algunas aplicaciones le permiten activar parte de un archivo. Agregue un signo de exclamación (!) al final del nombre de archivo, seguido de una cadena que identifique la parte del archivo que desea activar. Para información acerca de cómo crear esta cadena, consulte la documentación de la aplicación que ha creado el objeto.

Por ejemplo, en una aplicación de dibujo, quizá tenga muchas capas para dibujos almacenados en un archivo. Podría utilizar la siguiente porción de código para activar una capa dentro de un dibujo llamado SCHEMA.CAD:

Set LayerObject = GetObject("C:\CAD\SCHEMA.CAD!Layer3")

Si no especifica la clase del objeto, la Automatización determina que se inicie la aplicación y que se active el objeto, según el nombre de archivo que proporcione. Sin embargo, algunos archivos pueden admitir más de una clase de objeto. Por ejemplo, un dibujo podría admitir tres tipos de objeto diferentes: un objeto de aplicación, un objeto de dibujo y un objeto de barra de herramientas, todos los cuales forman parte del mismo archivo. Para especificar el objeto que desea activar en un archivo, utilice el argumento opcional clase. Por ejemplo:

Dim MiObjeto
Set MiObjeto = GetObject("C:\DRAWINGS\SAMPLE.DRW", "FIGMENT.DRAWING")

En el ejemplo anterior, FIGMENT es el nombre de una aplicación de dibujo y DRAWING es uno de los tipos de objeto que admite. Una vez que se activa el objeto, se hace referencia a él en código mediante la variable de objeto que haya definido. En el ejemplo anterior, tiene acceso a propiedades y métodos del nuevo objeto mediante la variable de objeto MiObjeto. Por ejemplo:

MiObjeto.Line 9, 90
MiObjeto.InsertText 9, 100, "Hola a todos."
MiObjeto.SaveAs "C:\DRAWINGS\SAMPLE.DRW"

Nota   Utilice la función GetObject cuando exista una instancia actual del objeto o si desea crear el objeto con un archivo ya cargado. Si no existe ninguna instancia actual y no desea que se inicie el objeto con un archivo cargado, utilice la función CreateObject.

Si se ha registrado un objeto como objeto de instancia simple, sólo se crea una instancia del objeto, sin importar cuántas veces se ejecute CreateObject. Con un objeto de instancia simple, GetObject devuelve siempre la misma instancia cuando se ha llamado con sintaxis de cadena de longitud cero ("") y causa un error si se omite el argumento ruta.

Requisitos

Versión 5

Consulte también

Función CreateObject