membuat effect di ms word

Apabila anda ingin menandai sebuah teks di ms word dengan sebuah effect..

langkah-langkahnya:

- tekan Alt+F11 buat masuk ke VBA
- ketik kode ini di ThisDocument:

 Sub ApplyTextEffect()
    Selection.Font.Animation = wdAnimationBlinkingBackground
End Sub

- ketik sembarang di word
- blink blink blink...

ini adalah pilihan effectnya:


wdAnimationLasVegasLights
wdAnimationMarchingBlackAnts
wdAnimationMarchingRedAnts
wdAnimationShimmer
wdAnimationSparkleText 


kalau ingin hapus effectnya..ganti aja menjadi none 


Sub ApplyTextEffect()
    Selection.Font.Animation = wdAnimationNone
End Sub 

semoga bermanfaat..