Quote:
Originally Posted by gmayor
but the following alternative should work, using a function to get the page numbers
|
Thank you Mr. gmayor
The code of Mr. Andrew works fine without any problem
I think you have a problem (Subscript out of range) with your code in the line:
Code:
Selection.GoTo What:=wdGoToPage, which:=wdGoToAbsolute, Count:=Split(strPage, ",")(oCol(spliitem))
You can solve it, otherwise, ignore it and take your rest.
Thank you.