| WdTextureIndex can be one of these WdTextureIndex constants. |
| wdTexture10Percent |
| wdTexture12Pt5Percent |
| wdTexture15Percent |
| wdTexture17Pt5Percent |
| wdTexture20Percent |
| wdTexture22Pt5Percent |
| wdTexture25Percent |
| wdTexture27Pt5Percent |
| wdTexture2Pt5Percent |
| wdTexture30Percent |
| wdTexture32Pt5Percent |
| wdTexture35Percent |
| wdTexture37Pt5Percent |
| wdTexture40Percent |
| wdTexture42Pt5Percent |
| wdTexture45Percent |
| wdTexture47Pt5Percent |
| wdTexture50Percent |
| wdTexture52Pt5Percent |
| wdTexture55Percent |
| wdTexture57Pt5Percent |
| wdTexture5Percent |
| wdTexture60Percent |
| wdTexture62Pt5Percent |
| wdTexture65Percent |
| wdTexture67Pt5Percent |
| wdTexture70Percent |
| wdTexture72Pt5Percent |
| wdTexture75Percent |
| wdTexture77Pt5Percent |
| wdTexture7Pt5Percent |
| wdTexture80Percent |
| wdTexture82Pt5Percent |
| wdTexture85Percent |
| wdTexture87Pt5Percent |
| wdTexture90Percent |
| wdTexture92Pt5Percent |
| wdTexture95Percent |
| wdTexture97Pt5Percent |
| wdTextureCross |
| wdTextureDarkCross |
| wdTextureDarkDiagonalCross |
| wdTextureDarkDiagonalDown |
| wdTextureDarkDiagonalUp |
| wdTextureDarkHorizontal |
| wdTextureDarkVertical |
| wdTextureDiagonalCross |
| wdTextureDiagonalDown |
| wdTextureDiagonalUp |
| wdTextureHorizontal |
| wdTextureNone |
| wdTextureSolid |
| wdTextureVertical |
expression.Texture
expression Required. An expression that returns a Shading object.
Example
This example sets a range that references the first paragraph in the active document and then applies a grid texture to that range.
Set myRange = ActiveDocument.Paragraphs(1).Range
myRange.Shading.Texture = wdTextureCross
This example adds a table at the insertion point and then applies a vertical line texture to the first row in the table.
Selection.Collapse Direction:=wdCollapseStart
Set myTable = ActiveDocument.Tables.Add(Range:=Selection.Range, _
NumRows:=2, NumColumns:=2)
myTable.Rows(1).Shading.Texture = wdTextureVertical
This example applies 10 percent shading to the first word in the active document.
ActiveDocument.Words(1).Shading.Texture = wdTexture10Percent