Nu face nimic.
(XP+Word 2003)
- Cod: Selectaţi tot
Sub ApplyTableStyle()
Dim tbl As Table
For Each tbl In ActiveDocument.Tables
tbl.Style = "Grid"
Next
End Sub
Sub ApplyTableStyle()
Dim tbl As Table
For Each tbl In ActiveDocument.Tables
tbl.Style = "Grid"
Next
End Sub
Înapoi la Visual Basic for Application (VBA) - Intrebari tehnice
Utilizatorii ce navighează pe acest forum: Niciun utilizator înregistrat şi 1 vizitator