1
Sub ConvertNumbersToText()
2
ActiveDocument.Content.ListFormat.ConvertNumbersToText
3
End Sub

1
function ConvertNumbersToText(){
2
ActiveDocument.Content.ListFormat.ConvertNumbersToText()
3
}