vbscript, tabellen

[Verwijderd]

Hoe voeg je een tabel toe in een word document? Onderstaande geeft de foutmelding "expected statement"

obj.ActiveDocument.Tables.Add Range:=wrdselection.Range, numrows:=2, numcolumns:=2

[dusty]

Op donderdag 14 maart 2002 13:06 schreef jelly het volgende:
[..]obj.ActiveDocument.Tables.Add Range:=wrdselection.Range, numrows:=2, numcolumns:=2

Gaan we even herschrijven:

a=obj.ActiveDocument.Tables.Add Range
b=wrdselection.Range
c=numrows
d=numcolumns

gaan we je regel substituten:

a:=b,c:=2,d:=2

Lijkt mij inderdaad geen geldig VBScript commando.

[Crazy D]

Op donderdag 14 maart 2002 13:34 schreef dusty het volgende:
Gaan we even herschrijven:

Hou jij je nou maar lekker bezig met php

Je noemt het VBscript, maar t lijkt me meer VBA (macro) in Word.
Dan is het heel simpel: start recording van een nieuwe macro. Doe wat je wil doen (in dit geval dus tabelletje toevoegen), stop recording, en bekijk de code

[Verwijderd]

Dus zeg maar even zo (voor tabel van 3 bij 3)

code:

    ActiveDocument.Tables.Add Range:=Selection.Range, NumRows:=3, NumColumns:= _
      3, DefaultTableBehavior:=wdWord9TableBehavior, AutoFitBehavior:= _
      wdAutoFitFixed

[Verwijderd]

Op donderdag 14 maart 2002 13:34 schreef dusty het volgende:
Gaan we even herschrijven:

We gaan helemaal niets herschrijven

Probleem zit in de wrdselection. Dat is geen geldig object (vandaar de foutmelding).

code:

Application.ActiveDocument.Tables.Add Range:=Application.ActiveDocument.Range, numrows:=2, numcolumns:=2

Zo werkt ie wel in VBA.
In jouw VBS moet dat waarschijnlijk:

code:

obj.ActiveDocument.Tables.Add Range:=obj.ActiveDocument.Range, numrows:=2, numcolumns:=2