The function starting 'Private' goes in the same module after End Sub, exactly as I have posted it. The '1' is in the '1' in 1 To .Rows.Count again already changed in the last version of the code.
__________________
Graham Mayor - MS MVP (Word) (2002-2019)
Visit my web site for more programming tips and ready made processes www.gmayor.com
|