Skip to content

Instantly share code, notes, and snippets.

@rdapaz

rdapaz/mso_wd_UpdateTableCells.bas

Created August 28, 2017 09:36
Show Gist options
  • Save rdapaz/7198fe89fbca267bd332a5ea6ba44fc4 to your computer and use it in GitHub Desktop.
Save rdapaz/7198fe89fbca267bd332a5ea6ba44fc4 to your computer and use it in GitHub Desktop.
Download ZIP
Update Cells in a Table with the Same Value
Raw
mso_wd_UpdateTableCells.bas
Public Sub Test()
Dim c As Word.cell
Set c = Selection.Tables(1).cell(1, 1)
For Each c In Selection.Cells
c.Range.Text = "$NIL"
Next c
End Sub
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment