VBA Assistance - Copy Active Row & Insert below

I am simply trying to copy the active row and insert copied cells in the row below active row. I have accomplished this.

But, I am also looking to clear contents in inserted row - A:E and set G to "1". That part I can't figure out.

Thanks,
Ryan

Please take a moment to re-read forum rule #1 and then amend your thread title to something that better explains your problem. Changing your thread title is not optional, which means you must change it. Thanks!

• Use concise, accurate thread titles.
• Your post title should describe your problem, not your anticipated solution.
• Use terms appropriate to a Google search - poor thread titles, like Please Help, Urgent, Need Help, Formula Problem, Code Problem, and Need Advice tell us nothing.
• Responding to a request to change your thread title by doing so is mandatory.

To change a title go to your first post, click EDIT then Go Advanced and change your title.

No help to be offered, please, until the OP complies with this request.

Thank you.