Kad esat rakstiski Word 2016, it īpaši, ja jūs strādājat ar akadēmiskajā dokumentā vai pat lielu fantastikas darbu, jūs varētu vēlēties, lai smaile milzīgus teksta nevis izdzēst. Lai palielinātu tekstu, atlasiet to un pēc tam pārvietojiet to uz leju līdz dokumenta beigām. Kad esat "pabeidzis" rakstīšanu, pārskatiet savus pīķus, lai redzētu, vai ir vērts kaut ko saglabāt.
Šis ir kods spike_text makro, kas automatizē procesu:
Sub spike_text ()
'
' spike_text Macro
"Pārvietot izvēlēto tekstu beigās dokumenta
"
Ja Selection.Type = wdSelectionNormal Tad
Selection.Cut
Selection.EndKey vienība: = wdStory
Selection.TypeParagraph
Selection.Paste
Application.GoBack
Application.GoBack
Else
MsgBox "Nothing to spike"
End If
End Sub
Šis makro satur if-else struktūru. Ja tests nosaka, vai ir atlasīts teksts. Ja tā, teksts tiek izgriezts un ielīmēts dokumenta beigās. Ja teksts nav atlasīts, vienādojuma pārējā daļā tiek parādīts ziņojuma lodziņš ar tekstu “Nav ko palielināt”.
Šis makro sākotnēji tika ierakstīts, un tajā tika izmantoti šādi taustiņsitieni:
Ctrl+X
Ctrl+Beigas
Ctrl+V
Shift+F5, Shift+F5
Tastatūras īsinājumtaustiņš Shift+F5 atgriež jūs iepriekšējā dokumenta rediģēšanas vietā.
Pēc taustiņsitienu ierakstīšanas tika pievienota struktūra if-else, lai nodrošinātu, ka makro neparāda neglītu kļūdas ziņojumu, ja teksts nav atlasīts. Šis process ir daļa no aizsardzības programmēšanas, kur jūs paredzat, ka ne katrs makro sākas ideālos apstākļos. Šajā gadījumā neideāls nosacījums ir tad, ja teksts nav atlasīts.