I left off an S in the variable name
from:
NewPO.Copy Destination:=OldSht.Rows(NewRow)
to
NewPOs.Copy Destination:=OldSht.Rows(NewRow)

"jwags" wrote:

I have one last error. The line NewPO.Copy Destination:=OldSht.Rows
(NewRow) gives me an error. The worksheet shows the two new line
items but seems to be unable to copy them.