Gewusst wie: Navigieren von Excel-Objekte aus Visual Basic

Wichtig: Dieser Artikel wurde maschinell und nicht von einem Menschen übersetzt. Die Microsoft Knowledge Base ist sehr umfangreich und ihre Inhalte werden ständig ergänzt beziehungsweise überarbeitet. Um Ihnen dennoch alle Inhalte auf Deutsch anbieten zu können, werden viele Artikel nicht von Menschen, sondern von Übersetzungsprogrammen übersetzt, die kontinuierlich optimiert werden. Doch noch sind maschinell übersetzte Texte in der Regel nicht perfekt, insbesondere hinsichtlich Grammatik und des Einsatzes von Fremdwörtern sowie Fachbegriffen. Microsoft übernimmt keine Gewähr für die sprachliche Qualität oder die technische Richtigkeit der Übersetzungen und ist nicht für Probleme haftbar, die direkt oder indirekt durch Übersetzungsfehler oder die Verwendung der übersetzten Inhalte durch Kunden entstehen könnten.

Den englischen Originalartikel können Sie über folgenden Link abrufen: 147650
Dieser Artikel wurde archiviert. Er wird im vorliegenden Zustand bereitgestellt und nicht mehr aktualisiert.
Zusammenfassung
Dieser Artikel erläutert drei Methoden zum Navigieren und auf Microsoft Excel-Objekte zugreifen:

  • Mit umständliche und der Standard-Eigenschaft
  • Mithilfe von Antialiasing
  • Mithilfe der über- und Anwendung Methoden des Microsoft Excel Version 5.0 Objekte Zugriff auf alle Microsoft Excel-Objekt
Weitere Informationen
Jedes Objekt in Microsoft Excel Version 5.0 existiert in der Anwendung Hierarchie von Objekten. Sie auswählen zwischen diesen Objekten durch der Anwendung Hierarchie nach unten navigieren. Am oberen Rand dieser Hierarchie ist das Application-Objekt. Auswirkungen auf die gesamte Anwendung, was Ereignisse oder Aktionen, die Sie das Application-Objekt zuweisen. Zum Beispiel:
   ' Close the application   [Object].Application.Quit				
ersetzen [Object] durch eine beliebige Variable, die auf alle gültigen Microsoft Excel Application-Objekt verweist, die aus dem folgenden Beispiel erstellt werden kann:
   ' MyObject represents [Object] and OLE1 represents an OLE control   ' that contains an Microsoft Excel Worksheet object.   MyObject = OLE1.Object   Set MyObject = CreateObject("Excel.Sheet")   Set MyObject = GetObject("C:\EXCEL\EXAMPLES\SAMPLES.XLS")				
das Application-Objekt enthält andere große Objekte. Beispielsweise können Sie den folgenden Code auf die Auflistung der derzeit geladen in Microsoft Excel-Arbeitsmappen verweisen:
   [Object].Application.Workbooks				
Wenn eine einzelne Arbeitsmappe aus der Auflistung abgerufen werden soll, verwenden Sie die Item-Methode. Um beispielsweise auf der ersten Arbeitsmappe verweisen:
    [Object].Application.Workbooks.Item(1)				
an die erste Arbeitsmappe schließen:
   [Object].Application.Workbooks.Item(1).Close				

Zugriff auf Objekte mit ausführlichen Verweis oder Standardeigenschaften

Jede Arbeitsmappe enthält eine Auflistung der Arbeitsblätter, jedes Arbeitsblatt enthält eine Auflistung von Zellen und So weiter. (Finden Sie in Microsoft Excel-Dokumentation und Hilfe-Menü für bestimmte Details zu Microsoft Excel-Objekthierarchie.) Verweise auf eine bestimmte Zelle können im Code wie folgt aussehen:
   ' Following refers to cell A1 on Sheet1 in the first workbook.   ' Enter the following two lines as one, single line:   [Object].Application.Workbooks.Item(1).      WorkSheets.Item("Sheet1").Cells.Item(1,1)				
dieser Verweis kann sein, lange und komplexe; allerdings sind Tastenkombinationen verfügbar. Grundlegendes zum Navigationsbereich Operator (.) ist erfolgreich Objekt Programmierung unerlässlich.

Verknüpfungen

Alle Objekte besitzen eine Default-Eigenschaft und Methode. Für Auflistungen ist die Standardmethode die Item-Methode. Für die meisten Objekte ist die Name-Eigenschaft die Standardeigenschaft. Diese Konvention wurde implementiert, zur Vereinfachung der Programmierung. Das vorherige Beispiel kann z. B. zu vereinfacht werden:
   [Object].Application.Workbooks(1).WorkSheets("Sheet1").Cells(1,1)				

Zugriff auf Objekte durch Aliasing Objekte

Aliasing können Sie die Objekt-Programmierung vereinfachen. Wenn Sie viel Code schreiben, der Sheet1 manipuliert wurde, konnte beispielsweise die Syntax die langwierige werden. Um dies zu verhindern, erstellen Sie ein Objekt, das auf das niedrigste gemeinsame Objekt verweist. Dies wird als Antialiasing bezeichnet. Mithilfe der SET-Anweisung einen Alias erstellen:
   Dim Sheet1 as Object   ' Alias Sheet1 to represent [Object]...WorkSheets("Sheet1")   Set Sheet1 = [Object].Application.Workbooks(1).WorkSheets("Sheet1")   ' Now just use the variable Sheet1 to refer to Sheet1.   Sheet1.Cells(1,1).Value = "Title"   Sheet1.Cells(1,2).Value = "ID"   Sheet1.Cells(1,3).Value = "Cost"   Sheet1.Cells(2,1).Value = "Phone"   Sheet1.Cells(2,2).Value = 123413423   Sheet1.Cells(2,3).Value = 89.95				

Zugriff auf Objekte mit über- und Application-Methoden

Die über- und Anwendung Methoden können Sie zum Sichern der Objekthierarchie navigieren. Anwendung-Methode navigiert zu Application-Objekt zurück, und die Parent-Methode eine Ebene der Objekthierarchie navigiert. Alle Beispiele in diesem Artikel mit [Object] wurde gestartet. Solange [Object] ein gültiges Microsoft Excel-Objekt ist, sind alle diese Anweisungen auch gültig. Unabhängig vom Kontext [Object].

Dies ist sehr hilfreich, wenn Microsoft Excel-Objekt aus Visual Basic 4.0 programmieren. Microsoft Excel macht nur die drei Objekte, die als Einstiegspunkte in Microsoft Excel verwendet werden können, verfügbar. Diese Schlüssel sind:

  • Excel.Application
  • Excel.Sheet
  • Excel.Chart
Nicht durch Excel.Application.5 verwechselt werden. Excel.Application wird immer auf die neueste Version von Microsoft Excel zeigen. Excel.Application.5 wird nur auf Microsoft Excel Version 5.0 zeigen.

Es gibt kein verfügbar gemachten Arbeitsmappe-Objekt, so dass es keine Möglichkeit, auf das Workbook-Objekt direkt zuzugreifen. Dies ist jedoch kein Problem, da die übergeordnete Methode eines Worksheet oder Chart-Objekts das Workbook-Objekt zurückgibt. Der folgende Beispielcode veranschaulicht diesen Punkt.

Hinweis: OleExcel ist ein OLE-Steuerelement, das ein Excel.Sheet-Objekt enthält.
   ' Declare object references:   Dim Xlapp As object   Dim XLWkb As object   Dim XLWks As object   Dim XLWksNew As object   oleExcel.Action = 7   ' Activate OLE Object   Set XLWks = oleExcel.Object   ' Alias Worksheet object   Set XLWkb = XLWks.Parent      ' Alias WorkBook object   Set Xlapp = XLWks.Application ' Alias Application object   ' Add a new worksheet to the Workbook and name it:   Set XLWksNew = XLWkb.Worksheets.add  ' Assign alias to new Worksheet   XLWksNew.Name = "VB4 OLE Automation" & XLWkb.Worksheets.count   ' Make the 3rd Worksheet of the Workbook active:   XLWkb.Worksheets(3).Activate   ' Display the dialog for InsertPicture:   Xlapp.dialogs(342).[Show]  ' xlDialogInsertPicture = 342				
Informationsquellen
Office Development Kit, Programmieren integrierte Lösungen
Officeinterop W_VBApp W_Excel WM_OLE OA OLE-Automatisierung

Warnung: Dieser Artikel wurde automatisch übersetzt.

Eigenschaften

Artikelnummer: 147650 – Letzte Überarbeitung: 12/04/2015 14:15:21 – Revision: 2.3

Microsoft Visual Basic 4.0 Professional Edition, Microsoft Visual Basic 4.0 16-Bit Enterprise Edition, Microsoft Excel 5.0 Standard Edition

  • kbnosurvey kbarchive kbmt kb16bitonly kbhowto kbprogramming KB147650 KbMtde
Feedback