Anleitung zum Hinzufügen von Visual Basic-Word-Tabellen

March 21

Tabellen sind ein wesentliches Merkmal des Wortes. Sie erscheinen in allen Arten von Dokumenten für Word-Anwender Daten visuell zu organisieren. Es kann zum Erstellen von Tabellen nach Belieben zeitaufwendig sein, aber wenn Sie, etwas über Visual Basic scripting-Sprache des Wortes wissen kann schneller erstellen, füllen und Formatieren von Tabellen. Studieren das folgende Visual Basic-Programm gibt Ihnen einen Vorsprung bei der Bearbeitung von Word-Tabellen mithilfe von Code.

Typ-Code zum Erstellen einer Tabelle

Sub mac()Dim wo als RangeDim NuTab als Tabelle

Wo legen = Selection.RangeSet NuTab = ActiveDocument.Tables.Add (wo, NumRows: = 7, NumColumns: = 3)

nuTab.Columns(1). Cells(1). Bereich = "einige Sachen"nuTab.Columns(2). Cells(2). Bereich = "einige weitere Sachen"

nuTab.AutoFormat wdTableFormatClassic1

Mit nuTab.Columns(2). Cells(2)

With .Borders(wdBorderTop) .LineStyle = wdLineStyleSingle .LineWidth = wdLineWidth300pt .ColorIndex = wdYellow End With With .Borders(wdBorderBottom) .LineStyle = wdLineStyleSingle .LineWidth = wdLineWidth300pt .ColorIndex = wdYellow End With

Enden mit

EndSub Geben Sie den vorstehenden Code in der Visual Basic-IDE (integrierte Entwicklungsumgebung), die Sie eingeben können in Word durch Drücken von Alt-F11 und Gewährleistung sind Sie in das Codefenster (Ansicht > Code).

Führen Sie das Skript durch Rücksendung in Word auswählen "Developer > Makros," "Mac" aus der Liste auswählen, und drücken Sie "Ausführen". Visual Basic erstellt eine neue Tabelle an der aktuellen Einfügemarke, einige Daten hinzugefügt und Formate einer Zelle.

Erfahren Sie, wie das Skript arbeitet

Zurück in die IDE, den Code zu studieren. Die Anweisung Set where=Selection.Range definiert eine Variable, die die aktuelle Position des Cursors darstellt. Dies ist, wo Sie eine neue Tabelle installieren. Die zweite Zeile (Set NuTab =...) tatsächlich erstellt die Tabelle, die mit dem ActiveDocument-Objekt um zu tun.

Die beiden Anweisungen nach der Anweisung Set NuTable fügt Inhalt auf die Tabellen über die Spalten und Zellen-Eigenschaft des Table-Objekts.

Objekt-Mitglieder mit dem Objektbrowser finden

Wenn Sie nicht zu wissen, die bestimmte Funktionen und Eigenschaften eines Objekts (z. B. Spalten, Zellen) besorgt sind, können Sie leicht eine beschreibende Liste von ihnen erhalten, durch Drücken von F2, die Sie den Objektbrowser aufruft. In das Suchfeld des Objektkatalogs können Sie geben Sie den Begriff "Tabellen" und drücken Sie "Enter", wählen Sie "Tabelle" im Bereich "Ergebnisse" auf der rechten Seite und erhalten eine Liste aller Mitglieder der Tabelle.

An den Code zurückgegeben wird, beziehen sich auf die Aussage "mit nuTab.Columns(2). Cells..." Das With-Schlüsselwort weist Visual Basic, dass Sie nicht, geben Sie eine lange Zeichenfolge von gepunkteten Wörtern sich wiederholt auf ein Objekt Methode oder Eigenschaft (z. B. Object1.Object2.Object3.doThis()) möchten. Stattdessen möchten Sie zoom rechts in die Mitglieder eines bestimmten Objekts in der Kette. Zum Beispiel:

Mit Object1.Object2.Object3.doThis()Enden mit

Formatierung anwenden

Die Anweisung nuTab.AutoFormat... gilt eine Grenze-Regelung für die vollständige Tabelle, während die erste Aussage beginnt, um eine einzelne Zelle zu formatieren. Die Formatierung, die Ihren Code bewerben ist nicht spezifisch für Tabellenzellen, aber kann mit Range-Objekt arbeiten. Die nuTab.Columns(2). Cells(2)-Objekt geschieht, das Range-Objekt in diesem Fall zu sein.

Experimentieren Sie mit unterschiedlichen Formatierungsoptionen, die Word bietet. Verwenden Sie den Objektbrowser, um sie zu finden. Beginnen Sie mit sucht eine bekannte Option (z.B. WdLineStyleSingle), und die Auflistung der ähnlichen Optionen, die ein Teil ist, zu bemerken.