I hadn't noticed that, but actually it has a light grey background. It is easily addressed. After the line
Code:
oCell.Shading.BackgroundPatternColor = wdColorWhite
add the line
Code:
oCell.Range.Font.Shading.BackgroundPatternColor = wdColorAutomatic