Macro to Insert copy of Row based on text String

Hi guys
This is my first post - I hope it goes in correctly...

I need help to alter data in my spreadsheet but I have no VBA knowledge and I can't find anyone at my employment to help. I hope someone here can assist.


I would like a macro to check cells in Column "A" to detect the first 8 characters of text as "employee". In some cases the text is EmployeeID or EmployeeNumber, so I need to detect the first 8 characters.
When a match of the first 8 characters is found insert copy of Row 1 below each instance of the detected text.
(Actually Row 1 is an empty row except for the data in cell A1. So inserting a blank row and then copying the data from cell A1 into the first cell of the new Row will work too)


I was trying to alter these snippets of code but I'm lost...
The Data Begins in Row 5 of Column A

(first snippet)

Please Login or Register  to view this content.

(second snippet)

Please Login or Register  to view this content.

I hope you guys can help -
Thanks,
Larry

Moderator's Edit: Use code tags when posting code. To do so in future, select your code and click on the # icon at the top of your ost window.

Do you have a sample file that you can upload?

To Attach a File:

1. Click on Go Advanced
2. In the frame Attach Files you will see the button Manage Attachments
3. Click the button.
4. A new window will open titled Manage Attachments - Excel Forum.
5. Click the Browse... button to locate your file for uploading.
6. This will open a new window File Upload.
7. Once you have located the file to upload click the Open button. This window will close.
8. You are now back in the Manage Attachments - Excel Forum window.
9. Click the Upload button and wait until the file has uploaded.
10. Close the window and then click Submit.

Give this a try

Please Login or Register  to view this content.