This line does not set the current dimstyle
(vla-put-activedimstyle g:activedocument eachItem)
therefor this test fails because the DimTXSTY never changes.
(if (= (vlax-invoke g:activedocument 'getvariable "DimTXSTY") StyleNameToRename)
Must be a ACAD2000 bug. Don't sweat it. I have the command line version to fall back on.
I'll be installing ACAD2006 this week so I'll be leaving 2000 behind.
Thanks for the help.