I need help with a Copy/Paste loop in VBA, please!

[jimmy502]

I need help creating a loop. The rest of my sheet works like a dream but I am trying to add this final touch. Basically, the sheet sends an email and I need what was contained in the email logged on a separate sheet. So here's what I'm looking at:

On sheet "NOTIFY", range E12:E21 is copied and then pasted onto sheet "LOG" in the first available blank cell in column A. (Already done.)

Now, I need the following to happen after that:

- Sheets("NOTIFY").Range("J7") to be copied and pasted into column B on sheet "LOG" (starting in first blank cell) in each row where column A contains text.
- The current date ("mm/dd/yy") to be entered into column C on sheet "LOG" (starting in first blank cell) in each row where column A contains text.
- Sheets("NOTIFY").Range("J12") to be copied and pasted into column D on sheet "LOG" (starting in first blank cell) in each row where column A has text.

I know this will be fairly simple but I can't figure out where to start. I would greatly appreciate any help anyone could offer!

[alansidman]

What cell in column A are you referring to containing text? All pastes to Worksheet "LOG"?

[jimmy502]

What cell in column A are you referring to containing text? All pastes to Worksheet "LOG"?

This paste function should be completed for each row in the respective columns where column A contains text. And yes, all pastes to sheet LOG.