Tables.style = "Tabellengitternetz" in Word 2010 nicht mehr vorhenden!?

[Frank Rommel]

Hallo,

greife von DIAdem per script auf Word zu

With .Selection.Tables(1)
If .Style <> "Tabellengitternetz" Then
.Style = "Tabellengitternetz"
End If

Das funktioniert seit 2010 nicht mehr, da es den Style
Tabellengitternetz nicht mehr gibt.
Was kann ich jetzt dafür einsetzen?

Gruß Frank

[Christian Freßdorf]

Jens? Frank?

die Frage habe ich im Forum folgendermaßen beantwortet

With Selection.Tables(1)
If .Range.Style <> "Tabellengitternetz" Then
.Range.Style = ActiveDocument.Styles("Tabellengitternetz")
End If
.ApplyStyleHeadingRows = True
.ApplyStyleLastRow = False
.ApplyStyleFirstColumn = True
.ApplyStyleLastColumn = False
.ApplyStyleRowBands = True
.ApplyStyleColumnBands = False
End With

Gruß
Christian

Post by Frank Rommel
Hallo,
greife von DIAdem per script auf Word zu
With .Selection.Tables(1)
If .Style <> "Tabellengitternetz" Then
.Style = "Tabellengitternetz"
End If
Das funktioniert seit 2010 nicht mehr, da es den Style
Tabellengitternetz nicht mehr gibt.
Was kann ich jetzt dafür einsetzen?
Gruß Frank