Inventor, Renaming Part & Part Drawing

Hello. I am looking for an automated solution for renaming parts in Autodesk Inventor 2015. I would like a VB macro or ilogic code that will do the following process for me:

1. Starting with the .ipt or .iam file that I want to rename already open (lets say it is named "Part 1"), have the program save this part with a name entered by the user from an input box (lets say we name it "Part 2"). I would like it set up so "Part 2" would be saved in the same file location as "Part 1".

2. Open the drawing for "Part 1" and save it as "Part 2" (or the same name that is entered in the input box from the first bullet point). I need the drawings to be saved in inventor .dwg format. Then close the "Part 1" dwg file.

3.Open the newly saved "Part 2" dwg file and have the model reference (which should still be set as "Part 1") changed to "Part 2".

4. Save the "Part 2" dwg file, and then close it.

Any help I could get with building this would be awesome! Thanks.