Sie sind nicht angemeldet.
Lieber Besucher, herzlich willkommen bei: MastersForum. Falls dies Ihr erster Besuch auf dieser Seite ist, lesen Sie sich bitte die Hilfe durch. Dort wird Ihnen die Bedienung dieser Seite näher erläutert. Darüber hinaus sollten Sie sich registrieren, um alle Funktionen dieser Seite nutzen zu können. Benutzen Sie das Registrierungsformular, um sich zu registrieren oder informieren Sie sich ausführlich über den Registrierungsvorgang. Falls Sie sich bereits zu einem früheren Zeitpunkt registriert haben, können Sie sich hier anmelden.
27.09.2007, 18:17
|
Quellcode |
1 2 3 4 5 6 7 8 9 10 11 12 13 14 |
Public Sub TabelleSchattieren()
Dim tbl As Table
Dim i As Integer
Dim row As row
Set tbl = ThisDocument.Tables(1)
For i = 1 To tbl.Rows.Count
If i Mod 2 = 1 Then
tbl.Rows(i).Shading.BackgroundPatternColorIndex = wdGray50
End If
Next i
End Sub
|
27.09.2007, 19:11
Zitat
Original von SRS_Speci
wer Word nutzt ist selber schuld *duck*
Original von Tsu_Trude
wie wars mit Excel?
