View Single Post
 
Old 03-17-2015, 03:22 PM
gmaxey gmaxey is offline Windows 7 32bit Office 2010 (Version 14.0)
Expert
 
Join Date: May 2010
Location: Brasstown, NC
Posts: 1,422
gmaxey is a jewel in the roughgmaxey is a jewel in the roughgmaxey is a jewel in the roughgmaxey is a jewel in the rough
Default

I called your code using the following and it worked fine:

Code:
Sub Test()
  Dim arrPercent() As String
  arrPercent = Split("10,50,20,20", ",")
  setProz ActiveDocument.Tables(1), arrPercent
End Sub
__________________
Greg Maxey
Please visit my web site at http://www.gregmaxey.com/
Reply With Quote