How to delete unused styles using VBA in Word