View.FieldShading (Word)

Returns or sets on-screen shading for fields. Possible return values are wdFieldShadingAlways - Always apply, wdFieldShadingNever - Never apply, wdFieldShadingWhenSelected - Apply only when form field is selected.

ActiveDocument.ActiveWindow.View.FieldShading = _ 
 wdFieldShadingAlways