Hvordan opretter jeg flere tabeller vha. vbscript i Word?

Jeg kæmper med at oprette flere tabeller vha. VBScript. Jeg kan ikke få oprettet tallerne efter hinanden, den næste kommer ind i første celle i den første tabel.
Er der en der kender en løsning på det?

Min kode:

Function doit()

Set objWord = CreateObject("Word.Application")
objWord.Caption = "Test Caption"
objWord.Visible = True

Set objDoc = objWord.Documents.Add()


objDoc.Bookmarks.Add ("a")
objDoc.Bookmarks.Add ("b")
Set objRange = objDoc.Bookmarks("a").Range
    objRange.Tables.Add Range:=objRange, NumRows:=3, NumColumns:=4
   
Set objRange = objDoc.Bookmarks("b").Range
    objRange.Tables.Add Range:=objRange, NumRows:=3, NumColumns:=4

End Function


Det er meningen at jeg skal løbe igennem en række poster i en database og for hver post skal der oprettes en tabel, med dertilhørende indhold.