Removing fields - Multibox

[#1]

Hello,

Is it possible via a macro to delete all the fields via a VB macro?

I used the following script:

SUB ResetInputField

  set obj = ActiveDocument.GetSheetObject("MB06")

          for i =0 to 1000

  obj.RemoveField i

  next

END SUB

My concern is to set the max. I can't get the number of the last line completed in the multibox.

Do you have any ideas?

Thanks

[Gysbert_Wassenaar]

Try adding an On Error Resume Next line to the sub above the line where you remove the field from the multibox.