In diesem Artikel erfahren Sie, wie Sie die Methode Create Object in VBA verwenden.
VBA ist eine objektorientierte Sprache - sie verwendet Prozeduren zum Steuern und Erstellen von Objekten.
Objekt erstellen
Wir können die Create Object-Methode verwenden, um ein Objekt in einer Microsoft Office-Anwendung zu erstellen. Wenn wir beispielsweise VBA-Code in Excel schreiben und eine Kopie von Word öffnen möchten, können wir die Create Object-Methode verwenden, um eine neue Instanz von Word zu erstellen.
Zum Beispiel:
| 12345 | Unter CreateWordInstance()wdApp als Objekt dimmenSet wdApp = CreateObject("Word.Application")wdApp.Visible = TrueEnd Sub |
Ebenso können wir eine neue Instanz von PowerPoint oder Access erstellen.
| 12345 | Unter CreatePowerPointApplicationppApp als Objekt dimmenSet ppApp = CreateObject("PowerPoint.Application")ppApp.Visible = TrueEnd Sub |
Wir können Create Object auch verwenden, um andere Objekte als das Application Object zu erstellen. Wir können damit zum Beispiel ein Excel-Sheet erstellen.
| 1234567 | Unter CreateExcelSheet()xlSheet als Objekt dimmenSet xlSheet = CreateObject("Excel.Sheet")xlSheet.Application.Visible = TruexlSheet.Application.Range("A2") = "Guten Morgen"Setze xlSheet = NichtsEnd Sub |
Dadurch wird jedoch tatsächlich eine neue Instanz von Excel erstellt - das Blatt wird nicht in der bereits geöffneten Instanz erstellt. Aus diesem Grund müssen wir Anwendung des neuen Blatts (dh: der neuen Instanz von Excel) auf Sichtbar setzen, um das Objekt zu sehen.
In allen obigen Beispielen verwenden wir Late Binding - daher deklarieren wir die Variablen als Objekte. Wir können auch Early Binding verwenden, indem wir in unserem VBA-Projekt einen Verweis auf Word oder PowerPoint setzen und dann die Unterprozedur wie unten gezeigt schreiben. Um mehr über die späte und frühe Bindung zu erfahren, klicken Sie hier.
Zunächst haben wir für Early Binding innerhalb der VBE einen Verweis auf Microsoft Word gesetzt.
In dem Speisekarte Leiste, wählen Werkzeuge > Referenzen und scrollen Sie nach unten, um die Referenz zu finden Microsoft Word 16.0-Objektbibliothek.
Stellen Sie sicher, dass die Referenz aktiviert ist, und klicken Sie dann auf OK.
HINWEIS: Die Version ist möglicherweise nicht 16.0, es hängt alles davon ab, welche Version von Microsoft Office Sie auf Ihrem PC ausführen!
Jetzt deklarieren wir das Objekt mit Early Binding - das bedeutet, dass wir die wdApp nicht als Objekt deklarieren, sondern als a Word.Anwendung. Der Rest des Codes ist derselbe wie bei der Verwendung von Late Binding oben.
| 12345 | Unter CreateWordInstance()wdApp als neues Word.Application dimmenSet wdApp = CreateObject("Word.Application")wdApp.Visible = TrueEnd Sub |
