Kā nomainīt stilu visām tabulām Microsoft Word

Microsoft Word ļauj formatējumu piemērotlielie teksta fragmenti apskauž. Varat nokopēt formatējumu, kas piemērots vienam teksta bitam, un ar dažiem klikšķiem to piemērot veselām rindkopām un sadaļām. Diemžēl tas pats neattiecas uz galdiem. Ja vēlaties mainīt stilu visām tabulām konkrētā dokumentā, jums būs jāizvēlas katra atsevišķi un jāmaina stils. Alternatīva ir izmantot makro, lai to izdarītu.

Atrodiet galda stilu

Lai izveidotu makro, jums tas jāatrodtabulas stila nosaukums, kuru vēlaties izmantot. Tas ir diezgan viegli. Atveriet Word dokumentu, kuram vēlaties mainīt tabulas stilus. Noklikšķiniet tabulas iekšpusē un pēc tam cilnē Galda rīki dodieties uz cilni Dizains.

Novietojiet peles kursoru virs tabulas stila, kuru vēlaties izmantot visām tabulām, un rīka padoms jums pateiks, kas to sauc. Pierakstiet vārdu un esat gatavs izveidot makro.

Galda stila makro

Lai programmā Word aktivizētu cilni Izstrādātājs, dodieties uz Fails> Iespējas> Pielāgot lenti. Iespējojiet izstrādātāja rīkjoslu un pēc tam atgriezieties savā dokumentā.

Cilnē Izstrādātājs noklikšķiniet uz Makro. Piešķiriet tam šādu vārdu;

ApplyTableStyle

Noklikšķiniet uz izveidot un kodā ievadiet šolodziņā tomēr jārediģē šī rinda: tbl.Style = “Medium Shading 2 - Accent 1”. Aizstājiet pēdiņas iekšpusē ar tabulas stila nosaukuma nosaukumu, kuru kopējāt iepriekšējā solī. Neizņemiet pēdiņas no koda. Vienkārši ievadiet tabulas stila nosaukumu un palaidiet to.

Sub ApplyTableStyle()
Dim tbl As Table
For Each tbl In ActiveDocument.Tables
tbl.Style = "Medium Shading 2 - Accent 1"
Next
End Sub

Tas ir viss, kas jums jādara. Kad makro būs izpildīts, tas automātiski mainīs visu tabulu stilu. Ja jums kādreiz būs jāizmanto cits tabulas stils, jums tas būs jānoņem, jo ​​tas proaktīvi maina visu tabulu stilu uz makro norādīto.

Ja jums kādreiz ir jāmaina makro stilsattiecas uz jums, jums būs jārediģē kods un jāaizstāj tā stila nosaukums, kuru vēlaties izmantot. Makro piemēro stilus visām pašreizējām un visām jaunajām tabulām dokumentā. Acīmredzot tas būtu vieglāk, ja Microsoft Word būtu iebūvēta opcija to izdarīt. Tas šķiet nepāra app.