Document_ContentControlBeforeDelete Event

Tejas.T · #1 02-26-2015, 07:50 AM

I am developing a MS Word Add-in where Content Control text is locked and is changed automatically based on their sequence in document.

On Content Control delete event, I need to iterate on each control and change it's Range Text.

I am able to do it but the problem is the Content Contorl which is just deleted is also part of ActiveDocument.ContentControls and when the event tries to unlock it and change the Range.Text, it throws run time error 5825 saying "Object has been deleted"

Below is the my Document_ContentControlBeforeDelete event.

Code:

Private Sub Document_ContentControlBeforeDelete(ByVal OldContentControl As ContentControl, ByVal InUndoRedo As Boolean)
    
    Dim ContentCtrl As ContentControl
    Dim Counter As Long
    Counter = 1
    
    For Each ContentCtrl In ActiveDocument.ContentControls
        ContentCtrl.LockContents = False
        ContentCtrl.Range.Text = Counter
        ContentCtrl.LockContents = True
        
        Counter = Counter + 1
    Next
    
End Sub

Is there any way to identify though code that a Content Control has been deleted so I can skip it in my loop.

And attached is the sample document with this event.

Thanks,
Tejas

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
File beforeSave Event	Megazoid	Word VBA	3	09-14-2014 01:41 AM
Hyperlinks in Calendar Event?	komobu	Outlook	0	07-16-2014 08:09 AM
Workbook_Open event do not working?	beginner	Excel Programming	8	04-11-2013 02:37 PM
Duplicate event reminders	rgarneau	Outlook	0	01-23-2012 08:58 AM
Event Log - Outlook Crashed	Davva	Outlook	0	11-10-2009 01:35 PM