title image


Smiley Re: Tipp von mir: Poste einmal den Code, sonst bleibt die Glaskugel trüb oT
Hallo,



die Prozedur schaut folgendermaßen aus:



Sub CreateTable(numRows As Integer, numCols As Integer)



ActiveDocument.Tables.Add Range:=Selection.Range, _

numRows:=numRows, _

NumColumns:=numCols

With Selection.Tables(1)

.Style = "Tabellengitternetz"

.ApplyStyleHeadingRows = True

.ApplyStyleLastRow = True

.ApplyStyleFirstColumn = True

.ApplyStyleLastColumn = True

End With



End Sub



Vielleicht habt ihr eine Idee



Schöne Grüße



Georg

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: