Creating Macro to copy information from cell into another cell using Add Comments
 

Hi,

I want to create a macro that will pick up a range of cells aa19:aa95
In these cells there is a formula
=IF($E19="YES",VLOOKUP($C19,'Brand Detail'!$A$1:$P$5000,AA$6,FALSE),"")
for example

I want to add comments transfering the information (TEXT) to column
(G)

How should the macro coding look like to do this?

Many thkx for your answer
Steven

Creating Macro to copy information from cell into another cell usi
 

Sub BBB()
For Each cell In Range("I1:I3")
Cells(cell.Row, "G").NoteText Text:=cell.Text
Next
End Sub

--
Regards,
Tom Ogilvy


"pmipalma" wrote:

Hi,

I want to create a macro that will pick up a range of cells aa19:aa95
In these cells there is a formula
=IF($E19="YES",VLOOKUP($C19,'Brand Detail'!$A$1:$P$5000,AA$6,FALSE),"")
for example

I want to add comments transfering the information (TEXT) to column
(G)

How should the macro coding look like to do this?

Many thkx for your answer
Steven

Creating Macro to copy information from cell into another cell usi
 

Perfect Many thanks

You made my day

Works perfectly

Tom Ogilvy schreef:

Sub BBB()
For Each cell In Range("I1:I3")
Cells(cell.Row, "G").NoteText Text:=cell.Text
Next
End Sub

--
Regards,
Tom Ogilvy


"pmipalma" wrote:

Hi,

I want to create a macro that will pick up a range of cells aa19:aa95
In these cells there is a formula
=IF($E19="YES",VLOOKUP($C19,'Brand Detail'!$A$1:$P$5000,AA$6,FALSE),"")
for example

I want to add comments transfering the information (TEXT) to column
(G)

How should the macro coding look like to do this?

Many thkx for your answer
Steven