Dear visitor, welcome to MastersForum. If this is your first visit here, please read the Help. It explains in detail how this page works. To use all features of this page, you should consider registering. Please use the registration form, to register here or read more information about the registration process. If you are already registered, please login here.
![]() |
Source code |
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 |
Quoted
Original von SRS_Speci
wer Word nutzt ist selber schuld *duck*
Quoted
Original von Tsu_Trude
wie wars mit Excel?