Macro: IF given range contains a comment box, then copy cell D1 and paste.

Hi all,

I was hoping to get some help on the VBA code to write a macro that will:

Search in range ($H$13:$H$14) for a comment box and IF there is a comment box it will then select cell $D$1 and open a document such as: notepad/word or even a new excel sheet and paste the contents of D1(string).

Thanks.

Hi there,

Take a look at the attached code and see if it gets you going in the right direction.

If a comment exists for any of the cells in the range specified by "sSheetToSearch" and "sRangeToSearch", the contents of the cell specified by "sSourceSheet" and "sSourceCell" will be copied to the cell specified by "sTargetSheet" and "sTargetCell".

Please Login or Register  to view this content.

Hope this helps - please let me know how you get on.

Regards,

Greg M

Hi Greg,

Sorry, I dont think i was clear on the first post. I was hoping that the macro searched first through cell range (H13:H14) then if there was a comment box paste cell D1 Value by opening another excel sheet and if not(most likely the case), move on to the next cell range of (I13:I14). and so on untill range (AE13: AE14).

Thanks for your help

-Azhar

Greg- can you clarify what you mean by "how I get on?"

Thanks