Amikor írsz a Word 2016, különösen, ha éppen dolgozik egy tudományos dolgozat vagy akár egy nagy fikció munka, akkor érdemes tüske nagy mennyiségű szöveg helyett törölje őket. Szöveg megnöveléséhez jelölje ki, majd mozgassa le a dokumentum végére. Ha „kész” az írással, tekintse át a kiugró értékeit, hogy megtudja, érdemes-e valamit menteni.
A következő kód egy spike_text makróhoz, amely automatizálja a folyamatot:
Sub spike_text()
'
' spike_text makró
' A kijelölt szöveg áthelyezése a dokumentum végére
'
If Selection.Type = wdSelectionNormal then
Selection.Cut
Selection.EndKey Unit:=wdStory
Selection.TypeParagraph
Selection.Paste
Application.GoBack
Application.GoBack
Else
MsgBox "Nothing to spike"
End If
End Sub
Ez a makró egy if-else struktúrát tartalmaz. Az if teszt meghatározza, hogy szöveg van-e kiválasztva. Ha igen, akkor a szöveg kivágásra és beillesztésre kerül a dokumentum végére. Ha a szöveg nincs kijelölve, az egyenlet másik része egy üzenetdobozt jelenít meg a „Nincs mit emelni” szöveggel.
Ezt a makrót eredetileg rögzítették, és a következő billentyűleütéseket használta:
Ctrl+X
Ctrl+End
Ctrl+V
Shift+F5, Shift+F5
A Shift+F5 billentyűparancs visszaviszi a dokumentum előző szerkesztési helyére.
A billentyűleütések rögzítése után hozzáadásra került az if-else struktúra, hogy a makró ne jelenjen meg csúnya hibaüzenet, ha nincs szöveg kijelölve. Ez a folyamat a defenzív programozás része, ahol előre látható, hogy nem minden makró indul ideális körülmények között. Ebben az esetben nem ideális feltétel az, ha a szöveg nincs kiválasztva.