Propiedad ActivePinMap

Devuelve un objeto PinMap que representa el mapa con marcadores activo (abierto). Sólo puede haber un mapa con marcadores activo, si no lo hay, esta propiedad devuelve "nothing". Es de sólo lectura.


Ejemplo de la propiedad ActivePinMap

Este ejemplo muestra el nombre del mapa con marcadores activo de la hoja uno en un cuadro de mensaje.

If Excel.Application.Sheets(1).OLEObjects(1).Object.ActivePinmap Is Nothing Then

    MsgBox "no hay un mapa con marcadores activos"

else

MsgBox Excel.Application.Sheets(1).OLEObjects(1).Object.ActivePinmap.Name

End If


Propiedad ActiveTemplate

Devuelve un objeto Template que representa la plantilla activa (la plantilla adjunta al mapa). Sólo puede haber una plantilla activa. La única vez que esta propiedad devuelve "nothing" es antes de crear el mapa. Es de sólo lectura.


Ejemplo de la propiedad ActiveTemplate

Este ejemplo muestra el mapa con marcadores activo de la hoja uno en un cuadro de mensaje.

MsgBox Excel.Application.Sheets(1).OLEObjects(1).Object. ActiveTemplate.Name


Método Add (Objeto del conjunto PinMaps)

Devuelve el nuevo mapa con marcadores como un objeto PinMap. Este método también abre el nuevo mapa con marcadores; si ya había uno activo, el método Add lo cierra antes de abrir el nuevo.

Sintaxis

expresión.Add(Name)

expresión   Requerida. Expresión que devuelve un objeto PinMap.

Name   String requerida. Nombre del mapa con marcadores. Si Name es el nombre de un mapa con marcadores existente, éste se abrirá. Si no existe un mapa con marcadores con este nombre, se crea uno nuevo y se le asigna este nombre.


Ejemplo del método Add (objeto PinMaps)

Este ejemplo crea un nuevo mapa con marcadores vacío en la hoja uno, y lo abre.

Excel.Application.Sheets(1).OLEObjects(1).Object.PinMaps.Add "NuevoNombrePinMap"


Propiedad Application

Devuelve el objeto CMSMap. Todos los objetos tienen una propiedad Application. Es de sólo lectura.


Ejemplo de la propiedad Application

Este ejemplo utiliza la propiedad Application de un objeto tema para llamar al método Refresh del objeto CMSMap, que actualiza los datos de todos los conjuntos de datos.

dim theme as object

.

.

.

theme.Application.Refresh


Propiedad AutoCorrect

Determina si Microsoft Map tratará de corregir automáticamente los errores de ortografía al asignar un conjunto de datos. Esta propiedad se aplica a todos los objetos CMSMap, no sólo al activo. Boolean de Lectura/Escritura.


Ejemplo de la propiedad AutoCorrect

Este ejemplo activa la característica Autocorrección para el objeto CMSMap de la hoja uno.

Excel.Application.Sheets(1).OLEObjects(1).Object.AutoCorrect = True


Propiedad AutoCreate

Determina si Microsoft Map creará un mapa basado en los datos seleccionados cuando el usuario inserta un objeto CMSMap en Microsoft Excel. El valor predeterminado de esta propiedad es True. Boolean de Lectura/Escritura.


Ejemplo de la propiedad AutoCreate

Este ejemplo desactiva la característica Autocrear del objeto CMSMap recién agregado a la hoja activa.

Set objetoole = ActiveSheet.OLEObjects.Add(classtype:="MSMap.8")

objetoole.Object.AutoCreate = False


Propiedad Bold

Activa o desactiva el formato de negrita del objeto LegendFont.


Ejemplo de la propiedad Bold

Este ejemplo establece en negrita el estilo de fuente de la leyenda.

Legend.Font.Bold = True


Propiedad Caption

Devuelve o establece el texto de un objeto LegendTitle. String de Lectura/Escritura.


Ejemplo de la propiedad Caption

Este ejemplo establece el título y subtítulo de la leyenda.

Legend.Title.Caption = "Ventas en la región occidental"

Legend.SubTitle.Caption = "por Estado"


Método Close

Cierra el mapa con marcadores especificado y lo quita del mapa. Si el mapa con marcadores no es el activo, este método no tiene efecto. True si el mapa con marcadores de cierra con éxito; False si no.

Sintaxis

expresión.Close

expresión   Requerida. Expresión que devuelve un objeto PinMap.


Ejemplo del método Close

Este ejemplo cierra el mapa con marcadores activo de la hoja uno.

Excel.Application.Sheets(1).OLEObjects(1).Object.ActivePinMap.Close


Propiedad Color

Devuelve o establece el color de un objeto LegendFont. El color se expresa como un entero largo, creado por la función RGB de Microsoft Excel. Int32 de Lectura/Escritura.


Ejemplo de la propiedad Color

Este ejemplo establece en verde el color de fuente de la leyenda del tema uno.

Themes(1).Legend.Font.Color = RGB(0, 255, 0)


Propiedad Compact

Activa o desactiva la opción Compact Legend de la leyenda especificada. Boolean de Lectura/Escritura.


Ejemplo de la propiedad Compact

Este ejemplo establece el título de la leyenda compacta del tema uno y muestra la leyenda de forma compacta.

Themes(1).Legend.CompactTitle = "Ventas en EE.UU."

Themes(1).Legend.Compact = True


Propiedad CompactTitle

Devuelve un objeto LegendTitle. El título compacto se dibuja cuando la propiedad Compact del objeto Legend se establece en True. Es de sólo lectura.


Ejemplo de la propiedad CompactTitle

Este ejemplo utiliza la propiedad CompactTitle para devolver un objeto LegendTitle y establece "Ventas en EE.UU." como leyenda del tema uno.

Themes(1).Legend.CompactTitle = "Ventas en EE.UU."

Themes(1).Legend.Compact = True


Propiedad Count

Devuelve el número de objetos Dataset del conjunto Datasets. Int16 de sólo lectura.


Ejemplo de la propiedad Count

Este ejemplo muestra el nombre de cada conjunto de datos en un cuadro de mensaje.

for índice = 1 to mapa.Datasets.Count

MsgBox mapa.Datasets(índice).Name

Next índice


Método Create

Crea un mapa automáticamente. True si el mapa se crea con éxito; False si no.

Sintaxis

expresión.Create(Range, KeyField, RefiningField, RefiningValue, Template, DefaultTheme)

expresión   Requerida. Expresión que devuelve un objeto CMSMap.

Range   Requerido. El usuario también puede crear mapas en Microsoft Excel mediante el comando Mapa del menú Insertar. El argumento Range debe ser un objeto Range de Microsoft Excel. Si se omite este argumento, se utiliza la selección actual para crear un rango. El conjunto de datos creado a partir del rango se convertirá en el conjunto de datos actual (vea la propiedad CurrentDataset). Los campos (columnas) del conjunto de datos se numeran a partir del 1, y el número de la primera columna de Microsoft Excel del rango es1. Por ejemplo, si el rango es C1:G25, los campos se numeran del 1 al 5.

KeyField   Requerido. Variant. El argumento KeyField puede ser un número o nombre de campo que especifica qué campo se utilizará para cotejar los datos con una plantilla de mapa. Si utiliza valores de carácter como primera fila del rango, los nombres serán los nombres de campo; en caso contrario, serán los nombres de columna de Microsoft Excel. Si este argumento es 0 (cero) o está en blanco, Microsoft Map tratará de buscar una clave utilizando el algoritmo de concordancia del argumento.

RefiningField   Requerido. Variant. El argumento RefiningField se utiliza si la columna KeyField no es única. La clave de refinamiento se utiliza para cotejar los datos con la característica (tabla) de refinamiento especificada en la definición de la plantilla Mapa. Para obtener más información, vea DataInstaller.

RefiningValue   Requerido. Variant. Puede especificar un argumento RefiningValue si sus datos no contienen las columnas KeyField y RefiningField. Por ejemplo, si los datos contienen nombres de regiones (que no son únicos) pero no nombres de provincias (que podrían ser una clave de refinamiento) podría especificar el valor de refinamiento "Sevilla" para limitar sólo a la provincia de Sevilla los datos que coincidan con las regiones.

Template   Requerido. El argumento Template es un objeto Template del conjunto Templates que puede utilizar para identificar exactamente qué plantilla de mapa desea utilizar. Si se omite este argumento, Microsoft Map tratará de cotejar la columna KeyField con las características de todas las plantillas de mapa instaladas.

DefaultTheme   Requerido. Boolean. Si usted desea crear un tema predeterminado, establezca el argumento DefaultTheme en True.

Comentarios

Si algunos de estos argumentos se omiten, puede aparecer un cuadro de diálogo solicitando al usuario que resuelva los casos en que el algoritmo de concordancia encuentre múltiples campos clave o plantillas de mapa.


Ejemplo del método Create

Este ejemplo agrega un objeto CMSMap a la hoja activa, establece el tamaño del objeto, crea un mapa de España y muestra un tema predeterminado de Ventas por Comunidad.

' create típico

Sub Crear()

Set objetoole = ActiveSheet.OLEObjects.Add(classtype:="MSMap.8")

objetoole.Width = 200

objetoole.Height = 150

Dim mapa As Object

Dim plantilla As Object

Dim rango As Object

Set rango = ActiveSheet.Range("C1:D5")

Set mapa = objetoole.Object

Set plantilla = mapa.Templates.Item("España")

mapa.Create rango, "Comunidades", 0, "", plantilla, True

End Sub

Este ejemplo agrega un objeto CMSMap a la hoja activa, establece el tamaño del objeto y crea un mapa de España. A continuación, el ejemplo traza, en el mapa de Estados Unidos, los datos de las columnas Regiones y Estados (columnas F y G). No se crea un tema predeterminado.

 ' create con un refiningKey

Sub Crear()

Set objetoole = ActiveSheet.OLEObjects.Add(classtype:="MSMap.8")

objetoole.Width = 200

objetoole.Height = 150

Dim mapa As Object

Dim plantilla As Object

Dim rango As Object

Set rango = ActiveSheet.Range("D1:G5")

Set mapa = objetoole.Object

Set plantilla = mapa.Templates.Item("España")

mapa.Create rango, 3, 4, "", plantilla, False

End Sub


Propiedad CurrentDataset

Devuelve o establece el conjunto de datos utilizado al crear nuevos temas. Es de Lectura/Escritura.


Ejemplo de la propiedad CurrentDataset

Este ejemplo muestra el conjunto de datos actual en un cuadro de mensaje.

MsgBox mapa.CurrentDataset.Name


Propiedad Dataset

Devuelve un objeto Dataset del conjunto Datasets. El índice puede ser el nombre del conjunto de datos o un índice numérico desde 1 a Datasets.Count. Esta es la propiedad predeterminada para los conjuntos de datos. Variant de sólo lectura.


Ejemplo de la propiedad Dataset

Este ejemplo muestra el nombre de cada conjunto de datos en un cuadro de mensaje.

for índice = 1 to mapa.Datasets.Count

MsgBox mapa.Datasets.Item(índice).Name

Next índice


Propiedad Datasets

Devuelve el conjunto Datasets, que contiene todos los objetos Dataset del mapa especificado. Es de sólo lectura.


Ejemplo de la propiedad Datasets

Este ejemplo muestra el nombre de cada conjunto de datos en un cuadro de mensaje, utilizando la propiedad (Item) predeterminada del conjunto Datasets.

for índice = 1 to mapa.Datasets.Count

MsgBox mapa.Datasets(índice).Name

Next índice


Método Delete

Quita el objeto PinMap del conjunto PinMaps y lo elimina del disco. Si el mapa con marcadores era el activo, también lo quita del mapa. True si el objeto PinMap se elimina con éxito; False si no.

Sintaxis

expresión.Delete

expresión   Requerida. Expresión que devuelve un objeto PinMap.


Ejemplo del método Delete

Este ejemplo quita el nombre de un mapa con marcadores innecesario de la hoja uno.

Excel.Application.Sheets(1).OLEObjects(1).Object.PinMaps("Nueva ubicación de los sitios").Delete


Propiedad DisplayUnit

Devuelve o establece la unidad de medida utilizada al mostrar leyendas para temas de gráficos de barras y circulares. Puede ser uno de los siguientes valores: 0=pulgadas, 1=centímetros o 2=milímetros. EnumDisplayUnit de Lectura/Escritura.


Ejemplo de la propiedad DisplayUnit

Este ejemplo calcula en centímetros el tamaño de los temas de la hoja uno.

Excel.Application.Sheets(1).OLEObjects(1).Object.DisplayUnit=1


Propiedad Features

Conjunto de todos los objetos Feature del mapa especificado. Es de sólo lectura.


Ejemplo de la propiedad Features

Este ejemplo hace visibles todas las características de mapa.

for índice = 1 to mapa.Features.Count

mapa.Features(índice).Visible = True

Next índice


Propiedad Font

Devuelve el objeto LegendFont, que puede utilizarse para cambiar la presentación del texto de la leyenda. Es de Lectura/Escritura.


Ejemplo de la propiedad Font

Este ejemplo establece en 14 puntos el tamaño de fuente del texto de la leyenda.

mapa.Themes(1).Legend.Font.Size = 14


Método IsOpen

True si el objeto PinMap es el mapa con marcadores abierto; False si no.

Sintaxis

expresión.IsOpen

expresión   Requerida. Expresión que devuelve un objeto PinMap.


Ejemplo del método IsOpen

Este ejemplo pone en negrita la celda activa si hay abierto un mapa con marcadores.

if mapa.PinMaps(1).IsOpen then

ActiveCell.Font.Bold = True

end if


Propiedad Italic

Activa o desactiva el formato de cursiva del objeto LegendFont. Boolean de Lectura/Escritura.


Ejemplo de la propiedad Italic

Este ejemplo aplica a las leyendas el formato de cursiva.

leyenda.Font.Italic = True


Propiedad LatitudeCenter

Devuelve o establece la latitud del centro del mapa especificado. Si se utilizan juntas, LatitudeCenter y LongitudeCenter determinan qué punto del mapa se muestra en el centro de la ventana. Double de Lectura/Escritura.


Ejemplo de la propiedad LatitudeCenter

Este ejemplo vuelve a centrar el mapa de la hoja uno en Albany, Nueva York, y amplía la vista un 700%.

Dim mapa As Object

set mapa = Excel.Application.Sheets(1).OLEObjects(1).Object

' redibuja sólo cuando el mapa está en su nueva posición (Albany, Nueva York)

mapa.ScreenUpdating = False

mapa.LatitudeCenter = -73.79

mapa.LongitudeCenter = 42.67

mapa.ZoomPct = 700

mapa.ScreenUpdating = True


Propiedad Legend

Devuelve el objeto Legend de un tema. Es de sólo lectura.


Ejemplo de la propiedad Legend

Este ejemplo establece el título y subtítulo de la leyenda del primer tema del objeto OLE de la hoja uno.

Dim leyenda As Object

set leyenda = Excel.Application.Sheets(1).OLEObjects(1).Object.Themes(1).Legend

leyenda.Title.Caption = "Ventas en la región occidental"

leyenda.SubTitle.Caption = "por Estado"


Propiedad LongitudeCenter

Devuelve o establece la longitud del centro del mapa. Si se utilizan juntas, LongitudeCenter y LatitudeCenter determinan qué punto del mapa se muestra en el centro de la ventana. Double de Lectura/Escritura.


Ejemplo de la propiedad LongitudeCenter

Este ejemplo vuelve a centrar el mapa de la hoja uno en Albany, Nueva York, y amplía la vista un 700%.

Dim mapa As Object

set mapa = Excel.Application.Sheets(1).OLEObjects(1).Object

' redibuja sólo cuando el mapa está en su nueva posición (Albany, Nueva York)

mapa.ScreenUpdating = False

mapa.LatitudeCenter = -73.79

mapa.LongitudeCenter = 42.67

mapa.ZoomPct = 700

mapa.ScreenUpdating = True


Propiedad MaxSearchTime

Devuelve o establece el tiempo (en segundos) en que Microsoft Map tratará de cotejar un conjunto de datos con la plantilla de mapa especificada. Esta propiedad se aplica a todos los objetos CMSMap. Int32 de Lectura/Escritura.


Ejemplo de la propiedad MaxSearchTime

Este ejemplo establece en 20 segundos el tiempo de búsqueda para cotejar un conjunto de datos con la plantilla de mapa.

mapa.MaxSearchTime = 20


Propiedad Name

Devuelve o establece el nombre de un conjunto de datos. El nombre predeterminado de un conjunto de datos creado a partir de un rango de Microsoft Excel es Datasetxxx, donde xxx es un número secuencial y único que identifica el conjunto de datos. String de Lectura/Escritura.


Ejemplo de la propiedad Name

Este ejemplo muestra el nombre de cada conjunto de datos en un cuadro de mensaje.

for índice = 1 to mapa.Datasets.Count

MsgBox mapa.Datasets(índice).Name

Next índice


Método Open

Abre el objeto PinMap y hace que sea el mapa con marcadores activo. Si ya hay un mapa con marcadores activo, se cierra antes de abrir el otro. True si el objeto PinMap se abre con éxito; False si no.

Sintaxis

expresión.Open

expresión   Requerida. Expresión que devuelve un objeto PinMap.


Ejemplo del método Open

Este ejemplo abre un mapa con marcadores en la hoja uno utilizando para ello su nombre.

Excel.Application.Sheets(1).OLEObjects(1).Object.PinMaps("Nuevas ubicaciones de sitios").Open


Propiedad Parent

Devuelve el objeto maestro del objeto especificado. Cuando se aplica al objeto CMSMap, la propiedad Parent devuelve el objeto CMSMap, ya que éste no tiene un maestro. Sin embargo, todos los objetos tienen una propiedad Parent. Es de sólo lectura.


Ejemplo de la propiedad Parent

Este ejemplo llama al método Refresh del objeto CMSMap que actualizará los datos de todos los conjuntos de datos.

Excel.Application.Sheets(1).OLEObjects(1).Object.Themes.Parent.Refresh


Propiedad PinMaps

Devuelve el conjunto PinMaps, que contiene todos los objetos PinMap creados por el usuario. Es de sólo lectura.


Ejemplo de la propiedad PinMaps

Este ejemplo muestra el nombre de cada mapa con marcadores en un cuadro de mensaje.

for índice = 1 to mapa.PinMaps.Count

MsgBox mapa.PinMaps(índice).Name

Next índice


Método Refresh

Actualiza los datos de todos los conjuntos de datos y vuelve a dibujar todos los temas existentes con los nuevos datos. Utilice este método si cambia cualquier dato del rango que se está asignando. No utilice este método si sólo desea volver a dibujar la pantalla; para ello, utilice la propiedad ScreenUpdating establecida en True.

Sintaxis

expresión.Refresh

expresión   Requerida. Expresión que devuelve un objeto CMSMap.


Ejemplo del método Refresh

Este ejemplo configura Microsoft Map para que refleje todos los cambios realizados a los datos de los temas mostrados en el primer conjunto de objetos OLE de la hoja uno.

Excel.Application.Sheets(1).OLEObjects(1).Object.Refresh


Método Remove

Quita un campo del tema especificado. Puede utilizar este método con el método Add para cambiar los campos (columnas) en que está basado el tema. True si el campo se quita con éxito; False si no.

Sintaxis

expresión.Remove

expresión   Requerida. Expresión que devuelve un objeto SelectedField.


Ejemplo del método Remove

Este ejemplo configura Microsoft Map para que base el tema específico en los datos del campo Oeste en lugar de los datos del campo Este. Este ejemplo también desactiva la característica redibujar de forma que la pantalla se actualiza sólo después de terminar la tarea.

Dim Tema As Object

Set Tema = Excel.Application.Sheets(1).OLEObjects(1).Object.Themes(1)

'Cambia el tema para utilizar los datos de Oeste en lugar de Este

'Desactiva la característica redibujar durante la operación

Tema.Parent.Parent.ScreenUpdating=False

Tema.SelectFields("Este").Remove

Tema.SelectFields.Add("Oeste")

Tema.Parent.Parent.ScreenUpdating=True


Propiedad ScreenUpdating

Activa o desactiva la característica redibujar en la ventana de mapa. Puede utilizar esta propiedad para evitar que la ventana parpadee y así ahorrar tiempo al realizar varios cambios que harían que se redibujara automáticamente. Además, puede establecer la propiedad ScreenUpdating en True en cualquier momento para que se redibuje el mapa entero. Boolean de Lectura/Escritura.


Ejemplo de la propiedad ScreenUpdating

Este ejemplo desactiva la característica redibujar mientras el mapa especificado se centra o se amplía.

Dim mapa As Object

set mapa = Excel.Application.Sheets(1).OLEObjects(1).Object

' redibuja sólo cuando el mapa está en su nueva posición (Albany, Nueva York)

mapa.ScreenUpdating = False

mapa.LatitudeCenter = -73.79

mapa.LongitudeCenter = 42.67

mapa.ZoomPct = 700

mapa.ScreenUpdating = True


Propiedad SelectedFields

Devuelve el conjunto SelectedFields que contiene todos los objetos SelectedField del tema especificado. El conjunto SelectedFields representa todos los campos (columnas) del conjunto de datos en que está basado el tema que está utilizando. Sólo los temas gráfico circular o gráfico de barras pueden tener más de un campo en el conjunto SelectedFields. Es de sólo lectura.


Ejemplo de la propiedad SelectedFields

Este ejemplo muestra, en un cuadro de mensaje, el nombre de cada campo del conjunto de datos asociados con el tema uno.

Dim Tema As Object

Set Tema = Excel.Application.Sheets(1).OLEObjects(1).object.Themes(1)

for índice = 1 to Tema.SelectedFields.Count

MsgBox Tema.SelectFields(índice).Name

Next índice


Propiedad Size

Devuelve o establece el tamaño de fuente, en puntos, de los elementos de la leyenda. Int16 de Lectura/Escritura.


Ejemplo de la propiedad Size

Este ejemplo establece en 12 puntos el tamaño de fuente de los elementos de la leyenda del tema.

Tema.Legend.Font.Size=12


Propiedad Strikethrough

Activa o desactiva el formato de tachado en los elementos de la leyenda. Boolean de Lectura/Escritura.


Ejemplo de la propiedad Strikethrough

Este ejemplo activa el formato de tachado en los elementos de la leyenda del tema.

Tema.Legend.Font.Strikethrough=True


Propiedad SubTitle

Devuelve un objeto SubTitle para el mapa especificado, que puede utilizarse para cambiar el subtítulo, ocultarlo o mostrarlo. Es de sólo lectura.


Ejemplo de la propiedad SubTitle

Este ejemplo oculta el subtítulo del mapa uno en la hoja uno.

Excel.Application.Sheets(1).OLEObjects(1).Object.SubTitle.Visible=False


Propiedad Templates

Devuelve el conjunto Templates que contiene todas las plantillas de mapa disponibles. Es de sólo lectura.


Ejemplo de la propiedad Templates

Este ejemplo muestra el nombre de cada plantilla en un cuadro de mensaje.

for índice = 1 to mapa.Templates.Count

MsgBox mapa.Templates(índice).Name

Next índice


Propiedad Themes

Devuelve el conjunto Themes, que contiene todos los objetos Theme creados por el usuario. Es de sólo lectura.


Ejemplo de la propiedad Themes

Este ejemplo oculta todos los temas gráficos de barras del mapa uno de la hoja uno.

Dim Temas As Object

Set Temas = Excel.Application.Sheets(1).OLEObjects(1).Object.Themes

' oculta todos los gráficos de barras

for índice = 1 to Temas.Count

If Temas(índice).Type = 1 Then

Temas(índice).Visible = False

end if

Next índice


Propiedad ThoroughMatch

Devuelve o establece el estado de la opción ThoroughMatch. True si se utilizarán todas las filas de un conjunto de datos para tratar de cotejar el conjunto de datos con una plantilla de mapa; False si sólo se utilizará una muestra de las filas. Esta propiedad se aplica a todos los objetos CMSMap. Boolean de Lectura/Escritura.


Ejemplo de la propiedad ThoroughMatch

Este ejemplo activa una concordancia exhaustiva para el mapa uno de la hoja uno.

Excel.Application.Sheets(1).OLEObjects(1).Object.ThoroughMatch = True


Propiedad Title

Devuelve el objeto Title del mapa especificado, que puede utilizarse para cambiar el título, ocultarlo o mostrarlo. Es de Lectura/Escritura.


Ejemplo de la propiedad Title

Este ejemplo pone en negrita el título del mapa uno de la hoja uno.

Excel.Application.Sheets(1).OLEObjects(1).Object.Title.Font.Bold = True


Propiedad Type

Devuelve el tipo del tema especificado. Esta propiedad se establece automáticamente al crear un tema. En la siguiente lista se muestran los valores posibles. EnumThemeType de sólo lectura.

Tipo	Valor
Por intervalos	0
Barra	1
Circular	2
Graduado	3
Densidad de puntos	4
Individual	5
Predeterminado	6 (sólo se usa al agregar un tema mediante Themes.Add)


Ejemplo de la propiedad Type

Este ejemplo oculta todos los temas gráficos de barras del mapa uno de la hoja uno.

Dim Temas As Object

Set Temas = Excel.Application.Sheets(1).OLEObjects(1).Object.Themes

'oculta todos los gráficos de barras

for índice = 1 to Themes.Count

If Temas(índice).Type = 1 Then

Temas(índice).Visible = False

end if

end for


Propiedad Underline

Activa o desactiva el subrayado en los elementos de la leyenda. Boolean de Lectura/Escritura.


Ejemplo de la propiedad Underline

Este ejemplo subraya todos los elementos de la leyenda.

legend.Font.Underline = True


Propiedad UseCurrencyFormat

Devuelve o establece la propiedad UseCurrentyFormat de un objeto Legend, que determina si los elementos de la leyenda se muestran con el formato actual de moneda. Boolean de Lectura/Escritura.


Ejemplo de la propiedad UseCurrencyFormat

Este formato muestra el formato de moneda junto a los elementos de la leyenda.

legend.UseCurrencyFormat = True


Propiedad Version

Devuelve el número de versión del software. String de sólo lectura.


Ejemplo de la propiedad Version

Este ejemplo imprime el número de versión del software en un cuadro de mensaje.

MsgBox Excel.Application.Sheets(1).OLEObjects(1).Object.Version


Propiedad Visible

Devuelve o establece la visibilidad de la característica de mapa especificada. Boolean de Lectura/Escritura.


Ejemplo de la propiedad Visible

Este ejemplo hace que la característica "Ciudades de EE.UU." del mapa uno de la hoja uno sea visible.

Excel.Application.Sheets(1).OLEObjects(1).Object.Features("Principales ciudades de México").Visible = True


Propiedad XPos

Devuelve o establece la posición horizontal de la leyenda especificada, en coordenadas de pantalla. Int16 de Lectura/Escritura.


Ejemplo de la propiedad XPos

Este ejemplo mueve la leyenda hacia arriba y hacia la izquierda.

Theme.Legend.Xpos = Theme.Legend.Xpos - 10

Theme.Legend.Ypos = Theme.Legend.Ypos - 10


Propiedad YPos

Devuelve o establece la posición vertical de la leyenda especificada, en coordenadas de pantalla. Int16 de Lectura/Escritura.


Ejemplo de la propiedad YPos

Este ejemplo mueve la leyenda hacia arriba y hacia la izquierda.

Theme.Legend.Xpos = Theme.Legend.Xpos - 10

Theme.Legend.Ypos = Theme.Legend.Ypos - 10


Propiedad ZoomPct

Devuelve o establece, como un porcentaje, el nivel de ampliación actual del mapa especificado (100% es el nivel para ver el mapa entero; esto equivale a elegir Mapa completo en el menú Ver). Int32 de Lectura/Escritura.


Ejemplo de la propiedad ZoomPct

Este ejemplo amplía el mapa especificado de la hoja activa en un 250%.

ActiveSheet.OLEObjects(1).Object.ZoomPct = 250


Método ZoomTo

Este método permite cambiar, en una llamada, el porcentaje de ampliación y el centrado del mapa especificado sin necesidad de utilizar las propiedades ZoomPct, LatitudeCenter o LongitudeCenter. La pantalla sólo se redibujará una vez.

Sintaxis

expresión.ZoomTo( ZoomPct, Latitude, Longitude)

expresión   Requerida. Expresión que devuelve un objeto CMSMap.

ZoomPct  Requerido. Int32. Devuelve o establece, como un porcentaje, el nivel de ampliación actual del mapa especificado (100% es el nivel para ver el mapa entero; esto equivale a elegir Mapa completo en el menú Ver).

Latitude  Requerido. Double. Devuelve o establece la latitud del centro del mapa especificado.

Longitude  Requerido. Double. Devuelve o establece la longitud del centro del mapa especificado.


Ejemplo del método ZoomTo

Este ejemplo vuelve a centrar el mapa especificado de la hoja uno en Albany, Nueva York, y amplía la vista un 700%.

Dim map As Object

set map = Excel.Application.Sheets(1).OLEObjects(1).Object

' Dos maneras de hacer lo mismo

'primera manera

map.ZoomTo(700,-73.70, 42.67)

Este ejemplo sólo redibuja el mapa una vez que se mueve a una nueva posición (Albany, Nueva York).

map.ScreenUpdating = False

map.LatitudeCenter = -73.79

map.LongitudeCenter = 42.67

map.ZoomPct = 700

map.ScreenUpdating = True


Objeto CMSMap

Representa un objeto aplicación de asignación de datos. Se obtiene un objeto CMSMap mediante la propiedad Object de un objeto OleObject. Todos los demás objetos de asignación de datos tienen una propiedad Application que devuelve este objeto.

El siguiente ejemplo define el mapa de variables como un objeto, asigna el objeto de asignación de datos de la hoja activa al mapa de variables y, a continuación, establece el título del mapa como "Estados Unidos".

Dim mapa As Object

Set mapa = ActiveSheet.OLEObjects(1).Object

mapa.Title.Caption = "Estados Unidos"


Objeto Dataset

Representa un conjunto de datos, rango de celdas, utilizado para crear un mapa. Puede crear un objeto Dataset y agregarlo al conjunto Datasets de tres maneras diferentes:

•	Después de utilizar el método Create en el objeto CMSMap, utilice un objeto Range de Microsoft Excel para crear y asignar un conjunto de datos.

•	En Microsoft Excel, seleccione un rango de celdas y, a continuación, haga clic en Mapa en el menú Insertar. Esto crea el mapa, el conjunto de datos y, a continuación, asigna el conjunto de datos.

•	En Microsoft Map, haga clic en Insertar y haga clic en Datos externos. Esto crea un conjunto de datos y lo agrega al mapa.

Microsoft Mapa utiliza el conjunto de datos actual siempre que agregue o modifique temas. Para obtener más información, vea la propiedad CurrentDataset.


Objeto de conjunto Datasets

Conjunto de objetos Dataset que representa todos los conjuntos de datos del mapa especificado.


Objeto Feature

Representa una de las funciones del mapa especificado. Puede utilizar el objeto Feature para activar o desactivar una función determinada.


Objeto de conjunto Features

Conjunto de objetos Feature que representa todas las funciones del mapa especificado.


Objeto Legend

Representa la leyenda del tema especificado.


Objeto LegendFont

Representa el título, subtítulo o texto de la leyenda especificada.


Objeto LegendTitle

Representa el título de la leyenda especificada. El objeto LegendTitle es similar al objeto Title, excepto en que las propiedades xPos, yPos y Visible no están disponibles para el objeto LegendTitle.


Objeto de conjunto PinMaps

Un conjunto de objetos PinMap que representa todos los mapas con marcadores creados por el usuario.


Objeto de conjunto SelectedFields

Devuelve un conjunto de objetos SelectedField que representa todos los campos seleccionados en el mapa especificado. Estos objetos representan los campos de un conjunto de datos que se está mostrando en un tema.


Objeto de conjunto Templates

Un conjunto de objetos Template que representa todas las plantillas de mapas instaladas. Utilice Data Installer para agregar, quitar o cambiar plantillas de mapas.


Objeto Theme

Representa un tema que se muestra en el mapa especificado. Puede utilizar el objeto Theme para activar o desactivar un tema, cambiar los campos de datos que se están asignando o manipular la leyenda de un tema.


Objeto de conjunto Themes

Conjunto de objetos Theme que representa todos los temas del mapa especificado.


Objeto PinMap

Representa un mapa con marcadores que se puede trazar en el mapa especificado. Los objetos PinMap están en el conjunto PinMaps.


Objeto Title

Representa el título del mapa especificado. Puede utilizar el objeto Title para cambiar el texto del título, ocultarlo o mostrarlo.


Objeto Template

Representa una plantilla de mapas. Puede utilizar el objeto Template para devolver el nombre de la plantilla especificada. Los objetos Template están en el conjunto Templates.


Objeto TitleFont

Representa la fuente del título del mapa especificado.


Objeto SelectedField

Representa un campo de una hoja de datos que se está mostrando en un tema.


Propiedad Item

Devuelve un objeto determinado del conjunto especificado. Para la mayoría de los objetos de los conjuntos, la propiedad predeterminada es Item. El parámetro de índice de la propiedad Item es un argumento Variant que puede ser un número que representa la posición del objeto especificado dentro del conjunto, o una cadena que representa el nombre del objeto.

Este ejemplo muestra tres maneras en que puede devolverse un objeto Template determinado de un conjunto Templates.

Dim mapa As Object

dim MiPlantilla as object

set mapa = Excel.Application.Sheets(1).OLEObjects(1).Object

set MiPlantilla  = mapa.Templates.Item(1)	' obtiene la primera plantilla

set MiPlantilla  = mapa.Templates(1)	' muestra la utilización de la propiedad determinada

set MiPlantilla  = mapa.Templates.Item("Canadá") 'obtiene la plantilla de nombre Canadá


Propiedad PreferCompactLegends

Devuelve o establece un valor que indica si Microsoft Map mostrará las leyendas de los temas recién creados en formato compacto. Boolean de Lectura/Escritura.

Este ejemplo establece que Microsoft Map cree todos los nuevos temas con leyendas completas para el objeto uno de la hoja uno.

Excel.Application.Sheets(1).OLEObjects(1).Object.PreferCompactLegends = False