Copyright: XLMAIN8.HLP release 3122


ActivePinMap-Eigenschaft

Gibt ein PinMap-Objekt zurück, das die aktive (geöffnete) Pinnfolie darstellt. (Es kann nur eine aktive Pinnfolie geben.) Ist keine Pinnfolie aktiv, gibt diese Eigenschaft "nichts" zurück. Nur-Lese-Zugriff.


Beispiel zur ActivePinMap-Eigenschaft

In diesem Beispiel wird der Name der aktiven Pinnfolie des ersten Tabellenblatts in einem Meldungsfeld angezeigt.

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

    MsgBox "Keine aktive Pinnfolie"

else

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

End If


ActiveTemplate-Eigenschaft

Gibt ein Template-Objekt zurück, das die aktive Vorlage darstellt (die Vorlage, die zur Zeit mit der Karte verknüpft ist). Es kann nur eine Vorlage aktiv sein. Diese Eigenschaft kann nur vor dem Erstellen der Karte "nichts" zurückgeben. Nur-Lese-Zugriff.


Beispiel zur ActiveTemplate-Eigenschaft

In diesem Beispiel wird der Name der aktiven Vorlage für das erste Tabellenblatt in einem Meldungsfeld angezeigt.

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


Add-Methode (PinMaps-Objekt (Auflistung))

Gibt die neue Pinnfolie als PinMap-Objekt zurück. Mit dieser Methode wird außerdem die neue Pinnfolie geöffnet. Wenn eine Pinnfolie bereits aktiv war, wird sie mit der Add-Methode vor dem Öffnen der neuen Karte geschlossen.

Syntax

Ausdruck.Add(Name)

Ausdruck   Erforderlich. Ein Ausdruck, der ein PinMap-Objekt zurückgibt.

Name   String erforderlich. Der Name der Pinnfolie. Ist Name der Name einer vorhandenen Pinnfolie, wird diese Pinnfolie geöffnet. Gibt es noch keine Pinnfolie mit diesem Namen, wird eine neue Pinnfolie mit diesem Namen erstellt.


Beispiel zur Add-Methode (PinMaps-Objekt)

In diesem Beispiel wird eine neue, leere Pinnfolie auf dem ersten Tabellenblatt erstellt und für Eingaben geöffnet.

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


Application-Eigenschaft

Gibt das CMSMap-Objekt zurück. Alle Objekte haben eine Application-Eigenschaft. Nur-Lese-Zugriff.


Beispiel zur Application-Eigenschaft

In diesem Beispiel wird die Application-Eigenschaft eines Themenobjekts für den Aufruf der Refresh-Methode des CMSMap-Objekts verwendet. Dabei werden die Daten in allen Datensätzen aktualisiert.

dim theme as object

.

.

.

theme.Application.Refresh


AutoCorrect-Eigenschaft

Bestimmt, ob Microsoft Map versucht, beim Abbilden eines Datensatzes abweichende Schreibweisen automatisch zu korrigieren. Diese Eigenschaft gilt für alle CMSMap-Objekte, nicht nur für das aktive Objekt. Boolean Schreib-Lese-Zugriff.


Beispiel zur AutoCorrect-Eigenschaft

In diesem Beispiel wird die AutoCorrect-Eigenschaft für das CMSMap-Objekt im ersten Tabellenblatt aktiviert.

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


AutoCreate-Eigenschaft

Bestimmt, ob Microsoft Map eine Karte auf der Basis der markierten Daten erstellt, wenn der Benutzer ein CMSMap-Objekt in Microsoft Excel einfügt. Diese Eigenschaft ist standardmäßig auf True eingestellt. Boolean Schreib-Lese-Zugriff.


Beispiel zur AutoCreate-Eigenschaft

In diesem Beispiel wird die AutoCreate-Eigenschaft für das CMSMap-Objekt deaktiviert, das soeben in das aktive Tabellenblatt eingefügt wurde.

Set oleobj = ActiveSheet.OLEObjects.Add(Classtype:="MSMap.8")

oleobj.Object.AutoCreate = False


Bold-Eigenschaft

Aktiviert bzw. deaktiviert die Fettformatierung für ein LegendFont-Objekt.


Beispiel zur Bold-Eigenschaft

In diesem Beispiel wird die Schrift der Legende fett formatiert.

legend.Font.Bold = True


Caption-Eigenschaft

Gibt den Text eines LegendTitle-Objekts zurück oder legt ihn fest. String Schreib-Lese-Zugriff.


Beispiel zur Caption-Eigenschaft

In diesem Beispiel werden der Titel und der Untertitel der Legende festgelegt.

Legend.Title.Caption = "Umsatz Bereich West"

Legend.SubTitle.Caption = "nach Ländern"


Close-Methode

Schließt die angegebene Pinnfolie und entfernt sie aus der Karte. Wenn es sich dabei nicht um die aktive Pinnfolie handelt, hat diese Methode keine Auswirkung. True, wenn das Schließen der Pinnfolie erfolgreich war, False, wenn sie nicht geschlossen wurde.

Syntax

Ausdruck.Close

Ausdruck   Erforderlich. Ein Ausdruck, der ein PinMap-Objekt zurückgibt.


Beispiel zur Close-Methode

In diesem Beispiel wird die aktive Pinnfolie im ersten Tabellenblatt geschlossen.

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


Color-Eigenschaft

Gibt die Farbe eines LegendFont-Objekts zurück oder legt sie fest. Die Farbe wird als lange Ganzzahl ausgedrückt, die von der Microsoft Excel-RGB-Funktion erstellt wird. Int32 Schreib-Lese-Zugriff.


Beispiel zur Color-Eigenschaft

In diesem Beispiel wird für die Legende des ersten Themas eine grüne Schriftart festgelegt.

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


Compact-Eigenschaft

Aktiviert bzw. deaktiviert die Compact Legend-Option für das angegebene Legendenobjekt. Boolean Schreib-Lese-Zugriff.


Beispiel zur Compact-Eigenschaft

In diesem Beispiel wird für das erste Thema ein kurzer Legendentitel festgelegt und die Legende im Kurzformat angezeigt.

Themes(1).Legend.CompactTitle = "US-Umsatz"

Themes(1).Legend.Compact = True


CompactTitle-Eigenschaft

Gibt ein LegendTitle-Objekt zurück. Der kurze Titel wird gezeichnet, wenn die Compact-Eigenschaft des Legend-Objekts auf True eingestellt ist. Nur-Lese-Zugriff.


Beispiel zur CompactTitle-Eigenschaft

In diesem Beispiel wird mit der CompactTitle-Eigenschaft ein LegendTitle-Objekt zurückgegeben. Dabei wird für das erste Thema der Legendentext "US-Umsatz" festgelegt.

Themes(1).Legend.CompactTitle = "US-Umsatz"

Themes(1).Legend.Compact = True


Count-Eigenschaft

Gibt die Anzahl von Dataset-Objekten in der Datasets-Auflistung zurück. Int16 Nur-Lese-Zugriff.


Beispiel zur Count-Eigenschaft

In diesem Beispiel wird der Name aller Datensätze in einem Meldungsfeld angezeigt.

for index = 1 to map.Datasets.Count

MsgBox map.Datasets(index).Name

next


Create-Methode

Erstellt automatisch eine Karte. True, wenn das Erstellen der Karte erfolgreich war, False, wenn die Karte nicht erstellt wurde.

Syntax

Ausdruck.Create(Range, KeyField, RefiningField, RefiningValue, Template, DefaultTheme)

Ausdruck   Erforderlich. Ein Ausdruck, der ein CMSMap-Objekt zurückgibt.

Range   Erforderlich. Benutzer können Karten auch mit dem Befehl Landkarte aus dem Menü Einfügen von Microsoft Excel erstellen. Das Range-Argument muß ein Range-Objekt von Microsoft Excel sein. Wird dieses Argument nicht angegeben, wird der Bereich anhand der aktuellen Markierung erstellt. Der auf der Grundlage des Bereichs erstellte Datensatz wird zum aktuellen Datensatz (siehe die CurrentDataset-Eigenschaft). Die Felder (Spalten) des Datensatzes werden beginnend bei 1 numeriert, und die erste Microsoft Excel-Spalte des Bereichs hat die Nummer 1. Wenn beispielsweise C1:G25 als Bereich markiert ist, werden die Felder von 1 bis 5 numeriert.

KeyField   Variant erforderlich. Das KeyField-Argument ist entweder eine Feldnummer oder ein Feldname, der angibt, auf der Grundlage welchen Feldes die Daten mit einer Landkartenvorlage verglichen werden sollen. (Wenn Sie in der ersten Zeile des Bereichs Zeichenwerte verwenden, gelten diese Namen als Feldnamen; andernfalls sind die Namen die Spaltennamen von Microsoft Excel). Wenn dieses Argument den Wert 0 (Null) hat oder nicht angegeben wird, versucht Microsoft Map, mit Hilfe des Vergleichsalgorithmus des Arguments einen Schlüssel zu finden.

RefiningField   Variant erforderlich. Das RefiningField-Argument wird verwendet, wenn die "KeyField"-Spalte nicht eindeutig ist. Mit dem zum Klären verwendeten Schlüssel werden die Daten mit dem Klärungsmerkmal (Tabelle) verglichen, das in der Landkartenvorlage definiert ist. (Weitere Informationen finden Sie unter DataInstaller.)

RefiningValue   Variant erforderlich. Sie können ein RefiningValue-Argument angeben, wenn die Daten nicht sowohl die Spalte KeyField als auch die Spalte RefiningField enthalten. Wenn die Daten zum Beispiel Landkreisnamen (die nicht eindeutig sind), nicht aber Namen von Bundesstaaten (die als Klärungsschlüssel dienen) enthalten, können Sie "New York" als Klärungswert angeben, um diesen Datensatz auf die entsprechenden Landkreise des Bundesstaates New York zu beschränken.

Template   Erforderlich. Das Template-Argument ist ein Template-Objekt der Templates-Auflistung; mit diesem Argument können Sie genau festlegen, welche Vorlage Sie verwenden möchten. Wird das Argument nicht angegeben, versucht Microsoft Map, die Spalte KeyField mit den Merkmalen aller installierten Landkartenvorlagen zu vergleichen.

DefaultTheme   Boolean erforderlich. Wenn Sie ein Standardthema selbst erstellen möchten, setzen Sie das DefaultTheme-Argument auf True.

Anmerkungen

Wird eines dieser Argumente nicht angegeben, wird eventuell ein Dialogfeld angezeigt. Darin werden Sie aufgefordert, den Fall zu lösen, bei dem der Vergleichsalgorithmus mehrere Schlüsselfelder oder Landkartenvorlagen findet.


Beispiel zur Create-Methode

In diesem Beispiel wird ein CMSMap-Objekt zum aktiven Tabellenblatt hinzugefügt, die Größe des Objekts wird festgelegt, eine Landkarte von Europa wird erstellt, und das Standardthema "Umsatz nach Länder" wird angezeigt.

' typisches Beispiel für Create

Sub Create()

Set oleobj = ActiveSheet.OLEObjects.Add(Classtype:="MSMap.8")

oleobj.Width = 200

oleobj.Height = 150

Dim map As Object

Dim template As Object

Dim rng As Object

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

Set map = oleobj.Object

Set template = map.Templates.Item("Europa")

map.Create rng, "Länder", 0, "", template, True

End Sub

In diesem Beispiel wird ein CMSMap-Objekt zum aktiven Tabellenblatt hinzugefügt, die Objektgröße wird festgelegt, und es wird eine Landkarte von Europa erstellt. Anschließend werden die Daten der Spalten "Städte" und "Länder" (Spalten F und G) auf der Karte von Europa geplottet. Es wird kein Standardthema erstellt.

' Create mit einem refiningKey

Sub Create()

Set oleobj = ActiveSheet.OLEObjects.Add(Classtype:="MSMap.8")

oleobj.Width = 200

oleobj.Height = 150

Dim map As Object

Dim template As Object

Dim rng As Object

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

Set map = oleobj.Object

Set template = map.Templates.Item("Europa")

map.Create rng, 3, 4, "", template, False

End Sub


CurrentDataset-Eigenschaft

Gibt den Datensatz zurück oder legt den Datensatz fest, der beim Erstellen neuer Themen verwendet wird. Schreib-Lese-Zugriff.


Beispiel zur CurrentDataset-Eigenschaft

In diesem Beispiel wird der Name des aktuellen Datensatzes in einem Meldungsfeld angezeigt.

MsgBox map.CurrentDataset.Name


Dataset-Eigenschaft

Gibt ein Dataset-Objekt der Datasets-Auflistung zurück. Der Index ist entweder der Datensatzname oder ein Zahlenindex von 1 bis Datasets.Count. Dies ist die Standardeigenschaft für Datensätze. Variant Nur-Lese-Zugriff.


Beispiel zur Dataset-Eigenschaft

In diesem Beispiel werden die Namen aller Datensätze in einem Meldungsfeld angezeigt.

for index = 1 to map.Datasets.Count

MsgBox map.Datasets(index).Name

next


Datasets-Eigenschaft

Gibt die Datasets-Auflistung zurück, die alle Dataset-Objekte der angegebenen Landkarte enthält. Nur-Lese-Zugriff.


Beispiel zur Datasets-Eigenschaft

In diesem Beispiel werden die Namen aller Datensätze in einem Meldungsfeld angezeigt; dabei wird die Standardeigenschaft (Item) der Datasets-Auflistung verwendet.

for index = 1 to map.Datasets.Count

MsgBox map.Datasets.Item(index).Name

next


Delete-Methode

Entfernt das PinMap-Objekt aus der PinMaps-Auflistung und löscht es vom Datenträger. Wenn es sich dabei um die aktive Pinnfolie handelt, wird diese auch aus der Landkarte entfernt. True, wenn das Löschen des PinMap-Objekts erfolgreich war, False, wenn es nicht gelöscht wurde.

Syntax

Ausdruck.Delete

Ausdruck   Erforderlich. Ein Ausdruck, der ein PinMap-Objekt zurückgibt.


Beispiel zur Delete-Methode

In diesem Beispiel wird eine nicht benötigte Pinnfolie unter Angabe ihres Namens vom ersten Tabellenblatt gelöscht.

Excel.Application.Sheets(1).OLEObjects(1).Object.PinMaps("Neue Standorte").Delete


DisplayUnit-Eigenschaft

Gibt die Maßeinheit zurück, die für die Anzeige von Legenden von Balken- und Kreisdiagramm-Themen verwendet wird, oder legt sie fest. Dies kann einer der folgenden Werte sein: 0=Zoll, 1=Zentimeter oder 2=Millimeter. EnumDisplayUnit Schreib-Lese-Zugriff.


Beispiel zur DisplayUnit-Eigenschaft

In diesem Beispiel werden die Themengrößen für das erste Tabellenblatt in Zentimetern berechnet.

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


Features-Eigenschaft

Eine Auflistung aller Feature-Objekte der angegebenen Landkarte. Nur-Lese-Zugriff.


Beispiel zur Features-Eigenschaft

In diesem Beispiel werden alle Landkartenmerkmale eingeblendet.

for index = 1 to map.Features.Count

map.Features(index).Visible = True

next


Font-Eigenschaft

Gibt das LegendFont-Objekt zurück, mit dem das Erscheinungsbild des Legendentexts geändert werden kann. Schreib-Lese-Zugriff.


Beispiel zur Font-Eigenschaft

In diesem Beispiel wird für den Legendentext einen Schriftgrad von 14 Punkt festgelegt.

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


IsOpen-Methode

True, wenn das PinMap-Objekt die geöffnete Pinnfolie ist, False, wenn dies nicht der Fall ist.

Syntax

Ausdruck.IsOpen

Ausdruck   Erforderlich. Ein Ausdruck, der ein PinMap-Objekt zurückgibt.


Beispiel zur IsOpen-Methode

In diesem Beispiel wird die aktive Zelle fett dargestellt, wenn die erste Pinnfolie geöffnet ist.

if map.PinMaps(1).IsOpen then

ActiveCell.Font.Bold = True

end if


Italic-Eigenschaft

Aktiviert bzw. deaktiviert die Kursivformatierung für ein LegendFont-Objekt. Boolean Schreib-Lese-Zugriff.


Beispiel zur Italic-Eigenschaft

In diesem Beispiel wird der Legendentext kursiv formatiert.

legend.Font.Italic = True


LatitudeCenter-Eigenschaft

Gibt den Breitengrad des Mittelpunkts der angegebenen Karte zurück oder legt ihn fest. Mit den Eigenschaften LatitudeCenter und LongitudeCenter wird festgelegt, welcher Punkt auf der Karte im Mittelpunkt des Kartenfensters angezeigt wird. Double Schreib-Lese-Zugriff.


Beispiel zur LatitudeCenter-Eigenschaft

In diesem Beispiel wird der Mittelpunkt der angegebenen Karte im ersten Tabellenblatt auf Albany, New York, eingestellt und die Ansicht auf 700 Prozent vergrößert.

Dim map As Object

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

' nur neu zeichnen, wenn Karte in neuer Position

' (Albany, New York)

map.ScreenUpdating = False

map.LatitudeCenter = -73.79

map.LongitudeCenter = 42.67

map.ZoomPct = 700

map.ScreenUpdating = True


Legend-Eigenschaft

Gibt das Legend-Objekt eines Themas zurück. Nur-Lese-Zugriff.


Beispiel zur Legend-Eigenschaft

In diesem Beispiel werden der Legendentitel und der Untertitel der Legende des ersten Themas im ersten OLE-Objekt des ersten Tabellenblatts festgelegt.

Dim legend As Object

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

legend.Title.Caption = "Umsatz Bereich West"

legend.SubTitle.Caption = "nach Ländern"


LongitudeCenter-Eigenschaft

Gibt den Längengrad des Mittelpunkts der Karte zurück oder legt ihn fest. Mit den Eigenschaften LongitudeCenter und LatitudeCenter wird festgelegt, welcher Punkt auf der Karte im Mittelpunkt des Kartenfensters angezeigt wird. Double Schreib-Lese-Zugriff.


Beispiel zur LongitudeCenter-Eigenschaft

In diesem Beispiel wird der Mittelpunkt der Karte im ersten Tabellenblatt auf Albany, New York, eingestellt und die Ansicht auf 700 Prozent vergrößert.

Dim map As Object

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

' nur neu zeichnen, wenn Karte in neuer Position

' (Albany, New York)

map.ScreenUpdating = False

map.LatitudeCenter = -73.79

map.LongitudeCenter = 42.67

map.ZoomPct = 700

map.ScreenUpdating = True


MaxSearchTime-Eigenschaft

Gibt die Zeit (in Sekunden) zurück oder legt die Zeit fest, für die Microsoft Map versucht, einen Datensatz mit der angegebenen Kartenvorlage zu vergleichen. Diese Eigenschaft betrifft alle CMSMap-Objekte. Int32 Schreib-Lese-Zugriff.


Beispiel zur MaxSearchTime-Eigenschaft

In diesem Beispiel wird die Suchzeit für den Vergleich eines Datensatzes mit der angegebenen Kartenvorlage auf 20 Sekunden gesetzt.

map.MaxSearchTime = 20


Name-Eigenschaft

Gibt den Namen eines Datensatzes zurück oder legt ihn fest. Der vorgegebene Name für einen Datensatz, der aus einem Microsoft Excel-Bereich erstellt wurde, lautet Datasetxxx. Dabei ist xxx eine fortlaufende Nummer, die den Datensatz eindeutig kennzeichnet. String Schreib-Lese-Zugriff.


Beispiel zur Name-Eigenschaft

In diesem Beispiel werden die Namen aller Datensätze in einem Meldungsfeld angezeigt.

for index = 1 to map.Datasets.Count

MsgBox map.Datasets(index).Name

next


Open-Methode

Öffnet das PinMap-Objekt und macht es zur aktiven Pinnfolie. Wenn bereits eine Pinnfolie aktiv war, wird diese vor dem Öffnen der neuen Pinnfolie geschlossen. True, wenn das PinMap-Objekt erfolgreich geöffnet wurde, False, wenn es nicht geöffnet wurde.

Syntax

Ausdruck.Open

Ausdruck   Erforderlich. Ein Ausdruck, der ein PinMap-Objekt zurückgibt.


Beispiel zur Open-Methode

In diesem Beispiel wird eine Pinnfolie auf dem ersten Tabellenblatt anhand ihres Namens geöffnet.

Excel.Application.Sheets(1).OLEObjects(1).Object.PinMaps("Neue Standorte").Open


Parent-Eigenschaft

Gibt das übergeordnete Objekt des angegebenen Objekts zurück. Wenn die Parent-Eigenschaft auf das CMSMap-Objekt angewendet wird, gibt sie das CMSMap-Objekt selbst zurück, da dieses Objekt kein übergeordnetes Objekt hat. Jedes Objekt hat jedoch eine Parent-Eigenschaft. Nur-Lese-Zugriff.


Beispiel zur Parent-Eigenschaft

In diesem Beispiel wird die Refresh-Methode des CMSMap-Objekts aufgerufen, mit der die Daten aller Datensätze aktualisiert werden.

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


PinMaps-Eigenschaft

Gibt die PinMaps-Auflistung zurück, die alle vom Benutzer erstellten PinMap-Objekte enthält. Nur-Lese-Zugriff.


Beispiel zur PinMaps-Eigenschaft

In diesem Beispiel werden die Namen aller Pinnfolien in einem Meldungsfeld angezeigt.

for index = 1 to map.PinMaps.Count

MsgBox map.PinMaps(index).Name

next


Refresh-Methode

Aktualisiert die Daten aller Datensätze und zeichnet alle vorhandenen Themen mit Hilfe der neuen Daten neu. Verwenden Sie diese Methode, wenn Sie Daten in dem Bereich ändern, von dem eine Karte erstellt wird. Wenn Sie lediglich den Bildschirm neu zeichnen möchten, verwenden Sie diese Methode nicht. Arbeiten Sie zu diesem Zweck mit der auf True eingestellten ScreenUpdating-Eigenschaft.

Syntax

Ausdruck.Refresh

Ausdruck   Erforderlich. Ein Ausdruck, der ein CMSMap-Objekt zurückgibt.


Beispiel zur Refresh-Methode

In diesem Beispiel wird Microsoft Map so eingestellt, daß alle Datenänderungen in den angezeigten Themen in der ersten Auflistung der OLE-Objekte des ersten Tabellenblatts wiedergegeben werden.

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


Remove-Methode

Entfernt ein Feld aus dem angegebenen Thema. Sie können diese Methode zusammen mit der Add-Methode verwenden, um die Felder (Spalten) zu ändern, auf denen das Thema beruht. True, wenn das Feld erfolgreich entfernt wurde, False, wenn es nicht entfernt wurde.

Syntax

Ausdruck.Remove

Ausdruck   Erforderlich. Ein Ausdruck, der ein SelectedField-Objekt zurückgibt.


Beispiel zur Remove-Methode

In diesem Beispiel wird Microsoft Map so eingestellt, daß das angegebene Thema auf den Daten im Feld Westen und nicht auf den Daten im Feld Osten beruht. Außerdem wird das Neuzeichnen des Bildschirms deaktiviert, so daß die Anzeige erst nach dem Beenden dieser Aufgabe aktualisiert wird.

Dim Theme As Object

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

'Für Thema Daten unter Westen und nicht unter Osten verwenden

'Neuzeichnen während Operation deaktivieren

Theme.Parent.Parent.ScreenUpdating=False

Theme.SelectedFields("Osten").Remove

Theme.SelectedFields.Add("Westen")

Theme.Parent.Parent.ScreenUpdating=True


ScreenUpdating-Eigenschaft

Aktiviert bzw. deaktiviert das Neuzeichnen des Kartenfensters. Sie können mit dieser Eigenschaft verhindern, daß das Fenster blinkt, und Zeit sparen, wenn Sie mehrere Änderungen vornehmen, bei denen normalerweise automatisch aktualisiert wird. Sie können die ScreenUpdating-Eigenschaft auch jederzeit auf True setzen, so daß die gesamte Karte neu gezeichnet wird. Boolean Schreib-Lese-Zugriff.


Beispiel zur ScreenUpdating-Eigenschaft

Mit diesem Beispiel wird das Neuzeichnen deaktiviert, wenn der Mittelpunkt der angegebenen Karte geändert oder die Karte vergrößert bzw. verkleinert wird.

Dim map As Object

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

'nur neu zeichnen, wenn Karte in neuer Position

'(Albany, New York)

map.ScreenUpdating = False

map.LatitudeCenter = -73.79

map.LongitudeCenter = 42.67

map.ZoomPct = 700

map.ScreenUpdating = True


SelectedFields-Eigenschaft

Gibt die SelectedFields-Auflistung zurück, die alle SelectedField-Objekte im angegebenen Thema enthält. Die SelectedFields-Auflistung stellt alle Felder (Spalten) des Datensatzes dar, auf dem das Thema beruht und die im Thema verwendet werden. Nur ein Kreisdiagramm- oder Balkendiagramm-Thema kann mehrere Felder in der SelectedFields-Auflistung haben. Nur-Lese-Zugriff.


Beispiel zur SelectedFields-Eigenschaft

In diesem Beispiel wird der Name aller Felder im Datensatz, der mit dem ersten Thema verknüpft ist, in einem Meldungsfeld angezeigt.

Dim Theme As Object

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

for index = 1 to Theme.SelectedFields.Count

MsgBox Theme.SelectedFields(index).Name

next


Size-Eigenschaft

Gibt den Schriftgrad des Legendentexts in Punkt zurück oder legt sie fest. Int16 Schreib-Lese-Zugriff.


Beispiel zur Size-Eigenschaft

In diesem Beispiel wird der Schriftgrad für den Legendentext des Themas auf 12 Punkt eingestellt.

Theme.Legend.Font.Size=12


Strikethrough-Eigenschaft

Aktiviert bzw. Deaktiviert das Format "Durchgestrichen" für Legendentext. Boolean Schreib-Lese-Zugriff.


Beispiel zur Strikethrough-Eigenschaft

In diesem Beispiel wird das Format "Durchgestrichen" für den Legendentext des Themas aktiviert.

Theme.Legend.Font.Strikethrough=True


SubTitle-Eigenschaft

Gibt ein SubTitle-Objekt für die angegebene Karte zurück. Mit dieser Eigenschaft kann der Untertitel geändert oder aus- bzw. eingeblendet werden. Nur-Lese-Zugriff.


Beispiel zur SubTitle-Eigenschaft

In diesem Beispiel wird der Untertitel der ersten Karte im ersten Tabellenblatt ausgeblendet.

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


Templates-Eigenschaft

Gibt die Templates-Auflistung zurück, die alle verfügbaren Kartenvorlagen enthält. Nur-Lese-Zugriff.


Beispiel zur Templates-Eigenschaft

In diesem Beispiel wird der Name aller Vorlagen in einem Meldungsfeld angezeigt.

for index = 1 to map.Templates.Count

MsgBox map.Templates(index).Name

next


Themes-Eigenschaft

Gibt die Themes-Auflistung zurück, die alle vom Benutzer erstellten Theme-Objekte enthält. Nur-Lese-Zugriff.


Beispiel zur Themes-Eigenschaft

In diesem Beispiel werden alle Balkendiagramm-Themen der ersten Karte im ersten Tabellenblatt ausgeblendet.

Dim Themes As Object

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

'Alle Balkendiagramm-Themen ausblenden

for index = 1 to Themes.Count

If Themes(index).Type = 1 Then

Themes(index).Visible = False

end if

next


ThoroughMatch-Eigenschaft

Gibt den Status der ThoroughMatch-Option zurück oder legt ihn fest. True, wenn alle Zeilen eines Datensatzes verwendet werden, um den Datensatz mit einer Kartenvorlage zu vergleichen. False, wenn nur ein Muster der Zeilen für diesen Zweck verwendet wird. Diese Eigenschaft gilt für alle CMSMap-Objekte. Boolean Schreib-Lese-Zugriff.


Beispiel zur ThoroughMatch-Eigenschaft

In diesem Beispiel wird die genaue Übereinstimmung für die erste Karte im ersten Tabellenblatt aktiviert.

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


Title-Eigenschaft

Gibt das Title-Objekt der angegebenen Mappe zurück. Mit dieser Eigenschaft kann der Titel geändert oder aus- bzw. eingeblendet werden. Schreib-Lese-Zugriff.


Beispiel zur Title-Eigenschaft

In diesem Beispiel wird der Titel der ersten Karte im ersten Tabellenblatt fett formatiert.

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


Type-Eigenschaft

Gibt den Typ des angegebenen Themas zurück. Diese Eigenschaft wird beim Erstellen eines Themas automatisch festgelegt. Die möglichen Werte sind in der folgenden Tabelle aufgeführt. EnumThemeType Nur-Lese-Zugriff.

Typ	Wert
Ranged	0
Bar	1
Pie	2
Graduated	3
DotDensity	4
Individual	5
Default	6 (nur verwendet, wenn ein Thema mit Themes.Add hinzugefügt wird)


Beispiel zur Type-Eigenschaft

In diesem Beispiel werden alle Balkendiagramm-Themen der ersten Karte im ersten Tabellenblatt ausgeblendet.

Dim Themes As Object

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

'Alle Balkendiagramm-Themen ausblenden

for index = 1 to Themes.Count

If Themes(index).Type = 1 Then

Themes(index).Visible = False

end if

next


Underline-Eigenschaft

Aktiviert bzw. deaktiviert die Unterstreichung für Legendentext. Boolean Schreib-Lese-Zugriff.


Beispiel zur Underline-Eigenschaft

In diesem Beispiel wird der Legendentext unterstrichen.

legend.Font.Underline = True


UseCurrencyFormat-Eigenschaft

Gibt die UseCurrencyFormat-Eigenschaft eines Legend-Objekts zurück oder legt sie fest. Diese Eigenschaft bestimmt, ob der Legendentext mit dem aktuellen Währungsformat angezeigt wird. Boolean Schreib-Lese-Zugriff.


Beispiel zur UseCurrencyFormat-Eigenschaft

In diesem Beispiel wird neben dem Legendentext das Währungsformat angezeigt.

legend.UseCurrencyFormat = True


Version-Eigenschaft

Gibt die Versionsnummer der Software zurück. String Nur-Lese-Zugriff.


Beispiel zur Version-Eigenschaft

In diesem Beispiel wird die Versionsnummer der Software in einem Meldungsfeld ausgegeben.

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


Visible-Eigenschaft

Gibt die Sichtbarkeit des angegebenen Kartenmerkmals zurück oder legt sie fest. Boolean Schreib-Lese-Zugriff.


Beispiel zur Visible-Eigenschaft

In diesem Beispiel wird das Merkmal "Europa: Städte" auf der ersten Karte des ersten Tabellenblatts sichtbar gemacht.

Excel.Application.Sheets(1).OLEObjects(1).Object.Features("Europa: Städte").Visible = True


XPos-Eigenschaft

Gibt die horizontale Position der angegebenen Legende in Bildschirmkoordinaten zurück oder legt sie fest. Int16 Schreib-Lese-Zugriff.


Beispiel zur XPos-Eigenschaft

In diesem Beispiel wird die Legende nach oben und nach links verschoben.

Theme.Legend.XPos = Theme.Legend.XPos - 10

Theme.Legend.YPos = Theme.Legend.YPos - 10


YPos-Eigenschaft

Gibt die vertikale Position der angegebenen Legende in Bildschirmkoordinaten zurück oder legt sie fest. Int16 Schreib-Lese-Zugriff.


Beispiel zur YPos-Eigenschaft

In diesem Beispiel wird die Legende nach oben und nach links verschoben.

Theme.Legend.XPos = Theme.Legend.XPos - 10

Theme.Legend.YPos = Theme.Legend.YPos - 10


ZoomPct-Eigenschaft

Gibt die aktuelle Zoom-Stufe der angegebenen Karte als Prozentsatz zurück oder legt sie fest (100 Prozent ist die Stufe, bei der die gesamte Karte sichtbar ist; dies entspricht dem Befehl Ganze Landkarte (Menü Ansicht). Int32 Schreib-Lese-Zugriff.


Beispiel zur ZoomPct-Eigenschaft

In diesem Beispiel wird die angegebene Karte auf dem aktiven Blatt auf 250 Prozent vergrößert.

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


ZoomTo-Methode

Mit dieser Methode können Sie den Prozentsatz der Vergrößerung bzw. Verkleinerung und die Zentrierung der angegebenen Karte in einem Aufruf ändern, ohne die Eigenschaften ZoomPct, LatitudeCenter oder LongitudeCenter verwenden zu müssen. Der Bildschirm wird dabei nur einmal neu gezeichnet.

Syntax

Ausdruck.ZoomTo(ZoomPct, Latitude, Longitude)

Ausdruck   Erforderlich. Ein Ausdruck, der ein CMSMap-Objekt zurückgibt.

ZoomPct  Erforderlich. Int32. Gibt die aktuelle Zoom-Stufe der angegebenen Karte als Prozentsatz zurück oder legt sie fest (100 Prozent ist die Stufe, bei der die gesamte Karte sichtbar ist; dies entspricht dem Befehl Ganze Landkarte (Menü Ansicht).

Latitude  Erforderlich. Double. Gibt den Breitengrad des Mittelpunkts der angegebenen Karte zurück oder legt ihn fest.

Longitude  Erforderlich. Double. Gibt den Längengrad des Mittelpunkts der Karte zurück oder legt ihn fest.


Beispiel zur ZoomTo-Methode

In diesem Beispiel wird der Mittelpunkt der angegebenen Karte im ersten Tabellenblatt auf Albany, New York, eingestellt und die Ansicht auf 700 Prozent vergrößert.

Dim map As Object

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

' 2 Möglichkeiten für ein Ergebnis

' erste Möglichkeit

map.ZoomTo 700,-73.70, 42.67

In diesem Beispiel wird die Karte erst neu gezeichnet, nachdem sie auf die neue Position eingestelllt wurde (Albany, New York).

map.ScreenUpdating = False

map.LatitudeCenter = -73.79

map.LongitudeCenter = 42.67

map.ZoomPct = 700

map.ScreenUpdating = True


CMSMap-Objekt

Stellt ein datenabbildendes Programmobjekt dar. Sie erhalten das CMSMap-Objekt durch die Object-Eigenschaft eines OleObject-Objekts. Alle anderen datenabbildenden Objekte besitzen eine Application-Eigenschaft, die dieses Objekt zurückgibt.

Im folgenden Beispiel wird die variable Karte als Objekt definiert. Ihr wird das datenabbildende Objekt des aktiven Blattes zugeordnet. Anschließend erhält die Karte die Titelbeschriftung "Deutschland".

Dim map As Object

Set map = ActiveSheet.OLEObjects(1).Object

map.Title.Caption = "Deutschland"


Dataset-Objekt

Stellt einen Datensatz (Zellbereich) zur Erstellung einer Landkarte dar. Es gibt drei Möglichkeiten, ein Dataset-Objekt zu erstellen und es der Datasets-Auflistung hinzuzufügen:

•	Nachdem Sie die Create-Methode auf das CMSMap-Objekt angewendet haben, verwenden Sie ein Microsoft Excel Range-Objekt, um den Datensatz zu erstellen und zuzuweisen.

•	Markieren Sie in Microsoft Excel einen Zellbereich, und klicken Sie anschließend auf Landkarte im Menü Einfügen. Landkarte und Datensatz werden erstellt, und der Datensatz wird zugewiesen.

•	Klicken Sie in Microsoft Map auf Einfügen und anschließend auf Externe Daten. Der Datensatz wird erstellt und der Karte hinzugefügt.

Bei jedem Hinzufügen und Ändern von Themen verwendet Microsoft Map den aktuellen Datensatz. Weitere Informationen finden Sie unter der CurrentDataset-Eigenschaft.


Datasets-Objekt (Auflistung)

Eine Auflistung von Dataset-Objekten, die alle Datensätze der angegebenen Landkarte darstellen.


Feature-Objekt

Stellt eines der Merkmale der angegebenen Karte dar. Mit Hilfe des Feature-Objekts können Sie jedes bestehende Merkmal ein- oder ausschalten.


Features-Objekt (Auflistung)

Eine Auflistung von Feature-Objekten, die alle Merkmale der angegebenen Karte darstellen.


Legend-Objekt

Stellt die Legende des angegebenen Themas dar.


LegendFont-Objekt

Stellt Titel, Untertitel oder Text der angegebenen Legende dar.


LegendTitle-Objekt

Stellt den Titel der angegebenen Legende dar. Das LegendTitle-Objekt ähnelt dem Title-Objekt, doch sind die Eigenschaften xPos, yPos und Visible für das LegendTitle-Objekt nicht verfügbar.


PinMaps-Objekt (Auflistung)

Eine Auflistung von PinMap-Objekten, die alle vom Benutzer erstellten Pinnfolien darstellen.


SelectedFields-Objekt (Auflistung)

Eine Auflistung von SelectedField-Objekten, die alle markierten Felder der angegebenen Landkarte darstellen. Diese Objekte stellen die Felder in einem Datensatz dar, die gerade in einem Thema angezeigt werden.


Templates-Objekt (Auflistung)

Eine Auflistung von Template-Objekten, die alle installierten Kartenvorlagen darstellen. Zum Hinzufügen, Entfernen oder Ändern von Kartenvorlagen verwenden Sie den Data Installer.


Theme-Objekt

Stellt ein Thema dar, das in der angegebenen Karte angezeigt wird. Mit Hilfe des Theme-Objekts können Sie ein Thema ein- und ausschalten, die zugewiesenen Datenfelder ändern oder die Legende des Themas manipulieren.


Themes-Objekt (Auflistung)

Eine Auflistung von Theme-Objekten, die alle Themen der angegebenen Landkarte darstellen.


PinMap-Objekt

Stellt eine Pinnfolie dar, die Sie auf die angegebene Landkarte zeichnen können. PinMap-Objekte sind in der PinMaps-Auflistung enthalten.


Title-Objekt

Stellt den Titel der angegebenen Landkarte dar. Sie können das Title-Objekt verwenden, um den Text des Titels zu ändern, den Titel auszublenden oder einzublenden.


Template-Objekt

Stellt eine Kartenvorlage dar. Sie können das Template-Objekt verwenden, um den Namen der angegebenen Vorlage zurückzugeben. Template-Objekte sind in der Templates-Auflistung enthalten.


TitleFont-Objekt

Stellt die Schriftart des angegebenen Kartentitels dar.


SelectedField-Objekt

Stellt ein Feld in einem Datensatz dar, das in einem Thema angezeigt wird.


Item-Eigenschaft

Stellt ein bestimmtes Objekt der angegebenen Auflistung dar. Item ist die Standardeigenschaft der meisten Objekte in Auflistungen. Der Indexparameter der Item-Eigenschaft ist ein Variant-Argument, das entweder eine Zahl sein kann, die die Position des angegebenen Objekts in der Auflistung angibt, oder eine Zeichenfolge, die den Objektnamen darstellt.

Im folgenden Beispiel werden drei Möglichkeiten aufgezeigt, wie ein bestimmtes Template-Objekt der Templates-Auflistung zurückgegeben werden kann.

Dim map As Object

dim MeineVorlage as object

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

set MeineVorlage  = map.Templates.Item(1)	' Hole erste Vorlage

set MeineVorlage  = map.Templates(1)	' Zeige Verwendung der Standardeigenschaft

set MeineVorlage  = map.Templates.Item("Kanada") ' Hole die Vorlage "Kanada"


PreferCompactLegends-Eigenschaft

Gibt einen Wert zurück, der angibt, ob Microsoft Map die Legenden neu erstellter Themen in Kurzformat anzeigt. Boolean Schreib-Lese-Zugriff.

In diesem Beispiel wird festgelegt, daß Microsoft Map für das erste Objekt des ersten Blattes alle neuen Themen mit vollständigen Legenden erstellt.

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